Idris2/tests/idris2/perror015/ParseWith.idr

5 lines
56 B
Idris
Raw Normal View History

foo : Nat -> Nat
foo a with a
_ | 0 = a
_ | S k = a