# Module Ast_404.Ast_helper.Typ

    module Typ: sig .. end

    val mk : ?loc:Location.t ->
           ?attrs:Ast_404.Parsetree.attributes ->
           Ast_404.Parsetree.core_type_desc -> Ast_404.Parsetree.core_type

    val attr : Ast_404.Parsetree.core_type ->
           Ast_404.Parsetree.attribute -> Ast_404.Parsetree.core_type

    val any : ?loc:Location.t ->
           ?attrs:Ast_404.Parsetree.attributes -> unit -> Ast_404.Parsetree.core_type

    val var : ?loc:Location.t ->
           ?attrs:Ast_404.Parsetree.attributes -> string -> Ast_404.Parsetree.core_type

    val arrow : ?loc:Location.t ->
           ?attrs:Ast_404.Parsetree.attributes ->
           Ast_404.Asttypes.arg_label ->
           Ast_404.Parsetree.core_type ->
           Ast_404.Parsetree.core_type -> Ast_404.Parsetree.core_type

    val tuple : ?loc:Location.t ->
           ?attrs:Ast_404.Parsetree.attributes ->
           Ast_404.Parsetree.core_type list -> Ast_404.Parsetree.core_type

    val constr : ?loc:Location.t ->
           ?attrs:Ast_404.Parsetree.attributes ->
           Longident.t Ast_404.Asttypes.loc ->
           Ast_404.Parsetree.core_type list -> Ast_404.Parsetree.core_type

    val object_ : ?loc:Location.t ->
           ?attrs:Ast_404.Parsetree.attributes ->
           (string * Ast_404.Parsetree.attributes * Ast_404.Parsetree.core_type) list ->
           Ast_404.Asttypes.closed_flag -> Ast_404.Parsetree.core_type

    val class_ : ?loc:Location.t ->
           ?attrs:Ast_404.Parsetree.attributes ->
           Longident.t Ast_404.Asttypes.loc ->
           Ast_404.Parsetree.core_type list -> Ast_404.Parsetree.core_type

    val alias : ?loc:Location.t ->
           ?attrs:Ast_404.Parsetree.attributes ->
           Ast_404.Parsetree.core_type -> string -> Ast_404.Parsetree.core_type

    val variant : ?loc:Location.t ->
           ?attrs:Ast_404.Parsetree.attributes ->
           Ast_404.Parsetree.row_field list ->
           Ast_404.Asttypes.closed_flag ->
           Ast_404.Asttypes.label list option -> Ast_404.Parsetree.core_type

    val poly : ?loc:Location.t ->
           ?attrs:Ast_404.Parsetree.attributes ->
           string list -> Ast_404.Parsetree.core_type -> Ast_404.Parsetree.core_type

    val package : ?loc:Location.t ->
           ?attrs:Ast_404.Parsetree.attributes ->
           Longident.t Ast_404.Asttypes.loc ->
           (Longident.t Ast_404.Asttypes.loc * Ast_404.Parsetree.core_type) list ->
           Ast_404.Parsetree.core_type

    val extension : ?loc:Location.t ->
           ?attrs:Ast_404.Parsetree.attributes ->
           Ast_404.Parsetree.extension -> Ast_404.Parsetree.core_type

    val force_poly : Ast_404.Parsetree.core_type -> Ast_404.Parsetree.core_type