module Option:sig
..end
type'a
t ='a option
val is_none : 'a t -> bool
val is_some : 'a t -> bool
val equal : ('a -> 'a -> bool) ->
'a t -> 'a t -> bool
val iter : ('a -> unit) -> 'a t -> unit
val map : ('a -> 'b) -> 'a t -> 'b t
val fold : ('a -> 'b -> 'b) -> 'a t -> 'b -> 'b
val value_default : ('a -> 'b) -> default:'b -> 'a t -> 'b