MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  c1liplem1 Structured version   Visualization version   GIF version

Theorem c1liplem1 25901
Description: Lemma for c1lip1 25902. (Contributed by Stefan O'Rear, 15-Nov-2014.)
Hypotheses
Ref Expression
c1liplem1.a (𝜑𝐴 ∈ ℝ)
c1liplem1.b (𝜑𝐵 ∈ ℝ)
c1liplem1.le (𝜑𝐴𝐵)
c1liplem1.f (𝜑𝐹 ∈ (ℂ ↑pm ℝ))
c1liplem1.dv (𝜑 → ((ℝ D 𝐹) ↾ (𝐴[,]𝐵)) ∈ ((𝐴[,]𝐵)–cn→ℝ))
c1liplem1.cn (𝜑 → (𝐹 ↾ (𝐴[,]𝐵)) ∈ ((𝐴[,]𝐵)–cn→ℝ))
c1liplem1.k 𝐾 = sup((abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))), ℝ, < )
Assertion
Ref Expression
c1liplem1 (𝜑 → (𝐾 ∈ ℝ ∧ ∀𝑥 ∈ (𝐴[,]𝐵)∀𝑦 ∈ (𝐴[,]𝐵)(𝑥 < 𝑦 → (abs‘((𝐹𝑦) − (𝐹𝑥))) ≤ (𝐾 · (abs‘(𝑦𝑥))))))
Distinct variable groups:   𝜑,𝑥,𝑦   𝑥,𝐴,𝑦   𝑥,𝐵,𝑦   𝑥,𝐹,𝑦
Allowed substitution hints:   𝐾(𝑥,𝑦)

