Step * 1 of Lemma equipollent-add


1. : ℕ@i
2. : ℕ@i
3. a1 : ℕ+ ℕb@i
4. a2 : ℕ+ ℕb@i
5. case a1 of inl(x) => inr(y) => case a2 of inl(x) => inr(y) => y ∈ ℕb@i
⊢ a1 a2 ∈ (ℕ+ ℕb)
BY
((DVar `a1' THEN DVar `a2') THEN All Reduce THEN Auto' THEN EqCD THEN Auto') }


Latex:


Latex:

1.  a  :  \mBbbN{}@i
2.  b  :  \mBbbN{}@i
3.  a1  :  \mBbbN{}a  +  \mBbbN{}b@i
4.  a2  :  \mBbbN{}a  +  \mBbbN{}b@i
5.  case  a1  of  inl(x)  =>  x  |  inr(y)  =>  a  +  y  =  case  a2  of  inl(x)  =>  x  |  inr(y)  =>  a  +  y@i
\mvdash{}  a1  =  a2


By


Latex:
((DVar  `a1'  THEN  DVar  `a2')  THEN  All  Reduce  THEN  Auto'  THEN  EqCD  THEN  Auto')




Home Index