---

Step * 1 1 2 1 2 1 1 of Lemma equipollent-nat-rationals

.....assertion..... 
1. L : (ℤ × ℕ+) List
2. 0 < ||[1 / map(λp.(snd(p));L)]||
3. 0 ≤ imax-list([1 / map(λp.(snd(p));L)])
4. ↑is-qrep(<1, imax-list([1 / map(λp.(snd(p));L)]) + 1>)
5. i : ℕ
6. i < ||L||
7. <1, imax-list([1 / map(λp.(snd(p));L)]) + 1> = L[i] ∈ (ℤ × ℕ+)
8. y1 : ℤ
9. y2 : ℕ+
10. (<y1, y2> ∈ L)
11. (imax-list([1 / map(λp.(snd(p));L)]) + 1) = y2 ∈ ℕ+
⊢ y2 ≤ imax-list([1 / map(λp.(snd(p));L)])
BY
{ (BLemma `imax-list-ub` THEN Auto) }

1
1. L : (ℤ × ℕ+) List
2. 0 < ||[1 / map(λp.(snd(p));L)]||
3. 0 ≤ imax-list([1 / map(λp.(snd(p));L)])
4. ↑is-qrep(<1, imax-list([1 / map(λp.(snd(p));L)]) + 1>)
5. i : ℕ
6. i < ||L||
7. <1, imax-list([1 / map(λp.(snd(p));L)]) + 1> = L[i] ∈ (ℤ × ℕ+)
8. y1 : ℤ
9. y2 : ℕ+
10. (<y1, y2> ∈ L)
11. (imax-list([1 / map(λp.(snd(p));L)]) + 1) = y2 ∈ ℕ+
⊢ (∃b∈[1 / map(λp.(snd(p));L)]. y2 ≤ b)

---

Latex:

---

Latex:
.....assertion..... 
1.  L  :  (\mBbbZ{}  \mtimes{}  \mBbbN{}\msupplus{})  List
2.  0  <  ||[1  /  map(\mlambda{}p.(snd(p));L)]||
3.  0  \mleq{}  imax-list([1  /  map(\mlambda{}p.(snd(p));L)])
4.  \muparrow{}is-qrep(ə,  imax-list([1  /  map(\mlambda{}p.(snd(p));L)])  +  1>)
5.  i  :  \mBbbN{}
6.  i  <  ||L||
7.  ə,  imax-list([1  /  map(\mlambda{}p.(snd(p));L)])  +  1>  =  L[i]
8.  y1  :  \mBbbZ{}
9.  y2  :  \mBbbN{}\msupplus{}
10.  (<y1,  y2>  \mmember{}  L)
11.  (imax-list([1  /  map(\mlambda{}p.(snd(p));L)])  +  1)  =  y2
\mvdash{}  y2  \mleq{}  imax-list([1  /  map(\mlambda{}p.(snd(p));L)])


By

---

Latex:
(BLemma  `imax-list-ub`  THEN  Auto)

---

Home Index