Source file letop.ml

1
2
3
4
module Result = struct
  let (let*) = Result.bind
  let (let+) o f = Result.map f o
end