mirror of
https://github.com/unisonweb/unison.git
synced 2024-09-23 16:28:02 +03:00
12 lines
88 B
Plaintext
12 lines
88 B
Plaintext
r9 : Nat
|
|
r9 = match 1 with
|
|
9 -> 9
|
|
8 -> 8
|
|
7 -> 7
|
|
6 -> 6
|
|
5 -> 5
|
|
_ -> 1
|
|
|
|
> r9
|
|
|