unison/unison-src/transcripts/fix1844.md
2021-08-23 14:05:37 -07:00

183 B

structural type One a = One a 
unique type Woot a b c = Woot a b c
unique type Z = Z

snoc k aN = match k with 
  One a0 -> Woot (One a0) (One aN) 99

> snoc (One 1) 2