2014-09-15 23:07:23 +00:00
|
|
|
-- BEGINSET
|
|
|
|
|
-- ENDSET
|
|
|
|
|
-- BEGINWAIT
|
|
|
|
|
-- ENDWAIT
|
|
|
|
|
-- BEGINFINDP
|
2015-03-07 03:20:48 +00:00
|
|
|
bool.bor_tt|∀ (a : bool), eq (bool.bor a bool.tt) bool.tt
|
|
|
|
|
bool.band_tt|∀ (a : bool), eq (bool.band a bool.tt) a
|
2014-09-15 23:07:23 +00:00
|
|
|
bool.tt|bool
|
2015-07-06 22:05:01 +00:00
|
|
|
bool.eq_tt_of_bnot_eq_ff|eq (bool.bnot ?a) bool.ff → eq ?a bool.tt
|
|
|
|
|
bool.eq_ff_of_bnot_eq_tt|eq (bool.bnot ?a) bool.tt → eq ?a bool.ff
|
2015-04-29 00:20:39 +00:00
|
|
|
tactic.lettac|tactic.identifier → tactic.expr → tactic
|
2015-03-05 02:05:12 +00:00
|
|
|
bool.absurd_of_eq_ff_of_eq_tt|eq ?a bool.ff → eq ?a bool.tt → ?B
|
|
|
|
|
bool.eq_tt_of_ne_ff|ne ?a bool.ff → eq ?a bool.tt
|
2015-03-07 03:20:48 +00:00
|
|
|
bool.tt_band|∀ (a : bool), eq (bool.band bool.tt a) a
|
|
|
|
|
bool.cond_tt|∀ (t e : ?A), eq (bool.cond bool.tt t e) t
|
2015-03-29 19:41:46 +00:00
|
|
|
bool.ff_ne_tt|eq bool.ff bool.tt → false
|
2015-03-05 02:05:12 +00:00
|
|
|
bool.eq_ff_of_ne_tt|ne ?a bool.tt → eq ?a bool.ff
|
2015-03-07 03:20:48 +00:00
|
|
|
bool.tt_bor|∀ (a : bool), eq (bool.bor bool.tt a) bool.tt
|
2014-09-15 23:07:23 +00:00
|
|
|
-- ENDFINDP
|
|
|
|
|
-- BEGINWAIT
|
|
|
|
|
-- ENDWAIT
|
|
|
|
|
-- BEGINFINDP
|
|
|
|
|
tt|bool
|
2015-03-07 03:20:48 +00:00
|
|
|
tt_bor|∀ (a : bool), eq (bor tt a) tt
|
|
|
|
|
tt_band|∀ (a : bool), eq (band tt a) a
|
|
|
|
|
bor_tt|∀ (a : bool), eq (bor a tt) tt
|
|
|
|
|
band_tt|∀ (a : bool), eq (band a tt) a
|
2015-07-06 22:05:01 +00:00
|
|
|
eq_tt_of_bnot_eq_ff|eq (bnot ?a) ff → eq ?a tt
|
|
|
|
|
eq_ff_of_bnot_eq_tt|eq (bnot ?a) tt → eq ?a ff
|
2015-04-29 00:20:39 +00:00
|
|
|
tactic.lettac|tactic.identifier → tactic.expr → tactic
|
2015-03-05 02:05:12 +00:00
|
|
|
absurd_of_eq_ff_of_eq_tt|eq ?a ff → eq ?a tt → ?B
|
|
|
|
|
eq_tt_of_ne_ff|ne ?a ff → eq ?a tt
|
2015-03-07 03:20:48 +00:00
|
|
|
cond_tt|∀ (t e : ?A), eq (cond tt t e) t
|
2015-03-29 19:41:46 +00:00
|
|
|
ff_ne_tt|eq ff tt → false
|
2015-03-05 02:05:12 +00:00
|
|
|
eq_ff_of_ne_tt|ne ?a tt → eq ?a ff
|
2014-09-15 23:07:23 +00:00
|
|
|
-- ENDFINDP
|
