bb3156b
1 2 3 4
module Result = struct let ( let* ) = Result.bind let fmap f m = Result.bind m f end