unison/unison-src/tests/r4negate.u
2020-02-07 18:59:37 -08:00

6 lines
69 B
Plaintext

r4 : Int -> Int
r4 x = match x with
+1 -> -1
_ -> Int.negate x