compilation/flap/tests/03-Typing/43-pattern-matching-07.bad.typing.hopix.human-readable

type or<`a, `b> = Left(`a) | Right(`b)

let x : int = match (Left<int, int>(22)) {
  Left<int, string>((x : int)) | Right<int, int>((x : int)) -> x
}