val access2 : loc:loc -> string -> string -> tval sprintf : loc:loc -> ('a, unit, string, t) format4 -> 'aval ident : loc:loc -> string -> tval var : loc:loc -> string -> tval string : loc:loc -> tval pair : loc:loc -> t -> t -> tval tuple : loc:loc -> t list -> tval arrow : loc:loc -> t -> t -> tval chain_arrow : loc:loc -> t list -> tval variant_of_t : loc:loc -> t -> tval alias : loc:loc -> t -> string -> tval poly : loc:loc -> string list -> t -> tval map : onvar:(string -> t option) -> t -> tval openize : loc:loc -> ?as_:string -> t -> t