Module Defcaus
Type definitions.
type tc_scheme = {typ_vars : t list;typ_rel : (t * t list) list;typ : tc;
}and tc = | Cfun of tc * tc| Cproduct of tc list| Catom of t
and t = {mutable c_desc : desc;mutable c_level : int;mutable c_index : int;mutable c_inf : t list;mutable c_sup : t list;mutable c_useful : bool;mutable c_polarity : polarity;mutable c_info : info option;mutable c_visited : int;
}and desc = | Cvar| Clink of t
and polarity = | Punknown| Pplus| Pminus| Pplusminus
val compare : t -> t -> int