sig
  val mk :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs ->
    Ast_404.Parsetree.pattern_desc -> Ast_404.Parsetree.pattern
  val attr :
    Ast_404.Parsetree.pattern ->
    Ast_404.Parsetree.attribute -> Ast_404.Parsetree.pattern
  val any :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs -> unit -> Ast_404.Parsetree.pattern
  val var :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs -> Ast_404.??.str -> Ast_404.Parsetree.pattern
  val alias :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs ->
    Ast_404.Parsetree.pattern -> Ast_404.??.str -> Ast_404.Parsetree.pattern
  val constant :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs ->
    Ast_404.Parsetree.constant -> Ast_404.Parsetree.pattern
  val interval :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs ->
    Ast_404.Parsetree.constant ->
    Ast_404.Parsetree.constant -> Ast_404.Parsetree.pattern
  val tuple :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs ->
    Ast_404.Parsetree.pattern list -> Ast_404.Parsetree.pattern
  val construct :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs ->
    Ast_404.??.lid ->
    Ast_404.Parsetree.pattern option -> Ast_404.Parsetree.pattern
  val variant :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs ->
    Ast_404.Asttypes.label ->
    Ast_404.Parsetree.pattern option -> Ast_404.Parsetree.pattern
  val record :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs ->
    (Ast_404.??.lid * Ast_404.Parsetree.pattern) list ->
    Ast_404.Asttypes.closed_flag -> Ast_404.Parsetree.pattern
  val array :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs ->
    Ast_404.Parsetree.pattern list -> Ast_404.Parsetree.pattern
  val or_ :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs ->
    Ast_404.Parsetree.pattern ->
    Ast_404.Parsetree.pattern -> Ast_404.Parsetree.pattern
  val constraint_ :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs ->
    Ast_404.Parsetree.pattern ->
    Ast_404.Parsetree.core_type -> Ast_404.Parsetree.pattern
  val type_ :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs -> Ast_404.??.lid -> Ast_404.Parsetree.pattern
  val lazy_ :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs ->
    Ast_404.Parsetree.pattern -> Ast_404.Parsetree.pattern
  val unpack :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs -> Ast_404.??.str -> Ast_404.Parsetree.pattern
  val open_ :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs ->
    Ast_404.??.lid -> Ast_404.Parsetree.pattern -> Ast_404.Parsetree.pattern
  val exception_ :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs ->
    Ast_404.Parsetree.pattern -> Ast_404.Parsetree.pattern
  val extension :
    ?loc:Ast_404.??.loc ->
    ?attrs:Ast_404.??.attrs ->
    Ast_404.Parsetree.extension -> Ast_404.Parsetree.pattern
end