---

Step * 1 2 1 2 2 6 1 1 1 of Lemma rational-IVT


1. a : ℝ
2. b : ℝ
3. f : (ℤ × ℕ+) ⟶ (ℤ × ℕ+)
4. g : {x:ℝ| x ∈ [a, b]}  ⟶ ℝ
5. a < b
6. (g[a] * g[b]) < r0
7. ∀x,y:{x:ℝ| x ∈ [a, b]} .  ((x = y) ⇒ (g[x] = g[y]))
8. ∀r:ℤ × ℕ+. ((ratreal(r) ∈ [a, b]) ⇒ (g[ratreal(r)] = ratreal(f[r])))
9. ra : ℤ × ℕ+
10. rb : ℤ × ℕ+
11. a ≤ ratreal(ra)
12. ratreal(ra) ≤ ratreal(rb)
13. ratreal(rb) ≤ b
14. ratreal(ratmul(f[ra];f[rb])) < r0
15. ratreal(f[rb]) ≤ r0
16. r0 ≤ ratreal(f[ra])
17. rational-fun-zero(λ2x.int-rat-mul(-1;f[x]);ra;rb) ∈ ℝ
18. rational-fun-zero(λ2x.int-rat-mul(-1;f[x]);ra;rb) ∈ [ratreal(ra), ratreal(rb)]
19. -(g[rational-fun-zero(λ2x.int-rat-mul(-1;f[x]);ra;rb)]) = r0
20. g[rational-fun-zero(λ2x.int-rat-mul(-1;f[x]);ra;rb)] = r0
⊢ rational-fun-zero(λ2x.int-rat-mul(-1;f[x]);ra;rb) ∈ {c:ℝ| (a < c) ∧ (c < b)} 
BY
{ ((Thin (-2) THEN RepeatFor 2 (MoveToConcl (-1)))
   THEN (GenConclTerm ⌜rational-fun-zero(λ2x.int-rat-mul(-1;f[x]);ra;rb)⌝⋅ THENA Auto)
   THEN RepeatFor 2 ((D 0 THENA Auto))) }

1
1. a : ℝ
2. b : ℝ
3. f : (ℤ × ℕ+) ⟶ (ℤ × ℕ+)
4. g : {x:ℝ| x ∈ [a, b]}  ⟶ ℝ
5. a < b
6. (g[a] * g[b]) < r0
7. ∀x,y:{x:ℝ| x ∈ [a, b]} .  ((x = y) ⇒ (g[x] = g[y]))
8. ∀r:ℤ × ℕ+. ((ratreal(r) ∈ [a, b]) ⇒ (g[ratreal(r)] = ratreal(f[r])))
9. ra : ℤ × ℕ+
10. rb : ℤ × ℕ+
11. a ≤ ratreal(ra)
12. ratreal(ra) ≤ ratreal(rb)
13. ratreal(rb) ≤ b
14. ratreal(ratmul(f[ra];f[rb])) < r0
15. ratreal(f[rb]) ≤ r0
16. r0 ≤ ratreal(f[ra])
17. rational-fun-zero(λ2x.int-rat-mul(-1;f[x]);ra;rb) ∈ ℝ
18. v : ℝ
19. rational-fun-zero(λ2x.int-rat-mul(-1;f[x]);ra;rb) = v ∈ ℝ
20. v ∈ [ratreal(ra), ratreal(rb)]
21. g[v] = r0
⊢ v ∈ {c:ℝ| (a < c) ∧ (c < b)} 

