mirror of
https://github.com/edwinb/Idris2-boot.git
synced 2024-12-01 06:12:57 +03:00
8 lines
222 B
Plaintext
8 lines
222 B
Plaintext
|
1/1: Building WithLift (WithLift.idr)
|
||
|
|
Main> succNotZero : (S k) = Z -> Void
|
||
|
|
succNotZero
|
||
|
|
Main> recNotEqLift : (k = j -> Void) -> (S k) = (S j) -> Void
|
||
|
|
(recNotEqLift contra)
|
||
|
|
Main> recNotEq f Refl = f Refl
|
||
|
|
Main> Bye for now!
|