compilation/flap/tests/03-Typing/45-pattern-matching-09.bad.typing.hopix.human-readable

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

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