Module Option.MonadSource

Monadic let* allows to replace

  match e1 with
  | Some e2 -> Some (f e2)
  | None -> None

with

  let* x = e1 in
  f x