Step * 2 1 1 1 1 1 of Lemma equipollent-exp


1. : ℤ
2. 0 < n
3. ∀b:ℕ. ℕ1 ⟶ ℕ~ ℕb^(n 1)
4. 1 ≤ n
5. : ℕ
6. a1 : ℕn ⟶ ℕb
7. a2 : ℕn ⟶ ℕb
8. (a1 (n 1)) (a2 (n 1)) ∈ ℕb
9. a1 a2 ∈ (ℕ1 ⟶ ℕb)
⊢ a1 a2 ∈ (ℕn ⟶ ℕb)
BY
((((Ext THENM Decide (n 1) ∈ ℤTHENA Auto) THENL [HypSubst' (-1) 0; EquationFromHyp (-3)]) THEN Auto) }


Latex:


Latex:

1.  n  :  \mBbbZ{}
2.  0  <  n
3.  \mforall{}b:\mBbbN{}.  \mBbbN{}n  -  1  {}\mrightarrow{}  \mBbbN{}b  \msim{}  \mBbbN{}b\^{}(n  -  1)
4.  1  \mleq{}  n
5.  b  :  \mBbbN{}
6.  a1  :  \mBbbN{}n  {}\mrightarrow{}  \mBbbN{}b
7.  a2  :  \mBbbN{}n  {}\mrightarrow{}  \mBbbN{}b
8.  (a1  (n  -  1))  =  (a2  (n  -  1))
9.  a1  =  a2
\mvdash{}  a1  =  a2


By


Latex:
((((Ext  THENM  Decide  x  =  (n  -  1))  THENA  Auto)  THENL  [HypSubst'  (-1)  0;  EquationFromHyp  (-3)])
  THEN  Auto
  )




Home Index