---

Step * 2 of Lemma equipollent-exp

.....upcase..... 
1. n : ℤ
2. [%1] : 0 < n
3. ∀b:ℕ. ℕn - 1 ⟶ ℕb ~ ℕb^(n - 1)
⊢ ∀b:ℕ. ℕn ⟶ ℕb ~ ℕb^n
BY
{ (Unfold `exp` 0
   THEN (RWO "primrec-unroll" 0 THENA Auto)
   THEN SplitOnConclITE
   THEN Auto
   THEN Reduce 0
   THEN Fold `exp` 0) }

1
1. n : ℤ
2. [%1] : 0 < n
3. ∀b:ℕ. ℕn - 1 ⟶ ℕb ~ ℕb^(n - 1)
4. 1 ≤ n
5. b : ℕ
⊢ ℕn ⟶ ℕb ~ ℕb * b^(n - 1)

---

Latex:

---

Latex:
.....upcase..... 
1.  n  :  \mBbbZ{}
2.  [\%1]  :  0  <  n
3.  \mforall{}b:\mBbbN{}.  \mBbbN{}n  -  1  {}\mrightarrow{}  \mBbbN{}b  \msim{}  \mBbbN{}b\^{}(n  -  1)
\mvdash{}  \mforall{}b:\mBbbN{}.  \mBbbN{}n  {}\mrightarrow{}  \mBbbN{}b  \msim{}  \mBbbN{}b\^{}n


By

---

Latex:
(Unfold  `exp`  0
  THEN  (RWO  "primrec-unroll"  0  THENA  Auto)
  THEN  SplitOnConclITE
  THEN  Auto
  THEN  Reduce  0
  THEN  Fold  `exp`  0)

---

Home Index