Previous  Up  Next

Module Raw_mixture

module Raw_mixture: sig .. end
type internal = int option 
type link =
| FREE
| VAL of int 
type agent = {
   a_type : int;
   a_ports : link array;
   a_ints : internal array;
} 
type t = agent list 
val print : created:bool ->
       ?sigs:Signature.s -> Format.formatter -> t -> unit
val to_json : t -> Yojson.Basic.json
val of_json : Yojson.Basic.json -> t
type incr_t = {
   father : int Mods.DynArray.t;
   rank : (int * (bool * bool)) Mods.DynArray.t;
} 
val union_find_counters : Signature.s option -> t -> incr_t
val find : incr_t -> int -> int
val union : incr_t -> int -> int -> unit
val create : int -> incr_t