sig
  val mk :
    ?loc:Ast_403.??.loc ->
    ?attrs:Ast_403.??.attrs ->
    Ast_403.Parsetree.core_type_desc -> Ast_403.Parsetree.core_type
  val attr :
    Ast_403.Parsetree.core_type ->
    Ast_403.Parsetree.attribute -> Ast_403.Parsetree.core_type
  val any :
    ?loc:Ast_403.??.loc ->
    ?attrs:Ast_403.??.attrs -> unit -> Ast_403.Parsetree.core_type
  val var :
    ?loc:Ast_403.??.loc ->
    ?attrs:Ast_403.??.attrs -> string -> Ast_403.Parsetree.core_type
  val arrow :
    ?loc:Ast_403.??.loc ->
    ?attrs:Ast_403.??.attrs ->
    Ast_403.Asttypes.arg_label ->
    Ast_403.Parsetree.core_type ->
    Ast_403.Parsetree.core_type -> Ast_403.Parsetree.core_type
  val tuple :
    ?loc:Ast_403.??.loc ->
    ?attrs:Ast_403.??.attrs ->
    Ast_403.Parsetree.core_type list -> Ast_403.Parsetree.core_type
  val constr :
    ?loc:Ast_403.??.loc ->
    ?attrs:Ast_403.??.attrs ->
    Ast_403.??.lid ->
    Ast_403.Parsetree.core_type list -> Ast_403.Parsetree.core_type
  val object_ :
    ?loc:Ast_403.??.loc ->
    ?attrs:Ast_403.??.attrs ->
    (string * Ast_403.Parsetree.attributes * Ast_403.Parsetree.core_type)
    list -> Ast_403.Asttypes.closed_flag -> Ast_403.Parsetree.core_type
  val class_ :
    ?loc:Ast_403.??.loc ->
    ?attrs:Ast_403.??.attrs ->
    Ast_403.??.lid ->
    Ast_403.Parsetree.core_type list -> Ast_403.Parsetree.core_type
  val alias :
    ?loc:Ast_403.??.loc ->
    ?attrs:Ast_403.??.attrs ->
    Ast_403.Parsetree.core_type -> string -> Ast_403.Parsetree.core_type
  val variant :
    ?loc:Ast_403.??.loc ->
    ?attrs:Ast_403.??.attrs ->
    Ast_403.Parsetree.row_field list ->
    Ast_403.Asttypes.closed_flag ->
    Ast_403.Asttypes.label list option -> Ast_403.Parsetree.core_type
  val poly :
    ?loc:Ast_403.??.loc ->
    ?attrs:Ast_403.??.attrs ->
    string list -> Ast_403.Parsetree.core_type -> Ast_403.Parsetree.core_type
  val package :
    ?loc:Ast_403.??.loc ->
    ?attrs:Ast_403.??.attrs ->
    Ast_403.??.lid ->
    (Ast_403.??.lid * Ast_403.Parsetree.core_type) list ->
    Ast_403.Parsetree.core_type
  val extension :
    ?loc:Ast_403.??.loc ->
    ?attrs:Ast_403.??.attrs ->
    Ast_403.Parsetree.extension -> Ast_403.Parsetree.core_type
  val force_poly : Ast_403.Parsetree.core_type -> Ast_403.Parsetree.core_type
end