8 lines
114 B
Plaintext
Raw Normal View History

2020-02-06 11:47:41 +01:00
type coin = | Head | Tail;
let flip = (c : coin) : coin =>
switch (c) {
| Head => Tail
| Tail => Head
};