Step
*
of Lemma
band-to-and
∀[a,b:𝔹].  {(a ~ tt) ∧ (b ~ tt)} supposing a ∧b b ~ tt
BY
{ (RepeatFor 2 ((D 0 THENA Auto)) THEN Unfold `guard` 0 THEN AutoBoolCase ⌜a⌝⋅ THEN AutoBoolCase ⌜b⌝⋅) }
Latex:
Latex:
\mforall{}[a,b:\mBbbB{}].    \{(a  \msim{}  tt)  \mwedge{}  (b  \msim{}  tt)\}  supposing  a  \mwedge{}\msubb{}  b  \msim{}  tt
By
Latex:
(RepeatFor  2  ((D  0  THENA  Auto))  THEN  Unfold  `guard`  0  THEN  AutoBoolCase  \mkleeneopen{}a\mkleeneclose{}\mcdot{}  THEN  AutoBoolCase  \mkleeneopen{}b\mkleeneclose{}\mcdot{})
Home
Index