val (|?:) : 'value option -> 'value -> 'value
val (>>|) : 'value option -> ('value -> 'result) -> 'result option
val (>>=) : 'value option -> ('value -> 'result option) -> 'result option