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