Proof of Theorem c1liplem1
Dummy variables 𝑎 𝑏 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 c1liplem1.k . . 3 𝐾 = sup((abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))), ℝ, < )
2 imassrn 6042 . . . . . 6 (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) ⊆ ran abs
3 absf 15304 . . . . . . 7 abs:ℂ⟶ℝ
4 frn 6695 . . . . . . 7 (abs:ℂ⟶ℝ → ran abs ⊆ ℝ)
53, 4ax-mp 5 . . . . . 6 ran abs ⊆ ℝ
62, 5sstri 3956 . . . . 5 (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) ⊆ ℝ
76a1i 11 . . . 4 (𝜑 → (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) ⊆ ℝ)
8 dvf 25808 . . . . . . . 8 (ℝ D 𝐹):dom (ℝ D 𝐹)⟶ℂ
9 ffun 6691 . . . . . . . 8 ((ℝ D 𝐹):dom (ℝ D 𝐹)⟶ℂ → Fun (ℝ D 𝐹))
108, 9ax-mp 5 . . . . . . 7 Fun (ℝ D 𝐹)
1110a1i 11 . . . . . 6 (𝜑 → Fun (ℝ D 𝐹))
12 c1liplem1.dv . . . . . . . 8 (𝜑 → ((ℝ D 𝐹) ↾ (𝐴[,]𝐵)) ∈ ((𝐴[,]𝐵)–cn→ℝ))
13 cncff 24786 . . . . . . . 8 (((ℝ D 𝐹) ↾ (𝐴[,]𝐵)) ∈ ((𝐴[,]𝐵)–cn→ℝ) → ((ℝ D 𝐹) ↾ (𝐴[,]𝐵)):(𝐴[,]𝐵)⟶ℝ)
14 fdm 6697 . . . . . . . 8 (((ℝ D 𝐹) ↾ (𝐴[,]𝐵)):(𝐴[,]𝐵)⟶ℝ → dom ((ℝ D 𝐹) ↾ (𝐴[,]𝐵)) = (𝐴[,]𝐵))
1512, 13, 143syl 18 . . . . . . 7 (𝜑 → dom ((ℝ D 𝐹) ↾ (𝐴[,]𝐵)) = (𝐴[,]𝐵))
16 ssdmres 5984 . . . . . . 7 ((𝐴[,]𝐵) ⊆ dom (ℝ D 𝐹) ↔ dom ((ℝ D 𝐹) ↾ (𝐴[,]𝐵)) = (𝐴[,]𝐵))
1715, 16sylibr 234 . . . . . 6 (𝜑 → (𝐴[,]𝐵) ⊆ dom (ℝ D 𝐹))
18 c1liplem1.a . . . . . . . 8 (𝜑𝐴 ∈ ℝ)
1918rexrd 11224 . . . . . . 7 (𝜑𝐴 ∈ ℝ*)
20 c1liplem1.b . . . . . . . 8 (𝜑𝐵 ∈ ℝ)
2120rexrd 11224 . . . . . . 7 (𝜑𝐵 ∈ ℝ*)
22 c1liplem1.le . . . . . . 7 (𝜑𝐴𝐵)
23 lbicc2 13425 . . . . . . 7 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*𝐴𝐵) → 𝐴 ∈ (𝐴[,]𝐵))
2419, 21, 22, 23syl3anc 1373 . . . . . 6 (𝜑𝐴 ∈ (𝐴[,]𝐵))
25 funfvima2 7205 . . . . . . 7 ((Fun (ℝ D 𝐹) ∧ (𝐴[,]𝐵) ⊆ dom (ℝ D 𝐹)) → (𝐴 ∈ (𝐴[,]𝐵) → ((ℝ D 𝐹)‘𝐴) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))))
2625imp 406 . . . . . 6 (((Fun (ℝ D 𝐹) ∧ (𝐴[,]𝐵) ⊆ dom (ℝ D 𝐹)) ∧ 𝐴 ∈ (𝐴[,]𝐵)) → ((ℝ D 𝐹)‘𝐴) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))
2711, 17, 24, 26syl21anc 837 . . . . 5 (𝜑 → ((ℝ D 𝐹)‘𝐴) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))
28 ffun 6691 . . . . . . 7 (abs:ℂ⟶ℝ → Fun abs)
293, 28ax-mp 5 . . . . . 6 Fun abs
30 imassrn 6042 . . . . . . . 8 ((ℝ D 𝐹) “ (𝐴[,]𝐵)) ⊆ ran (ℝ D 𝐹)
31 frn 6695 . . . . . . . . 9 ((ℝ D 𝐹):dom (ℝ D 𝐹)⟶ℂ → ran (ℝ D 𝐹) ⊆ ℂ)
328, 31ax-mp 5 . . . . . . . 8 ran (ℝ D 𝐹) ⊆ ℂ
3330, 32sstri 3956 . . . . . . 7 ((ℝ D 𝐹) “ (𝐴[,]𝐵)) ⊆ ℂ
343fdmi 6699 . . . . . . 7 dom abs = ℂ
3533, 34sseqtrri 3996 . . . . . 6 ((ℝ D 𝐹) “ (𝐴[,]𝐵)) ⊆ dom abs
36 funfvima2 7205 . . . . . 6 ((Fun abs ∧ ((ℝ D 𝐹) “ (𝐴[,]𝐵)) ⊆ dom abs) → (((ℝ D 𝐹)‘𝐴) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)) → (abs‘((ℝ D 𝐹)‘𝐴)) ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))))
3729, 35, 36mp2an 692 . . . . 5 (((ℝ D 𝐹)‘𝐴) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)) → (abs‘((ℝ D 𝐹)‘𝐴)) ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))))
38 ne0i 4304 . . . . 5 ((abs‘((ℝ D 𝐹)‘𝐴)) ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) → (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) ≠ ∅)
3927, 37, 383syl 18 . . . 4 (𝜑 → (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) ≠ ∅)
40 ax-resscn 11125 . . . . . . . 8 ℝ ⊆ ℂ
41 ssid 3969 . . . . . . . 8 ℂ ⊆ ℂ
42 cncfss 24792 . . . . . . . 8 ((ℝ ⊆ ℂ ∧ ℂ ⊆ ℂ) → ((𝐴[,]𝐵)–cn→ℝ) ⊆ ((𝐴[,]𝐵)–cn→ℂ))
4340, 41, 42mp2an 692 . . . . . . 7 ((𝐴[,]𝐵)–cn→ℝ) ⊆ ((𝐴[,]𝐵)–cn→ℂ)
4443, 12sselid 3944 . . . . . 6 (𝜑 → ((ℝ D 𝐹) ↾ (𝐴[,]𝐵)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
45 cniccbdd 25362 . . . . . 6 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ ((ℝ D 𝐹) ↾ (𝐴[,]𝐵)) ∈ ((𝐴[,]𝐵)–cn→ℂ)) → ∃𝑎 ∈ ℝ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎)
4618, 20, 44, 45syl3anc 1373 . . . . 5 (𝜑 → ∃𝑎 ∈ ℝ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎)
47 fvelima 6926 . . . . . . . . . 10 ((Fun abs ∧ 𝑏 ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))) → ∃𝑦 ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))(abs‘𝑦) = 𝑏)
4829, 47mpan 690 . . . . . . . . 9 (𝑏 ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) → ∃𝑦 ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))(abs‘𝑦) = 𝑏)
49 fvres 6877 . . . . . . . . . . . . . . . . . 18 (𝑏 ∈ (𝐴[,]𝐵) → (((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑏) = ((ℝ D 𝐹)‘𝑏))
5049adantl 481 . . . . . . . . . . . . . . . . 17 ((∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎𝑏 ∈ (𝐴[,]𝐵)) → (((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑏) = ((ℝ D 𝐹)‘𝑏))
5150fveq2d 6862 . . . . . . . . . . . . . . . 16 ((∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎𝑏 ∈ (𝐴[,]𝐵)) → (abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑏)) = (abs‘((ℝ D 𝐹)‘𝑏)))
52 2fveq3 6863 . . . . . . . . . . . . . . . . . 18 (𝑥 = 𝑏 → (abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) = (abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑏)))
5352breq1d 5117 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑏 → ((abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎 ↔ (abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑏)) ≤ 𝑎))
5453rspccva 3587 . . . . . . . . . . . . . . . 16 ((∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎𝑏 ∈ (𝐴[,]𝐵)) → (abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑏)) ≤ 𝑎)
5551, 54eqbrtrrd 5131 . . . . . . . . . . . . . . 15 ((∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎𝑏 ∈ (𝐴[,]𝐵)) → (abs‘((ℝ D 𝐹)‘𝑏)) ≤ 𝑎)
5655adantll 714 . . . . . . . . . . . . . 14 ((((𝜑𝑎 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎) ∧ 𝑏 ∈ (𝐴[,]𝐵)) → (abs‘((ℝ D 𝐹)‘𝑏)) ≤ 𝑎)
57 fveq2 6858 . . . . . . . . . . . . . . 15 (((ℝ D 𝐹)‘𝑏) = 𝑦 → (abs‘((ℝ D 𝐹)‘𝑏)) = (abs‘𝑦))
5857breq1d 5117 . . . . . . . . . . . . . 14 (((ℝ D 𝐹)‘𝑏) = 𝑦 → ((abs‘((ℝ D 𝐹)‘𝑏)) ≤ 𝑎 ↔ (abs‘𝑦) ≤ 𝑎))
5956, 58syl5ibcom 245 . . . . . . . . . . . . 13 ((((𝜑𝑎 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎) ∧ 𝑏 ∈ (𝐴[,]𝐵)) → (((ℝ D 𝐹)‘𝑏) = 𝑦 → (abs‘𝑦) ≤ 𝑎))
6059rexlimdva 3134 . . . . . . . . . . . 12 (((𝜑𝑎 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎) → (∃𝑏 ∈ (𝐴[,]𝐵)((ℝ D 𝐹)‘𝑏) = 𝑦 → (abs‘𝑦) ≤ 𝑎))
61 fvelima 6926 . . . . . . . . . . . . 13 ((Fun (ℝ D 𝐹) ∧ 𝑦 ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) → ∃𝑏 ∈ (𝐴[,]𝐵)((ℝ D 𝐹)‘𝑏) = 𝑦)
6210, 61mpan 690 . . . . . . . . . . . 12 (𝑦 ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)) → ∃𝑏 ∈ (𝐴[,]𝐵)((ℝ D 𝐹)‘𝑏) = 𝑦)
6360, 62impel 505 . . . . . . . . . . 11 ((((𝜑𝑎 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎) ∧ 𝑦 ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) → (abs‘𝑦) ≤ 𝑎)
64 breq1 5110 . . . . . . . . . . 11 ((abs‘𝑦) = 𝑏 → ((abs‘𝑦) ≤ 𝑎𝑏𝑎))
6563, 64syl5ibcom 245 . . . . . . . . . 10 ((((𝜑𝑎 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎) ∧ 𝑦 ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) → ((abs‘𝑦) = 𝑏𝑏𝑎))
6665rexlimdva 3134 . . . . . . . . 9 (((𝜑𝑎 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎) → (∃𝑦 ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))(abs‘𝑦) = 𝑏𝑏𝑎))
6748, 66syl5 34 . . . . . . . 8 (((𝜑𝑎 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎) → (𝑏 ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) → 𝑏𝑎))
6867ralrimiv 3124 . . . . . . 7 (((𝜑𝑎 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎) → ∀𝑏 ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))𝑏𝑎)
6968ex 412 . . . . . 6 ((𝜑𝑎 ∈ ℝ) → (∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎 → ∀𝑏 ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))𝑏𝑎))
7069reximdva 3146 . . . . 5 (𝜑 → (∃𝑎 ∈ ℝ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎 → ∃𝑎 ∈ ℝ ∀𝑏 ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))𝑏𝑎))
7146, 70mpd 15 . . . 4 (𝜑 → ∃𝑎 ∈ ℝ ∀𝑏 ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))𝑏𝑎)
727, 39, 71suprcld 12146 . . 3 (𝜑 → sup((abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))), ℝ, < ) ∈ ℝ)
731, 72eqeltrid 2832 . 2 (𝜑𝐾 ∈ ℝ)
74 simplrr 777 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑦 ∈ (𝐴[,]𝐵))
7574fvresd 6878 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝐴[,]𝐵))‘𝑦) = (𝐹𝑦))
76 c1liplem1.cn . . . . . . . . . . . . . 14 (𝜑 → (𝐹 ↾ (𝐴[,]𝐵)) ∈ ((𝐴[,]𝐵)–cn→ℝ))
77 cncff 24786 . . . . . . . . . . . . . 14 ((𝐹 ↾ (𝐴[,]𝐵)) ∈ ((𝐴[,]𝐵)–cn→ℝ) → (𝐹 ↾ (𝐴[,]𝐵)):(𝐴[,]𝐵)⟶ℝ)
7876, 77syl 17 . . . . . . . . . . . . 13 (𝜑 → (𝐹 ↾ (𝐴[,]𝐵)):(𝐴[,]𝐵)⟶ℝ)
7978ad2antrr 726 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝐹 ↾ (𝐴[,]𝐵)):(𝐴[,]𝐵)⟶ℝ)
8079, 74ffvelcdmd 7057 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝐴[,]𝐵))‘𝑦) ∈ ℝ)
8180recnd 11202 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝐴[,]𝐵))‘𝑦) ∈ ℂ)
8275, 81eqeltrrd 2829 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝐹𝑦) ∈ ℂ)
83 simplrl 776 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑥 ∈ (𝐴[,]𝐵))
8483fvresd 6878 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝐴[,]𝐵))‘𝑥) = (𝐹𝑥))
8579, 83ffvelcdmd 7057 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝐴[,]𝐵))‘𝑥) ∈ ℝ)
8685recnd 11202 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝐴[,]𝐵))‘𝑥) ∈ ℂ)
8784, 86eqeltrrd 2829 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝐹𝑥) ∈ ℂ)
8882, 87subcld 11533 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹𝑦) − (𝐹𝑥)) ∈ ℂ)
89 iccssre 13390 . . . . . . . . . . . . 13 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴[,]𝐵) ⊆ ℝ)
9018, 20, 89syl2anc 584 . . . . . . . . . . . 12 (𝜑 → (𝐴[,]𝐵) ⊆ ℝ)
9190ad2antrr 726 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝐴[,]𝐵) ⊆ ℝ)
9291, 74sseldd 3947 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑦 ∈ ℝ)
9391, 83sseldd 3947 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑥 ∈ ℝ)
9492, 93resubcld 11606 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑦𝑥) ∈ ℝ)
9594recnd 11202 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑦𝑥) ∈ ℂ)
96 simpr 484 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑥 < 𝑦)
97 difrp 12991 . . . . . . . . . . 11 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝑥 < 𝑦 ↔ (𝑦𝑥) ∈ ℝ+))
9893, 92, 97syl2anc 584 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑥 < 𝑦 ↔ (𝑦𝑥) ∈ ℝ+))
9996, 98mpbid 232 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑦𝑥) ∈ ℝ+)
10099rpne0d 13000 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑦𝑥) ≠ 0)
10188, 95, 100absdivd 15424 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘(((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥))) = ((abs‘((𝐹𝑦) − (𝐹𝑥))) / (abs‘(𝑦𝑥))))
1026a1i 11 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) ⊆ ℝ)
10339ad2antrr 726 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) ≠ ∅)
10471ad2antrr 726 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ∃𝑎 ∈ ℝ ∀𝑏 ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))𝑏𝑎)
10529a1i 11 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → Fun abs)
10688, 95, 100divcld 11958 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥)) ∈ ℂ)
107106, 34eleqtrrdi 2839 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥)) ∈ dom abs)
10893rexrd 11224 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑥 ∈ ℝ*)
10992rexrd 11224 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑦 ∈ ℝ*)
11093, 92, 96ltled 11322 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑥𝑦)
111 ubicc2 13426 . . . . . . . . . . . . . . 15 ((𝑥 ∈ ℝ*𝑦 ∈ ℝ*𝑥𝑦) → 𝑦 ∈ (𝑥[,]𝑦))
112108, 109, 110, 111syl3anc 1373 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑦 ∈ (𝑥[,]𝑦))
113112fvresd 6878 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) = (𝐹𝑦))
114 lbicc2 13425 . . . . . . . . . . . . . . 15 ((𝑥 ∈ ℝ*𝑦 ∈ ℝ*𝑥𝑦) → 𝑥 ∈ (𝑥[,]𝑦))
115108, 109, 110, 114syl3anc 1373 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑥 ∈ (𝑥[,]𝑦))
116115fvresd 6878 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥) = (𝐹𝑥))
117113, 116oveq12d 7405 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) = ((𝐹𝑦) − (𝐹𝑥)))
118117oveq1d 7402 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) = (((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥)))
119 iccss2 13378 . . . . . . . . . . . . . . . 16 ((𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵)) → (𝑥[,]𝑦) ⊆ (𝐴[,]𝐵))
120119ad2antlr 727 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑥[,]𝑦) ⊆ (𝐴[,]𝐵))
121120resabs1d 5979 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝐴[,]𝐵)) ↾ (𝑥[,]𝑦)) = (𝐹 ↾ (𝑥[,]𝑦)))
12276ad2antrr 726 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝐹 ↾ (𝐴[,]𝐵)) ∈ ((𝐴[,]𝐵)–cn→ℝ))
123 rescncf 24790 . . . . . . . . . . . . . . 15 ((𝑥[,]𝑦) ⊆ (𝐴[,]𝐵) → ((𝐹 ↾ (𝐴[,]𝐵)) ∈ ((𝐴[,]𝐵)–cn→ℝ) → ((𝐹 ↾ (𝐴[,]𝐵)) ↾ (𝑥[,]𝑦)) ∈ ((𝑥[,]𝑦)–cn→ℝ)))
124120, 122, 123sylc 65 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝐴[,]𝐵)) ↾ (𝑥[,]𝑦)) ∈ ((𝑥[,]𝑦)–cn→ℝ))
125121, 124eqeltrrd 2829 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝐹 ↾ (𝑥[,]𝑦)) ∈ ((𝑥[,]𝑦)–cn→ℝ))
12640a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ℝ ⊆ ℂ)
127 c1liplem1.f . . . . . . . . . . . . . . . . . . 19 (𝜑𝐹 ∈ (ℂ ↑pm ℝ))
128127ad2antrr 726 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝐹 ∈ (ℂ ↑pm ℝ))
129 cnex 11149 . . . . . . . . . . . . . . . . . . . 20 ℂ ∈ V
130 reex 11159 . . . . . . . . . . . . . . . . . . . 20 ℝ ∈ V
131129, 130elpm2 8847 . . . . . . . . . . . . . . . . . . 19 (𝐹 ∈ (ℂ ↑pm ℝ) ↔ (𝐹:dom 𝐹⟶ℂ ∧ dom 𝐹 ⊆ ℝ))
132131simplbi 497 . . . . . . . . . . . . . . . . . 18 (𝐹 ∈ (ℂ ↑pm ℝ) → 𝐹:dom 𝐹⟶ℂ)
133128, 132syl 17 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝐹:dom 𝐹⟶ℂ)
134131simprbi 496 . . . . . . . . . . . . . . . . . 18 (𝐹 ∈ (ℂ ↑pm ℝ) → dom 𝐹 ⊆ ℝ)
135128, 134syl 17 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → dom 𝐹 ⊆ ℝ)
136 iccssre 13390 . . . . . . . . . . . . . . . . . 18 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝑥[,]𝑦) ⊆ ℝ)
13793, 92, 136syl2anc 584 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑥[,]𝑦) ⊆ ℝ)
138 eqid 2729 . . . . . . . . . . . . . . . . . 18 (TopOpen‘ℂfld) = (TopOpen‘ℂfld)
139 tgioo4 24693 . . . . . . . . . . . . . . . . . 18 (topGen‘ran (,)) = ((TopOpen‘ℂfld) ↾t ℝ)
140138, 139dvres 25812 . . . . . . . . . . . . . . . . 17 (((ℝ ⊆ ℂ ∧ 𝐹:dom 𝐹⟶ℂ) ∧ (dom 𝐹 ⊆ ℝ ∧ (𝑥[,]𝑦) ⊆ ℝ)) → (ℝ D (𝐹 ↾ (𝑥[,]𝑦))) = ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘(𝑥[,]𝑦))))
141126, 133, 135, 137, 140syl22anc 838 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (ℝ D (𝐹 ↾ (𝑥[,]𝑦))) = ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘(𝑥[,]𝑦))))
142 iccntr 24710 . . . . . . . . . . . . . . . . . 18 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ((int‘(topGen‘ran (,)))‘(𝑥[,]𝑦)) = (𝑥(,)𝑦))
14393, 92, 142syl2anc 584 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((int‘(topGen‘ran (,)))‘(𝑥[,]𝑦)) = (𝑥(,)𝑦))
144143reseq2d 5950 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘(𝑥[,]𝑦))) = ((ℝ D 𝐹) ↾ (𝑥(,)𝑦)))
145141, 144eqtrd 2764 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (ℝ D (𝐹 ↾ (𝑥[,]𝑦))) = ((ℝ D 𝐹) ↾ (𝑥(,)𝑦)))
146145dmeqd 5869 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → dom (ℝ D (𝐹 ↾ (𝑥[,]𝑦))) = dom ((ℝ D 𝐹) ↾ (𝑥(,)𝑦)))
147 ioossicc 13394 . . . . . . . . . . . . . . . . 17 (𝑥(,)𝑦) ⊆ (𝑥[,]𝑦)
148147, 120sstrid 3958 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑥(,)𝑦) ⊆ (𝐴[,]𝐵))
14917ad2antrr 726 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝐴[,]𝐵) ⊆ dom (ℝ D 𝐹))
150148, 149sstrd 3957 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑥(,)𝑦) ⊆ dom (ℝ D 𝐹))
151 ssdmres 5984 . . . . . . . . . . . . . . 15 ((𝑥(,)𝑦) ⊆ dom (ℝ D 𝐹) ↔ dom ((ℝ D 𝐹) ↾ (𝑥(,)𝑦)) = (𝑥(,)𝑦))
152150, 151sylib 218 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → dom ((ℝ D 𝐹) ↾ (𝑥(,)𝑦)) = (𝑥(,)𝑦))
153146, 152eqtrd 2764 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → dom (ℝ D (𝐹 ↾ (𝑥[,]𝑦))) = (𝑥(,)𝑦))
15493, 92, 96, 125, 153mvth 25897 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ∃𝑎 ∈ (𝑥(,)𝑦)((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) = ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)))
155145fveq1d 6860 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) = (((ℝ D 𝐹) ↾ (𝑥(,)𝑦))‘𝑎))
156155adantrr 717 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → ((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) = (((ℝ D 𝐹) ↾ (𝑥(,)𝑦))‘𝑎))
157 fvres 6877 . . . . . . . . . . . . . . . . . 18 (𝑎 ∈ (𝑥(,)𝑦) → (((ℝ D 𝐹) ↾ (𝑥(,)𝑦))‘𝑎) = ((ℝ D 𝐹)‘𝑎))
158157ad2antll 729 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → (((ℝ D 𝐹) ↾ (𝑥(,)𝑦))‘𝑎) = ((ℝ D 𝐹)‘𝑎))
159156, 158eqtrd 2764 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → ((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) = ((ℝ D 𝐹)‘𝑎))
16010a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → Fun (ℝ D 𝐹))
16117ad2antrr 726 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → (𝐴[,]𝐵) ⊆ dom (ℝ D 𝐹))
162148sseld 3945 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑎 ∈ (𝑥(,)𝑦) → 𝑎 ∈ (𝐴[,]𝐵)))
163162impr 454 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → 𝑎 ∈ (𝐴[,]𝐵))
164 funfvima2 7205 . . . . . . . . . . . . . . . . . 18 ((Fun (ℝ D 𝐹) ∧ (𝐴[,]𝐵) ⊆ dom (ℝ D 𝐹)) → (𝑎 ∈ (𝐴[,]𝐵) → ((ℝ D 𝐹)‘𝑎) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))))
165164imp 406 . . . . . . . . . . . . . . . . 17 (((Fun (ℝ D 𝐹) ∧ (𝐴[,]𝐵) ⊆ dom (ℝ D 𝐹)) ∧ 𝑎 ∈ (𝐴[,]𝐵)) → ((ℝ D 𝐹)‘𝑎) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))
166160, 161, 163, 165syl21anc 837 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → ((ℝ D 𝐹)‘𝑎) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))
167159, 166eqeltrd 2828 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → ((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))
168 eleq1 2816 . . . . . . . . . . . . . . 15 (((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) = ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) → (((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)) ↔ ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))))
169167, 168syl5ibcom 245 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → (((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) = ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) → ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))))
170169expr 456 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑎 ∈ (𝑥(,)𝑦) → (((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) = ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) → ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))))
171170rexlimdv 3132 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (∃𝑎 ∈ (𝑥(,)𝑦)((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) = ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) → ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))))
172154, 171mpd 15 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))
173118, 172eqeltrrd 2829 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥)) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))
174 funfvima 7204 . . . . . . . . . . 11 ((Fun abs ∧ (((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥)) ∈ dom abs) → ((((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥)) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)) → (abs‘(((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥))) ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))))
175174imp 406 . . . . . . . . . 10 (((Fun abs ∧ (((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥)) ∈ dom abs) ∧ (((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥)) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) → (abs‘(((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥))) ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))))
176105, 107, 173, 175syl21anc 837 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘(((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥))) ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))))
177102, 103, 104, 176suprubd 12145 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘(((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥))) ≤ sup((abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))), ℝ, < ))
178177, 1breqtrrdi 5149 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘(((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥))) ≤ 𝐾)
179101, 178eqbrtrrd 5131 . . . . . 6 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((abs‘((𝐹𝑦) − (𝐹𝑥))) / (abs‘(𝑦𝑥))) ≤ 𝐾)
18088abscld 15405 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘((𝐹𝑦) − (𝐹𝑥))) ∈ ℝ)
18173ad2antrr 726 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝐾 ∈ ℝ)
18295, 100absrpcld 15417 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘(𝑦𝑥)) ∈ ℝ+)
183180, 181, 182ledivmuld 13048 . . . . . 6 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (((abs‘((𝐹𝑦) − (𝐹𝑥))) / (abs‘(𝑦𝑥))) ≤ 𝐾 ↔ (abs‘((𝐹𝑦) − (𝐹𝑥))) ≤ ((abs‘(𝑦𝑥)) · 𝐾)))
184179, 183mpbid 232 . . . . 5 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘((𝐹𝑦) − (𝐹𝑥))) ≤ ((abs‘(𝑦𝑥)) · 𝐾))
185182rpcnd 12997 . . . . . 6 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘(𝑦𝑥)) ∈ ℂ)
186181recnd 11202 . . . . . 6 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝐾 ∈ ℂ)
187185, 186mulcomd 11195 . . . . 5 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((abs‘(𝑦𝑥)) · 𝐾) = (𝐾 · (abs‘(𝑦𝑥))))
188184, 187breqtrd 5133 . . . 4 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘((𝐹𝑦) − (𝐹𝑥))) ≤ (𝐾 · (abs‘(𝑦𝑥))))
189188ex 412 . . 3 ((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) → (𝑥 < 𝑦 → (abs‘((𝐹𝑦) − (𝐹𝑥))) ≤ (𝐾 · (abs‘(𝑦𝑥)))))
190189ralrimivva 3180 . 2 (𝜑 → ∀𝑥 ∈ (𝐴[,]𝐵)∀𝑦 ∈ (𝐴[,]𝐵)(𝑥 < 𝑦 → (abs‘((𝐹𝑦) − (𝐹𝑥))) ≤ (𝐾 · (abs‘(𝑦𝑥)))))
19173, 190jca 511 1 (𝜑 → (𝐾 ∈ ℝ ∧ ∀𝑥 ∈ (𝐴[,]𝐵)∀𝑦 ∈ (𝐴[,]𝐵)(𝑥 < 𝑦 → (abs‘((𝐹𝑦) − (𝐹𝑥))) ≤ (𝐾 · (abs‘(𝑦𝑥))))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395   = wceq 1540  wcel 2109  wne 2925  wral 3044  wrex 3053  wss 3914  c0 4296   class class class wbr 5107  dom cdm 5638  ran crn 5639  cres 5640  cima 5641  Fun wfun 6505  wf 6507  cfv 6511  (class class class)co 7387  pm cpm 8800  supcsup 9391  cc 11066  cr 11067   · cmul 11073  *cxr 11207   < clt 11208  cle 11209  cmin 11405   / cdiv 11835  +crp 12951  (,)cioo 13306  [,]cicc 13309  abscabs 15200  TopOpenctopn 17384  topGenctg 17400  fldccnfld 21264  intcnt 22904  cnccncf 24769   D cdv 25764
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-rep 5234  ax-sep 5251  ax-nul 5261  ax-pow 5320  ax-pr 5387  ax-un 7711  ax-cnex 11124  ax-resscn 11125  ax-1cn 11126  ax-icn 11127  ax-addcl 11128  ax-addrcl 11129  ax-mulcl 11130  ax-mulrcl 11131  ax-mulcom 11132  ax-addass 11133  ax-mulass 11134  ax-distr 11135  ax-i2m1 11136  ax-1ne0 11137  ax-1rid 11138  ax-rnegex 11139  ax-rrecex 11140  ax-cnre 11141  ax-pre-lttri 11142  ax-pre-lttrn 11143  ax-pre-ltadd 11144  ax-pre-mulgt0 11145  ax-pre-sup 11146  ax-addf 11147
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-nel 3030  df-ral 3045  df-rex 3054  df-rmo 3354  df-reu 3355  df-rab 3406  df-v 3449  df-sbc 3754  df-csb 3863  df-dif 3917  df-un 3919  df-in 3921  df-ss 3931  df-pss 3934  df-nul 4297  df-if 4489  df-pw 4565  df-sn 4590  df-pr 4592  df-tp 4594  df-op 4596  df-uni 4872  df-int 4911  df-iun 4957  df-iin 4958  df-br 5108  df-opab 5170  df-mpt 5189  df-tr 5215  df-id 5533  df-eprel 5538  df-po 5546  df-so 5547  df-fr 5591  df-se 5592  df-we 5593  df-xp 5644  df-rel 5645  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-pred 6274  df-ord 6335  df-on 6336  df-lim 6337  df-suc 6338  df-iota 6464  df-fun 6513  df-fn 6514  df-f 6515  df-f1 6516  df-fo 6517  df-f1o 6518  df-fv 6519  df-isom 6520  df-riota 7344  df-ov 7390  df-oprab 7391  df-mpo 7392  df-of 7653  df-om 7843  df-1st 7968  df-2nd 7969  df-supp 8140  df-frecs 8260  df-wrecs 8291  df-recs 8340  df-rdg 8378  df-1o 8434  df-2o 8435  df-er 8671  df-map 8801  df-pm 8802  df-ixp 8871  df-en 8919  df-dom 8920  df-sdom 8921  df-fin 8922  df-fsupp 9313  df-fi 9362  df-sup 9393  df-inf 9394  df-oi 9463  df-card 9892  df-pnf 11210  df-mnf 11211  df-xr 11212  df-ltxr 11213  df-le 11214  df-sub 11407  df-neg 11408  df-div 11836  df-nn 12187  df-2 12249  df-3 12250  df-4 12251  df-5 12252  df-6 12253  df-7 12254  df-8 12255  df-9 12256  df-n0 12443  df-z 12530  df-dec 12650  df-uz 12794  df-q 12908  df-rp 12952  df-xneg 13072  df-xadd 13073  df-xmul 13074  df-ioo 13310  df-ico 13312  df-icc 13313  df-fz 13469  df-fzo 13616  df-seq 13967  df-exp 14027  df-hash 14296  df-cj 15065  df-re 15066  df-im 15067  df-sqrt 15201  df-abs 15202  df-struct 17117  df-sets 17134  df-slot 17152  df-ndx 17164  df-base 17180  df-ress 17201  df-plusg 17233  df-mulr 17234  df-starv 17235  df-sca 17236  df-vsca 17237  df-ip 17238  df-tset 17239  df-ple 17240  df-ds 17242  df-unif 17243  df-hom 17244  df-cco 17245  df-rest 17385  df-topn 17386  df-0g 17404  df-gsum 17405  df-topgen 17406  df-pt 17407  df-prds 17410  df-xrs 17465  df-qtop 17470  df-imas 17471  df-xps 17473  df-mre 17547  df-mrc 17548  df-acs 17550  df-mgm 18567  df-sgrp 18646  df-mnd 18662  df-submnd 18711  df-mulg 19000  df-cntz 19249  df-cmn 19712  df-psmet 21256  df-xmet 21257  df-met 21258  df-bl 21259  df-mopn 21260  df-fbas 21261  df-fg 21262  df-cnfld 21265  df-top 22781  df-topon 22798  df-topsp 22820  df-bases 22833  df-cld 22906  df-ntr 22907  df-cls 22908  df-nei 22985  df-lp 23023  df-perf 23024  df-cn 23114  df-cnp 23115  df-haus 23202  df-cmp 23274  df-tx 23449  df-hmeo 23642  df-fil 23733  df-fm 23825  df-flim 23826  df-flf 23827  df-xms 24208  df-ms 24209  df-tms 24210  df-cncf 24771  df-limc 25767  df-dv 25768
This theorem is referenced by:  c1lip1  25902
  Copyright terms: Public domain W3C validator