555d26aa61
TODO: support foldl/foldr and binders
11 lines
252 B
Text
11 lines
252 B
Text
-- BEGINWAIT
|
|
-- ENDWAIT
|
|
-- BEGINFINDP STALE
|
|
false|Prop
|
|
false.rec|∀ (C : Prop), false → C
|
|
false_elim|false → ?c
|
|
not_false_trivial|¬ false
|
|
true_ne_false|¬ true = false
|
|
p_ne_false|?p → ?p ≠ false
|
|
eq_false_elim|?a = false → ¬ ?a
|
|
-- ENDFINDP
|