Step
*
2
1
1
1
1
1
of Lemma
equipollent-exp
1. n : ℤ
2. 0 < n
3. ∀b:ℕ. ℕn - 1 ⟶ ℕb ~ ℕb^(n - 1)
4. 1 ≤ n
5. b : ℕ
6. a1 : ℕn ⟶ ℕb
7. a2 : ℕn ⟶ ℕb
8. (a1 (n - 1)) = (a2 (n - 1)) ∈ ℕb
9. a1 = a2 ∈ (ℕn - 1 ⟶ ℕb)
⊢ a1 = a2 ∈ (ℕn ⟶ ℕb)
BY
{ ((((Ext THENM Decide x = (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