*)
val empty_ugraph: universe_graph
+(* an universe that does nothing: i.e. no constraints are kept, no merges.. *)
+val oblivion_ugraph: universe_graph
+
(*
These are the real functions to add eq/ge/gt constraints
to the passed graph, returning an updated graph or raising
val add_gt:
?fast:bool -> universe -> universe -> universe_graph -> universe_graph
+val do_rank: universe_graph -> unit
+val get_rank: universe -> int
+
(*
debug function to print the graph to standard error
*)
val get_spent_time: unit -> float
val reset_spent_time: unit -> unit
+val is_anon: universe -> bool