Map (mavryk-protocol-alpha.Mavryk_raw_protocol_alpha.Alpha

type key = t

type !+'a t

val empty : 'a t

val is_empty : 'a t -> bool

val mem : key -> 'a t -> bool

val add : key -> 'a -> 'a t -> 'a t

val update : key -> ('a option -> 'a option) -> 'a t -> 'a t

val singleton : key -> 'a -> 'a t

val remove : key -> 'a t -> 'a t

val merge : 
  (key -> 'a option -> 'b option -> 'c option) ->
  'a t ->
  'b t ->
  'c t

val union : (key -> 'a -> 'a -> 'a option) -> 'a t -> 'a t -> 'a t

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

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

val iter : (key -> 'a -> unit) -> 'a t -> unit

val iter_e : 
  (key ->
    'a ->
    (unit, 'trace) Mavryk_protocol_environment_alpha.Pervasives.result) ->
  'a t ->
  (unit, 'trace) Mavryk_protocol_environment_alpha.Pervasives.result

val iter_s : 
  (key -> 'a -> unit Mavryk_protocol_environment_alpha.Lwt.t) ->
  'a t ->
  unit Mavryk_protocol_environment_alpha.Lwt.t

val iter_p : 
  (key -> 'a -> unit Mavryk_protocol_environment_alpha.Lwt.t) ->
  'a t ->
  unit Mavryk_protocol_environment_alpha.Lwt.t

val iter_es : 
  (key ->
    'a ->
    (unit, 'trace) Mavryk_protocol_environment_alpha.Pervasives.result
      Mavryk_protocol_environment_alpha.Lwt.t) ->
  'a t ->
  (unit, 'trace) Mavryk_protocol_environment_alpha.Pervasives.result
    Mavryk_protocol_environment_alpha.Lwt.t

val fold : (key -> 'a -> 'b -> 'b) -> 'a t -> 'b -> 'b

val fold_e : 
  (key ->
    'a ->
    'b ->
    ('b, 'trace) Mavryk_protocol_environment_alpha.Pervasives.result) ->
  'a t ->
  'b ->
  ('b, 'trace) Mavryk_protocol_environment_alpha.Pervasives.result

val fold_s : 
  (key -> 'a -> 'b -> 'b Mavryk_protocol_environment_alpha.Lwt.t) ->
  'a t ->
  'b ->
  'b Mavryk_protocol_environment_alpha.Lwt.t

val fold_es : 
  (key ->
    'a ->
    'b ->
    ('b, 'trace) Mavryk_protocol_environment_alpha.Pervasives.result
      Mavryk_protocol_environment_alpha.Lwt.t) ->
  'a t ->
  'b ->
  ('b, 'trace) Mavryk_protocol_environment_alpha.Pervasives.result
    Mavryk_protocol_environment_alpha.Lwt.t

val for_all : (key -> 'a -> bool) -> 'a t -> bool

val exists : (key -> 'a -> bool) -> 'a t -> bool

val filter : (key -> 'a -> bool) -> 'a t -> 'a t

val filter_map : (key -> 'a -> 'b option) -> 'a t -> 'b t

val partition : (key -> 'a -> bool) -> 'a t -> 'a t * 'a t

val cardinal : 'a t -> int

val bindings : 'a t -> (key * 'a) list

val min_binding : 'a t -> (key * 'a) option

val min_binding_opt : 'a t -> (key * 'a) option

val max_binding : 'a t -> (key * 'a) option

val max_binding_opt : 'a t -> (key * 'a) option

val choose : 'a t -> (key * 'a) option

val choose_opt : 'a t -> (key * 'a) option

val split : key -> 'a t -> 'a t * 'a option * 'a t

val find : key -> 'a t -> 'a option

val find_opt : key -> 'a t -> 'a option

val find_first : (key -> bool) -> 'a t -> (key * 'a) option

val find_first_opt : (key -> bool) -> 'a t -> (key * 'a) option

val find_last : (key -> bool) -> 'a t -> (key * 'a) option

val find_last_opt : (key -> bool) -> 'a t -> (key * 'a) option

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

val mapi : (key -> 'a -> 'b) -> 'a t -> 'b t

val to_seq : 'a t -> (key * 'a) Mavryk_protocol_environment_alpha.Seq.t

val to_rev_seq : 'a t -> (key * 'a) Mavryk_protocol_environment_alpha.Seq.t

val to_seq_from : 
  key ->
  'a t ->
  (key * 'a) Mavryk_protocol_environment_alpha.Seq.t

val add_seq : 
  (key * 'a) Mavryk_protocol_environment_alpha.Seq.t ->
  'a t ->
  'a t

val of_seq : (key * 'a) Mavryk_protocol_environment_alpha.Seq.t -> 'a t

val iter_ep : 
  (key ->
    'a ->
    (unit, 'error Mavryk_protocol_environment_alpha.Error_monad.trace)
      Mavryk_protocol_environment_alpha.Pervasives.result
      Mavryk_protocol_environment_alpha.Lwt.t) ->
  'a t ->
  (unit, 'error Mavryk_protocol_environment_alpha.Error_monad.trace)
    Mavryk_protocol_environment_alpha.Pervasives.result
    Mavryk_protocol_environment_alpha.Lwt.t