Idris2/tests/idris2/interactive011/expected

8 lines
260 B
Plaintext
Raw Normal View History

1/1: Building IEdit (IEdit.idr)
Main> natElim p y f 0 = y
natElim p y f (S k) = f k (natElim p y 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!