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