---

Step * 2 1 1 2 1 1 1 of Lemma least-upper-bound


1. [A] : {A:ℝ ⟶ ℙ| ∀x,y:ℝ.  ((x = y) ⇒ (A x) ⇒ (A y))} 
2. ∀x,y:ℝ.  ((x < y) ⇒ ((∃a:ℝ. ((A a) ∧ (x < a))) ∨ A ≤ y))
3. a : ℝ
4. b : ℝ
5. A a
6. A < b
7. a < b
⊢ ∃a',b':ℝ
   (((a' < b') ∧ (a < a') ∧ (b' < b)) ∧ ((b - a') = ((b - a) * (r(2)/r(3)))) ∧ ((b' - a) = ((b - a) * (r(2)/r(3)))))
BY
{ ((InstConcl [⌜a + ((b - a) * (r1/r(3)))⌝; ⌜b - (b - a) * (r1/r(3))⌝])⋅ THEN Auto THEN nRMul ⌜r(3)⌝ 0⋅ THEN Auto) }

---

Latex:

---

Latex:

1.  [A]  :  \{A:\mBbbR{}  {}\mrightarrow{}  \mBbbP{}|  \mforall{}x,y:\mBbbR{}.    ((x  =  y)  {}\mRightarrow{}  (A  x)  {}\mRightarrow{}  (A  y))\} 
2.  \mforall{}x,y:\mBbbR{}.    ((x  <  y)  {}\mRightarrow{}  ((\mexists{}a:\mBbbR{}.  ((A  a)  \mwedge{}  (x  <  a)))  \mvee{}  A  \mleq{}  y))
3.  a  :  \mBbbR{}
4.  b  :  \mBbbR{}
5.  A  a
6.  A  <  b
7.  a  <  b
\mvdash{}  \mexists{}a',b':\mBbbR{}
      (((a'  <  b')  \mwedge{}  (a  <  a')  \mwedge{}  (b'  <  b))
      \mwedge{}  ((b  -  a')  =  ((b  -  a)  *  (r(2)/r(3))))
      \mwedge{}  ((b'  -  a)  =  ((b  -  a)  *  (r(2)/r(3)))))


By

---

Latex:
((InstConcl  [\mkleeneopen{}a  +  ((b  -  a)  *  (r1/r(3)))\mkleeneclose{};  \mkleeneopen{}b  -  (b  -  a)  *  (r1/r(3))\mkleeneclose{}])\mcdot{}
  THEN  Auto
  THEN  nRMul  \mkleeneopen{}r(3)\mkleeneclose{}  0\mcdot{}
  THEN  Auto)

---

Home Index