mirror of
https://github.com/unisonweb/unison.git
synced 2024-10-04 21:57:25 +03:00
6 lines
68 B
Plaintext
6 lines
68 B
Plaintext
r4 : Int -> Int
|
|
r4 x = case x of
|
|
+1 -> -1
|
|
_ -> Int.negate x
|
|
()
|