val (>>=) :
('a, 'b) Stdlib.result ->
('a -> ('c, 'b) Stdlib.result) ->
('c, 'b) Stdlib.resultval (>>|) : ('a, 'b) Stdlib.result -> ('a -> 'c) -> ('c, 'b) Stdlib.resulttype ('a, 'b) r = ('a, 'b) Stdlib.result = | Ok of 'a| Error of 'b
type 'a result = ('a, [ `Msg of string ]) r