Parameter Make.5-G
type ttype l= R.label
val init : int -> Base.Predicate.t list -> tval states : t -> (int * Big.t) Base.H_int.tval label : t -> Base.S_predicate.t * int Base.H_predicate.tval edges : t -> (int * l * string) Base.H_int.tval string_of_l : l -> string