---

Step * of Lemma exp-ratio_wf

∀[a:ℕ]. ∀[b:{a + 1...}]. ∀[k:ℕ].
  ∀c:{n:ℕ| k * a^n < b^n} . ∀n:ℕ.  ((n ≤ c) ⇒ (exp-ratio(a;b;n;k * a^n;b^n) ∈ {n:ℕ| k * a^n < b^n} ))
BY
{ ((UnivCD THENA Auto)⋅
   THEN Assert ⌜∀d:ℕ. ((d ≤ c) ⇒ (exp-ratio(a;b;c - d;k * a^(c - d);b^(c - d)) ∈ {n:ℕ| k * a^n < b^n} ))⌝⋅
   ) }

1
.....assertion..... 
1. a : ℕ
2. b : {a + 1...}
3. k : ℕ
4. c : {n:ℕ| k * a^n < b^n} 
5. n : ℕ
6. n ≤ c
⊢ ∀d:ℕ. ((d ≤ c) ⇒ (exp-ratio(a;b;c - d;k * a^(c - d);b^(c - d)) ∈ {n:ℕ| k * a^n < b^n} ))

2
1. a : ℕ
2. b : {a + 1...}
3. k : ℕ
4. c : {n:ℕ| k * a^n < b^n} 
5. n : ℕ
6. n ≤ c
7. ∀d:ℕ. ((d ≤ c) ⇒ (exp-ratio(a;b;c - d;k * a^(c - d);b^(c - d)) ∈ {n:ℕ| k * a^n < b^n} ))
⊢ exp-ratio(a;b;n;k * a^n;b^n) ∈ {n:ℕ| k * a^n < b^n} 

---

Latex:

---

Latex:
\mforall{}[a:\mBbbN{}].  \mforall{}[b:\{a  +  1...\}].  \mforall{}[k:\mBbbN{}].
    \mforall{}c:\{n:\mBbbN{}|  k  *  a\^{}n  <  b\^{}n\}  .  \mforall{}n:\mBbbN{}.    ((n  \mleq{}  c)  {}\mRightarrow{}  (exp-ratio(a;b;n;k  *  a\^{}n;b\^{}n)  \mmember{}  \{n:\mBbbN{}|  k  *  a\^{}n  <  b\^{}n\}  \000C))


By

---

Latex:
((UnivCD  THENA  Auto)\mcdot{}
  THEN  Assert  \mkleeneopen{}\mforall{}d:\mBbbN{}
                                ((d  \mleq{}  c)  {}\mRightarrow{}  (exp-ratio(a;b;c  -  d;k  *  a\^{}(c  -  d);b\^{}(c  -  d))  \mmember{}  \{n:\mBbbN{}|  k  *  a\^{}n  <  b\^{}n\}  ))\mkleeneclose{}\000C\mcdot{}
  )

---

Home Index