---

Step * 2 of Lemma i-member-iff


1. y : ℝ
2. y1 : Top
3. r : ℝ
4. b : ℕ+
5. r(-b) ≤ r
6. r ≤ r(b)
7. m : ℕ+
8. y ≤ (r - (r1/r(m)))
⊢ ∃n:ℕ+. (((y + (r1/r(n))) ≤ r) ∧ (r ≤ r(n)))
BY
{ ((Assert (1 ≤ imax(b;m)) ∧ (b ≤ imax(b;m)) ∧ (m ≤ imax(b;m)) BY
          Auto)
   THEN D -1
   THEN (MoveToConcl (-1))
   THEN ((GenConclAtAddrType ⌜ℕ+⌝ [1; 1; 2])⋅ THENA Auto)
   THEN (Thin (-1))
   THEN (RenameVar `k' (-1))
   THEN (Thin (-2))
   THEN Auto
   THEN (InstConcl [⌜k⌝])⋅
   THEN Auto)⋅ }

1
1. y : ℝ
2. y1 : Top
3. r : ℝ
4. b : ℕ+
5. r(-b) ≤ r
6. r ≤ r(b)
7. m : ℕ+
8. y ≤ (r - (r1/r(m)))
9. k : ℕ+
10. b ≤ k
11. m ≤ k
⊢ (y + (r1/r(k))) ≤ r

2
1. y : ℝ
2. y1 : Top
3. r : ℝ
4. b : ℕ+
5. r(-b) ≤ r
6. r ≤ r(b)
7. m : ℕ+
8. y ≤ (r - (r1/r(m)))
9. k : ℕ+
10. b ≤ k
11. m ≤ k
12. (y + (r1/r(k))) ≤ r
⊢ r ≤ r(k)

---

Latex:

---

Latex:

1.  y  :  \mBbbR{}
2.  y1  :  Top
3.  r  :  \mBbbR{}
4.  b  :  \mBbbN{}\msupplus{}
5.  r(-b)  \mleq{}  r
6.  r  \mleq{}  r(b)
7.  m  :  \mBbbN{}\msupplus{}
8.  y  \mleq{}  (r  -  (r1/r(m)))
\mvdash{}  \mexists{}n:\mBbbN{}\msupplus{}.  (((y  +  (r1/r(n)))  \mleq{}  r)  \mwedge{}  (r  \mleq{}  r(n)))


By

---

Latex:
((Assert  (1  \mleq{}  imax(b;m))  \mwedge{}  (b  \mleq{}  imax(b;m))  \mwedge{}  (m  \mleq{}  imax(b;m))  BY
                Auto)
  THEN  D  -1
  THEN  (MoveToConcl  (-1))
  THEN  ((GenConclAtAddrType  \mkleeneopen{}\mBbbN{}\msupplus{}\mkleeneclose{}  [1;  1;  2])\mcdot{}  THENA  Auto)
  THEN  (Thin  (-1))
  THEN  (RenameVar  `k'  (-1))
  THEN  (Thin  (-2))
  THEN  Auto
  THEN  (InstConcl  [\mkleeneopen{}k\mkleeneclose{}])\mcdot{}
  THEN  Auto)\mcdot{}

---

Home Index