mirror of
https://github.com/edwinb/Idris2-boot.git
synced 2024-12-19 10:51:35 +03:00
8 lines
269 B
Plaintext
8 lines
269 B
Plaintext
|
1/1: Building IEdit (IEdit.lidr)
|
||
|
|
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!
|