2
1. a : ℝ
2. b : ℝ
3. f : (ℤ × ℕ+) ⟶ (ℤ × ℕ+)
4. g : {x:ℝ| x ∈ [a, b]}  ⟶ ℝ
5. a < b
6. (g[a] * g[b]) < r0
7. ∀x,y:{x:ℝ| x ∈ [a, b]} .  ((x = y) ⇒ (g[x] = g[y]))
8. ∀r:ℤ × ℕ+. ((ratreal(r) ∈ [a, b]) ⇒ (g[ratreal(r)] = ratreal(f[r])))
9. ra : ℤ × ℕ+
10. rb : ℤ × ℕ+
11. a ≤ ratreal(ra)
12. ratreal(ra) ≤ ratreal(rb)
13. ratreal(rb) ≤ b
14. ratreal(ratmul(f[ra];f[rb])) < r0
15. ratreal(f[rb]) ≤ r0
16. r0 ≤ ratreal(f[ra])
17. rational-fun-zero(λ2x.int-rat-mul(-1;f[x]);ra;rb) ∈ ℝ
18. v : ℝ
19. rational-fun-zero(λ2x.int-rat-mul(-1;f[x]);ra;rb) = v ∈ ℝ
20. v ∈ [ratreal(ra), ratreal(rb)]
⊢ v ∈ {x:ℝ| (a ≤ x) ∧ (x ≤ b)} 

---

Latex:

---

Latex:

1.  a  :  \mBbbR{}
2.  b  :  \mBbbR{}
3.  f  :  (\mBbbZ{}  \mtimes{}  \mBbbN{}\msupplus{})  {}\mrightarrow{}  (\mBbbZ{}  \mtimes{}  \mBbbN{}\msupplus{})
4.  g  :  \{x:\mBbbR{}|  x  \mmember{}  [a,  b]\}    {}\mrightarrow{}  \mBbbR{}
5.  a  <  b
6.  (g[a]  *  g[b])  <  r0
7.  \mforall{}x,y:\{x:\mBbbR{}|  x  \mmember{}  [a,  b]\}  .    ((x  =  y)  {}\mRightarrow{}  (g[x]  =  g[y]))
8.  \mforall{}r:\mBbbZ{}  \mtimes{}  \mBbbN{}\msupplus{}.  ((ratreal(r)  \mmember{}  [a,  b])  {}\mRightarrow{}  (g[ratreal(r)]  =  ratreal(f[r])))
9.  ra  :  \mBbbZ{}  \mtimes{}  \mBbbN{}\msupplus{}
10.  rb  :  \mBbbZ{}  \mtimes{}  \mBbbN{}\msupplus{}
11.  a  \mleq{}  ratreal(ra)
12.  ratreal(ra)  \mleq{}  ratreal(rb)
13.  ratreal(rb)  \mleq{}  b
14.  ratreal(ratmul(f[ra];f[rb]))  <  r0
15.  ratreal(f[rb])  \mleq{}  r0
16.  r0  \mleq{}  ratreal(f[ra])
17.  rational-fun-zero(\mlambda{}\msubtwo{}x.int-rat-mul(-1;f[x]);ra;rb)  \mmember{}  \mBbbR{}
18.  rational-fun-zero(\mlambda{}\msubtwo{}x.int-rat-mul(-1;f[x]);ra;rb)  \mmember{}  [ratreal(ra),  ratreal(rb)]
19.  -(g[rational-fun-zero(\mlambda{}\msubtwo{}x.int-rat-mul(-1;f[x]);ra;rb)])  =  r0
20.  g[rational-fun-zero(\mlambda{}\msubtwo{}x.int-rat-mul(-1;f[x]);ra;rb)]  =  r0
\mvdash{}  rational-fun-zero(\mlambda{}\msubtwo{}x.int-rat-mul(-1;f[x]);ra;rb)  \mmember{}  \{c:\mBbbR{}|  (a  <  c)  \mwedge{}  (c  <  b)\} 


By

---

Latex:
((Thin  (-2)  THEN  RepeatFor  2  (MoveToConcl  (-1)))
  THEN  (GenConclTerm  \mkleeneopen{}rational-fun-zero(\mlambda{}\msubtwo{}x.int-rat-mul(-1;f[x]);ra;rb)\mkleeneclose{}\mcdot{}  THENA  Auto)
  THEN  RepeatFor  2  ((D  0  THENA  Auto)))

---

Home Index