Result.T2
module M : Monad
type 'a m = 'a M.t
type ('a, 'e) t = ('a, 'e) result m
type ('a, 'e) e = ('a, 'e) result m