mirror of
https://github.com/edwinb/Idris2-boot.git
synced 2024-12-18 18:31:43 +03:00
7 lines
166 B
Idris
7 lines
166 B
Idris
foo : Nat -> Nat -> Bool
|
|
foo x y with (x == y)
|
|
foo x y | True with (y == x)
|
|
foo x y | True | False | 10 = x
|
|
foo x y | True | True = x
|
|
foo x y | False = y
|