package grenier

  1. Overview
  2. Docs
type 'a element = private int
module type Set = sig ... end
module Set (X : sig ... end) : Set
type 't set = (module Set with type t = 't)
val cardinal : 'a set -> int
module Element : sig ... end
module type Map = sig ... end
type 'a map = (module Map with type codomain = 'a)
module Map_of_array (A : sig ... end) : Map with type codomain = A.codomain
val iter_map : 'a map -> ('a -> unit) -> unit
val map_of_array : 'a array -> 'a map