Step
*
1
2
of Lemma
band-sqequal-inl
1. a : Base
2. b : Base
3. c : Base
4. a ∧b b ~ inl c
5. (a ∧b b)↓
6. a ∈ Top + Top
7. a ~ inl outl(a)
⊢ b ~ inl outl(b)
BY
{ (HypSubst (-1) (-4) THEN RepUR ``band`` -4 THEN (HypSubst' (-4) 0 THEN RepUR ``outl`` 0) THEN Auto) }
Latex:
Latex:
1.  a  :  Base
2.  b  :  Base
3.  c  :  Base
4.  a  \mwedge{}\msubb{}  b  \msim{}  inl  c
5.  (a  \mwedge{}\msubb{}  b)\mdownarrow{}
6.  a  \mmember{}  Top  +  Top
7.  a  \msim{}  inl  outl(a)
\mvdash{}  b  \msim{}  inl  outl(b)
By
Latex:
(HypSubst  (-1)  (-4)  THEN  RepUR  ``band``  -4  THEN  (HypSubst'  (-4)  0  THEN  RepUR  ``outl``  0)  THEN  Auto)
Home
Index