`sig
val map :
('a -> 'b Lwt.t) ->
'a Ocsigen_lib_base.Option.t -> 'b Ocsigen_lib_base.Option.t Lwt.t
val get : (unit -> 'a Lwt.t) -> 'a Ocsigen_lib_base.Option.t -> 'a Lwt.t
val get' : 'a Lwt.t -> 'a Ocsigen_lib_base.Option.t -> 'a Lwt.t
val iter : ('a -> unit Lwt.t) -> 'a Ocsigen_lib_base.Option.t -> unit Lwt.t
val bind :
'a Ocsigen_lib_base.Option.t ->
('a -> 'b Ocsigen_lib_base.Option.t Lwt.t) ->
'b Ocsigen_lib_base.Option.t Lwt.t
end`