val ident : loc:loc -> string -> tval sprintf : loc:loc -> ('a, unit, string, t) format4 -> 'aval access : loc:loc -> string -> string -> tval int_const : loc:loc -> int -> tval string_const : loc:loc -> string -> tval app : loc:loc -> t -> t -> tval app_lab : loc:loc -> t -> string -> t -> tval app_list : loc:loc -> t -> t list -> tval fun_list_l : loc:loc -> (string * t) list -> t -> tval send : loc:loc -> t -> string -> tval variant : loc:loc -> string -> t list -> tval tuple : loc:loc -> t list -> tval let_one : loc:loc -> ?rec_:bool -> Pat.t -> t -> t -> tval let_ : loc:loc -> ?rec_:bool -> (Pat.t * t) list -> t -> tval assert_false : loc:loc -> tval objmagic_unit : loc:loc -> tval failwith_ : loc:loc -> string -> tval false_ : loc:loc -> tval list : loc:loc -> t list -> t