Patterns.Half_simple
type view = [
|
Simple.view
`Or((Typedtree.pattern, Typedtree.pattern, option(Types.row_desc)))
];
type pattern = Typedtree.pattern_data(view);