mirror of
https://github.com/edwinb/Idris2-boot.git
synced 2024-12-11 06:41:04 +03:00
8 lines
260 B
Plaintext
8 lines
260 B
Plaintext
1/1: Building IEdit (IEdit.idr)
|
|
Main> natElim p x f Z = 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!
|