mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-12-22 03:01:31 +03:00
8 lines
260 B
Plaintext
8 lines
260 B
Plaintext
|
1/1: Building IEdit (IEdit.idr)
|
||
|
|
Main> natElim p x f 0 = x
|
||
|
|
natElim p x f (S k) = f k (natElim p x f k)
|
||
|
|
Main> f k (natElim2 p x f k)
|
||
|
|
Main> listElim p mnil mcons [] = mnil
|
||
|
|
listElim p mnil mcons (x :: xs) = mcons x xs (listElim p mnil mcons xs)
|
||
|
|
Main> Bye for now!
|