Module `Patterns.Half_simple`

type view = [

| Ocaml_typing.Patterns.Simple.view
| `Or of Ocaml_typing.Typedtree.pattern * Ocaml_typing.Typedtree.pattern * Ocaml_typing.Types.row_desc option

]

type pattern =
  Ocaml_typing.Patterns.Half_simple.view Ocaml_typing.Typedtree.pattern_data