Module Option.O

val (>>=) : 'a option -> ('a -> 'b option) -> 'b option