module Infix: sig .. end
sig
end
val (>>=) : ('a, 'b) BatStd.result -> ('a -> ('c, 'b) BatStd.result) -> ('c, 'b) BatStd.result
('a, 'b) BatStd.result -> ('a -> ('c, 'b) BatStd.result) -> ('c, 'b) BatStd.result