compilation/flap/tests/03-Typing/46-pattern-matching-10.bad.typing.hopix.human-readable

type p<`a, `b> = P(`a, `b)

let x : int = match (P<int, int>(22, 33)) {
  P<int, int>((x : int), (_ : int)) & P<int, int>((_ : int), (x : int)) -> x + x
}