Or_bottom.Let_syntax
val (let<*) : 'a t -> ('a -> 'b t) -> 'b t
val (let<+) : 'a t -> ('a -> 'b) -> 'b t