type t =
| Pident of Ident.t
| Pdot of t * string
| Papply of t * t
val same : t -> t -> bool
val compare : t -> t -> int
val exists_free : Ident.t list -> t -> bool
val flatten : t -> [ `Contains_apply | `Ok of Ident.t * string list ]
val name : ?paren:(string -> bool) -> t -> string
val is_uident : string -> bool
type typath =
| Regular of t
| Ext of t * string
| LocalExt of Ident.t
| Cstr of t * string
val constructor_typath : t -> typath
val is_constructor_typath : t -> bool