unison/unison-src/tests/344.uu
2021-08-24 11:33:27 -07:00

6 lines
144 B
Plaintext

structural ability Either a b where
left : a -> {Either a b} ()
right : b -> {Either a b} ()
structural type Either a b = Left a | Right b