Option (tezos-protocol-008-PtEdoTez.Tezos_protocol_environment_008

type !'a t = 'a option =

val none : 'a option

val some : 'a -> 'a option

val value : 'a option -> default:'a -> 'a

val bind : 'a option -> ('a -> 'b option) -> 'b option

val join : 'a option option -> 'a option

val map : ('a -> 'b) -> 'a option -> 'b option

val fold : none:'a -> some:('b -> 'a) -> 'b option -> 'a

val iter : ('a -> unit) -> 'a option -> unit

val is_none : 'a option -> bool

val is_some : 'a option -> bool

val equal : ('a -> 'a -> bool) -> 'a option -> 'a option -> bool

val compare : ('a -> 'a -> int) -> 'a option -> 'a option -> int

val to_result : none:'e -> 'a option -> ('a, 'e) Pervasives.result

val to_list : 'a option -> 'a list

val (>>=) : 'a option -> ('a -> 'b option) -> 'b option

val (>>|) : 'a option -> ('a -> 'b) -> 'b option

val first_some : 'a option -> 'a option -> 'a option

val pp : 
  ?default:string ->
  (Format.formatter -> 'a -> unit) ->
  Format.formatter ->
  'a option ->
  unit