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

Theorem c1liplem1 24595
Description: Lemma for c1lip1 24596. (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 5942 . . . . . 6 (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) ⊆ ran abs
3 absf 14699 . . . . . . 7 abs:ℂ⟶ℝ
4 frn 6522 . . . . . . 7 (abs:ℂ⟶ℝ → ran abs ⊆ ℝ)
53, 4ax-mp 5 . . . . . 6 ran abs ⊆ ℝ
62, 5sstri 3978 . . . . 5 (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) ⊆ ℝ
76a1i 11 . . . 4 (𝜑 → (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) ⊆ ℝ)
8 dvf 24507 . . . . . . . 8 (ℝ D 𝐹):dom (ℝ D 𝐹)⟶ℂ
9 ffun 6519 . . . . . . . 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 23503 . . . . . . . 8 (((ℝ D 𝐹) ↾ (𝐴[,]𝐵)) ∈ ((𝐴[,]𝐵)–cn→ℝ) → ((ℝ D 𝐹) ↾ (𝐴[,]𝐵)):(𝐴[,]𝐵)⟶ℝ)
14 fdm 6524 . . . . . . . 8 (((ℝ D 𝐹) ↾ (𝐴[,]𝐵)):(𝐴[,]𝐵)⟶ℝ → dom ((ℝ D 𝐹) ↾ (𝐴[,]𝐵)) = (𝐴[,]𝐵))
1512, 13, 143syl 18 . . . . . . 7 (𝜑 → dom ((ℝ D 𝐹) ↾ (𝐴[,]𝐵)) = (𝐴[,]𝐵))
16 ssdmres 5878 . . . . . . 7 ((𝐴[,]𝐵) ⊆ dom (ℝ D 𝐹) ↔ dom ((ℝ D 𝐹) ↾ (𝐴[,]𝐵)) = (𝐴[,]𝐵))
1715, 16sylibr 236 . . . . . 6 (𝜑 → (𝐴[,]𝐵) ⊆ dom (ℝ D 𝐹))
18 c1liplem1.a . . . . . . . 8 (𝜑𝐴 ∈ ℝ)
1918rexrd 10693 . . . . . . 7 (𝜑𝐴 ∈ ℝ*)
20 c1liplem1.b . . . . . . . 8 (𝜑𝐵 ∈ ℝ)
2120rexrd 10693 . . . . . . 7 (𝜑𝐵 ∈ ℝ*)
22 c1liplem1.le . . . . . . 7 (𝜑𝐴𝐵)
23 lbicc2 12855 . . . . . . 7 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*𝐴𝐵) → 𝐴 ∈ (𝐴[,]𝐵))
2419, 21, 22, 23syl3anc 1367 . . . . . 6 (𝜑𝐴 ∈ (𝐴[,]𝐵))
25 funfvima2 6995 . . . . . . 7 ((Fun (ℝ D 𝐹) ∧ (𝐴[,]𝐵) ⊆ dom (ℝ D 𝐹)) → (𝐴 ∈ (𝐴[,]𝐵) → ((ℝ D 𝐹)‘𝐴) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))))
2625imp 409 . . . . . 6 (((Fun (ℝ D 𝐹) ∧ (𝐴[,]𝐵) ⊆ dom (ℝ D 𝐹)) ∧ 𝐴 ∈ (𝐴[,]𝐵)) → ((ℝ D 𝐹)‘𝐴) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))
2711, 17, 24, 26syl21anc 835 . . . . 5 (𝜑 → ((ℝ D 𝐹)‘𝐴) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))
28 ffun 6519 . . . . . . 7 (abs:ℂ⟶ℝ → Fun abs)
293, 28ax-mp 5 . . . . . 6 Fun abs
30 imassrn 5942 . . . . . . . 8 ((ℝ D 𝐹) “ (𝐴[,]𝐵)) ⊆ ran (ℝ D 𝐹)
31 frn 6522 . . . . . . . . 9 ((ℝ D 𝐹):dom (ℝ D 𝐹)⟶ℂ → ran (ℝ D 𝐹) ⊆ ℂ)
328, 31ax-mp 5 . . . . . . . 8 ran (ℝ D 𝐹) ⊆ ℂ
3330, 32sstri 3978 . . . . . . 7 ((ℝ D 𝐹) “ (𝐴[,]𝐵)) ⊆ ℂ
343fdmi 6526 . . . . . . 7 dom abs = ℂ
3533, 34sseqtrri 4006 . . . . . 6 ((ℝ D 𝐹) “ (𝐴[,]𝐵)) ⊆ dom abs
36 funfvima2 6995 . . . . . 6 ((Fun abs ∧ ((ℝ D 𝐹) “ (𝐴[,]𝐵)) ⊆ dom abs) → (((ℝ D 𝐹)‘𝐴) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)) → (abs‘((ℝ D 𝐹)‘𝐴)) ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))))
3729, 35, 36mp2an 690 . . . . 5 (((ℝ D 𝐹)‘𝐴) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)) → (abs‘((ℝ D 𝐹)‘𝐴)) ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))))
38 ne0i 4302 . . . . 5 ((abs‘((ℝ D 𝐹)‘𝐴)) ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) → (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) ≠ ∅)
3927, 37, 383syl 18 . . . 4 (𝜑 → (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) ≠ ∅)
40 ax-resscn 10596 . . . . . . . 8 ℝ ⊆ ℂ
41 ssid 3991 . . . . . . . 8 ℂ ⊆ ℂ
42 cncfss 23509 . . . . . . . 8 ((ℝ ⊆ ℂ ∧ ℂ ⊆ ℂ) → ((𝐴[,]𝐵)–cn→ℝ) ⊆ ((𝐴[,]𝐵)–cn→ℂ))
4340, 41, 42mp2an 690 . . . . . . 7 ((𝐴[,]𝐵)–cn→ℝ) ⊆ ((𝐴[,]𝐵)–cn→ℂ)
4443, 12sseldi 3967 . . . . . 6 (𝜑 → ((ℝ D 𝐹) ↾ (𝐴[,]𝐵)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
45 cniccbdd 24064 . . . . . 6 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ ((ℝ D 𝐹) ↾ (𝐴[,]𝐵)) ∈ ((𝐴[,]𝐵)–cn→ℂ)) → ∃𝑎 ∈ ℝ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎)
4618, 20, 44, 45syl3anc 1367 . . . . 5 (𝜑 → ∃𝑎 ∈ ℝ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎)
47 fvelima 6733 . . . . . . . . . 10 ((Fun abs ∧ 𝑏 ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))) → ∃𝑦 ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))(abs‘𝑦) = 𝑏)
4829, 47mpan 688 . . . . . . . . 9 (𝑏 ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) → ∃𝑦 ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))(abs‘𝑦) = 𝑏)
49 fvres 6691 . . . . . . . . . . . . . . . . . 18 (𝑏 ∈ (𝐴[,]𝐵) → (((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑏) = ((ℝ D 𝐹)‘𝑏))
5049adantl 484 . . . . . . . . . . . . . . . . 17 ((∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎𝑏 ∈ (𝐴[,]𝐵)) → (((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑏) = ((ℝ D 𝐹)‘𝑏))
5150fveq2d 6676 . . . . . . . . . . . . . . . 16 ((∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎𝑏 ∈ (𝐴[,]𝐵)) → (abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑏)) = (abs‘((ℝ D 𝐹)‘𝑏)))
52 2fveq3 6677 . . . . . . . . . . . . . . . . . 18 (𝑥 = 𝑏 → (abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) = (abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑏)))
5352breq1d 5078 . . . . . . . . . . . . . . . . 17 (𝑥 = 𝑏 → ((abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎 ↔ (abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑏)) ≤ 𝑎))
5453rspccva 3624 . . . . . . . . . . . . . . . 16 ((∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎𝑏 ∈ (𝐴[,]𝐵)) → (abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑏)) ≤ 𝑎)
5551, 54eqbrtrrd 5092 . . . . . . . . . . . . . . 15 ((∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎𝑏 ∈ (𝐴[,]𝐵)) → (abs‘((ℝ D 𝐹)‘𝑏)) ≤ 𝑎)
5655adantll 712 . . . . . . . . . . . . . 14 ((((𝜑𝑎 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎) ∧ 𝑏 ∈ (𝐴[,]𝐵)) → (abs‘((ℝ D 𝐹)‘𝑏)) ≤ 𝑎)
57 fveq2 6672 . . . . . . . . . . . . . . 15 (((ℝ D 𝐹)‘𝑏) = 𝑦 → (abs‘((ℝ D 𝐹)‘𝑏)) = (abs‘𝑦))
5857breq1d 5078 . . . . . . . . . . . . . 14 (((ℝ D 𝐹)‘𝑏) = 𝑦 → ((abs‘((ℝ D 𝐹)‘𝑏)) ≤ 𝑎 ↔ (abs‘𝑦) ≤ 𝑎))
5956, 58syl5ibcom 247 . . . . . . . . . . . . 13 ((((𝜑𝑎 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎) ∧ 𝑏 ∈ (𝐴[,]𝐵)) → (((ℝ D 𝐹)‘𝑏) = 𝑦 → (abs‘𝑦) ≤ 𝑎))
6059rexlimdva 3286 . . . . . . . . . . . 12 (((𝜑𝑎 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎) → (∃𝑏 ∈ (𝐴[,]𝐵)((ℝ D 𝐹)‘𝑏) = 𝑦 → (abs‘𝑦) ≤ 𝑎))
61 fvelima 6733 . . . . . . . . . . . . 13 ((Fun (ℝ D 𝐹) ∧ 𝑦 ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) → ∃𝑏 ∈ (𝐴[,]𝐵)((ℝ D 𝐹)‘𝑏) = 𝑦)
6210, 61mpan 688 . . . . . . . . . . . 12 (𝑦 ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)) → ∃𝑏 ∈ (𝐴[,]𝐵)((ℝ D 𝐹)‘𝑏) = 𝑦)
6360, 62impel 508 . . . . . . . . . . 11 ((((𝜑𝑎 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎) ∧ 𝑦 ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) → (abs‘𝑦) ≤ 𝑎)
64 breq1 5071 . . . . . . . . . . 11 ((abs‘𝑦) = 𝑏 → ((abs‘𝑦) ≤ 𝑎𝑏𝑎))
6563, 64syl5ibcom 247 . . . . . . . . . 10 ((((𝜑𝑎 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎) ∧ 𝑦 ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) → ((abs‘𝑦) = 𝑏𝑏𝑎))
6665rexlimdva 3286 . . . . . . . . 9 (((𝜑𝑎 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎) → (∃𝑦 ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))(abs‘𝑦) = 𝑏𝑏𝑎))
6748, 66syl5 34 . . . . . . . 8 (((𝜑𝑎 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎) → (𝑏 ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) → 𝑏𝑎))
6867ralrimiv 3183 . . . . . . 7 (((𝜑𝑎 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎) → ∀𝑏 ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))𝑏𝑎)
6968ex 415 . . . . . 6 ((𝜑𝑎 ∈ ℝ) → (∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎 → ∀𝑏 ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))𝑏𝑎))
7069reximdva 3276 . . . . 5 (𝜑 → (∃𝑎 ∈ ℝ ∀𝑥 ∈ (𝐴[,]𝐵)(abs‘(((ℝ D 𝐹) ↾ (𝐴[,]𝐵))‘𝑥)) ≤ 𝑎 → ∃𝑎 ∈ ℝ ∀𝑏 ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))𝑏𝑎))
7146, 70mpd 15 . . . 4 (𝜑 → ∃𝑎 ∈ ℝ ∀𝑏 ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))𝑏𝑎)
727, 39, 71suprcld 11606 . . 3 (𝜑 → sup((abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))), ℝ, < ) ∈ ℝ)
731, 72eqeltrid 2919 . 2 (𝜑𝐾 ∈ ℝ)
74 simplrr 776 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑦 ∈ (𝐴[,]𝐵))
7574fvresd 6692 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝐴[,]𝐵))‘𝑦) = (𝐹𝑦))
76 c1liplem1.cn . . . . . . . . . . . . . 14 (𝜑 → (𝐹 ↾ (𝐴[,]𝐵)) ∈ ((𝐴[,]𝐵)–cn→ℝ))
77 cncff 23503 . . . . . . . . . . . . . 14 ((𝐹 ↾ (𝐴[,]𝐵)) ∈ ((𝐴[,]𝐵)–cn→ℝ) → (𝐹 ↾ (𝐴[,]𝐵)):(𝐴[,]𝐵)⟶ℝ)
7876, 77syl 17 . . . . . . . . . . . . 13 (𝜑 → (𝐹 ↾ (𝐴[,]𝐵)):(𝐴[,]𝐵)⟶ℝ)
7978ad2antrr 724 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝐹 ↾ (𝐴[,]𝐵)):(𝐴[,]𝐵)⟶ℝ)
8079, 74ffvelrnd 6854 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝐴[,]𝐵))‘𝑦) ∈ ℝ)
8180recnd 10671 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝐴[,]𝐵))‘𝑦) ∈ ℂ)
8275, 81eqeltrrd 2916 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝐹𝑦) ∈ ℂ)
83 simplrl 775 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑥 ∈ (𝐴[,]𝐵))
8483fvresd 6692 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝐴[,]𝐵))‘𝑥) = (𝐹𝑥))
8579, 83ffvelrnd 6854 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝐴[,]𝐵))‘𝑥) ∈ ℝ)
8685recnd 10671 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝐴[,]𝐵))‘𝑥) ∈ ℂ)
8784, 86eqeltrrd 2916 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝐹𝑥) ∈ ℂ)
8882, 87subcld 10999 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹𝑦) − (𝐹𝑥)) ∈ ℂ)
89 iccssre 12821 . . . . . . . . . . . . 13 ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴[,]𝐵) ⊆ ℝ)
9018, 20, 89syl2anc 586 . . . . . . . . . . . 12 (𝜑 → (𝐴[,]𝐵) ⊆ ℝ)
9190ad2antrr 724 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝐴[,]𝐵) ⊆ ℝ)
9291, 74sseldd 3970 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑦 ∈ ℝ)
9391, 83sseldd 3970 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑥 ∈ ℝ)
9492, 93resubcld 11070 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑦𝑥) ∈ ℝ)
9594recnd 10671 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑦𝑥) ∈ ℂ)
96 simpr 487 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑥 < 𝑦)
97 difrp 12430 . . . . . . . . . . 11 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝑥 < 𝑦 ↔ (𝑦𝑥) ∈ ℝ+))
9893, 92, 97syl2anc 586 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑥 < 𝑦 ↔ (𝑦𝑥) ∈ ℝ+))
9996, 98mpbid 234 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑦𝑥) ∈ ℝ+)
10099rpne0d 12439 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑦𝑥) ≠ 0)
10188, 95, 100absdivd 14817 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘(((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥))) = ((abs‘((𝐹𝑦) − (𝐹𝑥))) / (abs‘(𝑦𝑥))))
1026a1i 11 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) ⊆ ℝ)
10339ad2antrr 724 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) ≠ ∅)
10471ad2antrr 724 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ∃𝑎 ∈ ℝ ∀𝑏 ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))𝑏𝑎)
10529a1i 11 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → Fun abs)
10688, 95, 100divcld 11418 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥)) ∈ ℂ)
107106, 34eleqtrrdi 2926 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥)) ∈ dom abs)
10893rexrd 10693 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑥 ∈ ℝ*)
10992rexrd 10693 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑦 ∈ ℝ*)
11093, 92, 96ltled 10790 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑥𝑦)
111 ubicc2 12856 . . . . . . . . . . . . . . 15 ((𝑥 ∈ ℝ*𝑦 ∈ ℝ*𝑥𝑦) → 𝑦 ∈ (𝑥[,]𝑦))
112108, 109, 110, 111syl3anc 1367 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑦 ∈ (𝑥[,]𝑦))
113112fvresd 6692 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) = (𝐹𝑦))
114 lbicc2 12855 . . . . . . . . . . . . . . 15 ((𝑥 ∈ ℝ*𝑦 ∈ ℝ*𝑥𝑦) → 𝑥 ∈ (𝑥[,]𝑦))
115108, 109, 110, 114syl3anc 1367 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝑥 ∈ (𝑥[,]𝑦))
116115fvresd 6692 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥) = (𝐹𝑥))
117113, 116oveq12d 7176 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) = ((𝐹𝑦) − (𝐹𝑥)))
118117oveq1d 7173 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) = (((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥)))
119 iccss2 12810 . . . . . . . . . . . . . . . 16 ((𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵)) → (𝑥[,]𝑦) ⊆ (𝐴[,]𝐵))
120119ad2antlr 725 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑥[,]𝑦) ⊆ (𝐴[,]𝐵))
121120resabs1d 5886 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝐴[,]𝐵)) ↾ (𝑥[,]𝑦)) = (𝐹 ↾ (𝑥[,]𝑦)))
12276ad2antrr 724 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝐹 ↾ (𝐴[,]𝐵)) ∈ ((𝐴[,]𝐵)–cn→ℝ))
123 rescncf 23507 . . . . . . . . . . . . . . 15 ((𝑥[,]𝑦) ⊆ (𝐴[,]𝐵) → ((𝐹 ↾ (𝐴[,]𝐵)) ∈ ((𝐴[,]𝐵)–cn→ℝ) → ((𝐹 ↾ (𝐴[,]𝐵)) ↾ (𝑥[,]𝑦)) ∈ ((𝑥[,]𝑦)–cn→ℝ)))
124120, 122, 123sylc 65 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((𝐹 ↾ (𝐴[,]𝐵)) ↾ (𝑥[,]𝑦)) ∈ ((𝑥[,]𝑦)–cn→ℝ))
125121, 124eqeltrrd 2916 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝐹 ↾ (𝑥[,]𝑦)) ∈ ((𝑥[,]𝑦)–cn→ℝ))
12640a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ℝ ⊆ ℂ)
127 c1liplem1.f . . . . . . . . . . . . . . . . . . 19 (𝜑𝐹 ∈ (ℂ ↑pm ℝ))
128127ad2antrr 724 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝐹 ∈ (ℂ ↑pm ℝ))
129 cnex 10620 . . . . . . . . . . . . . . . . . . . 20 ℂ ∈ V
130 reex 10630 . . . . . . . . . . . . . . . . . . . 20 ℝ ∈ V
131129, 130elpm2 8440 . . . . . . . . . . . . . . . . . . 19 (𝐹 ∈ (ℂ ↑pm ℝ) ↔ (𝐹:dom 𝐹⟶ℂ ∧ dom 𝐹 ⊆ ℝ))
132131simplbi 500 . . . . . . . . . . . . . . . . . 18 (𝐹 ∈ (ℂ ↑pm ℝ) → 𝐹:dom 𝐹⟶ℂ)
133128, 132syl 17 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝐹:dom 𝐹⟶ℂ)
134131simprbi 499 . . . . . . . . . . . . . . . . . 18 (𝐹 ∈ (ℂ ↑pm ℝ) → dom 𝐹 ⊆ ℝ)
135128, 134syl 17 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → dom 𝐹 ⊆ ℝ)
136 iccssre 12821 . . . . . . . . . . . . . . . . . 18 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝑥[,]𝑦) ⊆ ℝ)
13793, 92, 136syl2anc 586 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑥[,]𝑦) ⊆ ℝ)
138 eqid 2823 . . . . . . . . . . . . . . . . . 18 (TopOpen‘ℂfld) = (TopOpen‘ℂfld)
139138tgioo2 23413 . . . . . . . . . . . . . . . . . 18 (topGen‘ran (,)) = ((TopOpen‘ℂfld) ↾t ℝ)
140138, 139dvres 24511 . . . . . . . . . . . . . . . . 17 (((ℝ ⊆ ℂ ∧ 𝐹:dom 𝐹⟶ℂ) ∧ (dom 𝐹 ⊆ ℝ ∧ (𝑥[,]𝑦) ⊆ ℝ)) → (ℝ D (𝐹 ↾ (𝑥[,]𝑦))) = ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘(𝑥[,]𝑦))))
141126, 133, 135, 137, 140syl22anc 836 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (ℝ D (𝐹 ↾ (𝑥[,]𝑦))) = ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘(𝑥[,]𝑦))))
142 iccntr 23431 . . . . . . . . . . . . . . . . . 18 ((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ((int‘(topGen‘ran (,)))‘(𝑥[,]𝑦)) = (𝑥(,)𝑦))
14393, 92, 142syl2anc 586 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((int‘(topGen‘ran (,)))‘(𝑥[,]𝑦)) = (𝑥(,)𝑦))
144143reseq2d 5855 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((ℝ D 𝐹) ↾ ((int‘(topGen‘ran (,)))‘(𝑥[,]𝑦))) = ((ℝ D 𝐹) ↾ (𝑥(,)𝑦)))
145141, 144eqtrd 2858 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (ℝ D (𝐹 ↾ (𝑥[,]𝑦))) = ((ℝ D 𝐹) ↾ (𝑥(,)𝑦)))
146145dmeqd 5776 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → dom (ℝ D (𝐹 ↾ (𝑥[,]𝑦))) = dom ((ℝ D 𝐹) ↾ (𝑥(,)𝑦)))
147 ioossicc 12825 . . . . . . . . . . . . . . . . 17 (𝑥(,)𝑦) ⊆ (𝑥[,]𝑦)
148147, 120sstrid 3980 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑥(,)𝑦) ⊆ (𝐴[,]𝐵))
14917ad2antrr 724 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝐴[,]𝐵) ⊆ dom (ℝ D 𝐹))
150148, 149sstrd 3979 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑥(,)𝑦) ⊆ dom (ℝ D 𝐹))
151 ssdmres 5878 . . . . . . . . . . . . . . 15 ((𝑥(,)𝑦) ⊆ dom (ℝ D 𝐹) ↔ dom ((ℝ D 𝐹) ↾ (𝑥(,)𝑦)) = (𝑥(,)𝑦))
152150, 151sylib 220 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → dom ((ℝ D 𝐹) ↾ (𝑥(,)𝑦)) = (𝑥(,)𝑦))
153146, 152eqtrd 2858 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → dom (ℝ D (𝐹 ↾ (𝑥[,]𝑦))) = (𝑥(,)𝑦))
15493, 92, 96, 125, 153mvth 24591 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ∃𝑎 ∈ (𝑥(,)𝑦)((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) = ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)))
155145fveq1d 6674 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) = (((ℝ D 𝐹) ↾ (𝑥(,)𝑦))‘𝑎))
156155adantrr 715 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → ((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) = (((ℝ D 𝐹) ↾ (𝑥(,)𝑦))‘𝑎))
157 fvres 6691 . . . . . . . . . . . . . . . . . 18 (𝑎 ∈ (𝑥(,)𝑦) → (((ℝ D 𝐹) ↾ (𝑥(,)𝑦))‘𝑎) = ((ℝ D 𝐹)‘𝑎))
158157ad2antll 727 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → (((ℝ D 𝐹) ↾ (𝑥(,)𝑦))‘𝑎) = ((ℝ D 𝐹)‘𝑎))
159156, 158eqtrd 2858 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → ((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) = ((ℝ D 𝐹)‘𝑎))
16010a1i 11 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → Fun (ℝ D 𝐹))
16117ad2antrr 724 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → (𝐴[,]𝐵) ⊆ dom (ℝ D 𝐹))
162148sseld 3968 . . . . . . . . . . . . . . . . . 18 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑎 ∈ (𝑥(,)𝑦) → 𝑎 ∈ (𝐴[,]𝐵)))
163162impr 457 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → 𝑎 ∈ (𝐴[,]𝐵))
164 funfvima2 6995 . . . . . . . . . . . . . . . . . 18 ((Fun (ℝ D 𝐹) ∧ (𝐴[,]𝐵) ⊆ dom (ℝ D 𝐹)) → (𝑎 ∈ (𝐴[,]𝐵) → ((ℝ D 𝐹)‘𝑎) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))))
165164imp 409 . . . . . . . . . . . . . . . . 17 (((Fun (ℝ D 𝐹) ∧ (𝐴[,]𝐵) ⊆ dom (ℝ D 𝐹)) ∧ 𝑎 ∈ (𝐴[,]𝐵)) → ((ℝ D 𝐹)‘𝑎) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))
166160, 161, 163, 165syl21anc 835 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → ((ℝ D 𝐹)‘𝑎) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))
167159, 166eqeltrd 2915 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → ((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))
168 eleq1 2902 . . . . . . . . . . . . . . 15 (((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) = ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) → (((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)) ↔ ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))))
169167, 168syl5ibcom 247 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ (𝑥 < 𝑦𝑎 ∈ (𝑥(,)𝑦))) → (((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) = ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) → ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))))
170169expr 459 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (𝑎 ∈ (𝑥(,)𝑦) → (((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) = ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) → ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))))
171170rexlimdv 3285 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (∃𝑎 ∈ (𝑥(,)𝑦)((ℝ D (𝐹 ↾ (𝑥[,]𝑦)))‘𝑎) = ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) → ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))))
172154, 171mpd 15 . . . . . . . . . . 11 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((((𝐹 ↾ (𝑥[,]𝑦))‘𝑦) − ((𝐹 ↾ (𝑥[,]𝑦))‘𝑥)) / (𝑦𝑥)) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))
173118, 172eqeltrrd 2916 . . . . . . . . . 10 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥)) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))
174 funfvima 6994 . . . . . . . . . . 11 ((Fun abs ∧ (((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥)) ∈ dom abs) → ((((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥)) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵)) → (abs‘(((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥))) ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵)))))
175174imp 409 . . . . . . . . . 10 (((Fun abs ∧ (((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥)) ∈ dom abs) ∧ (((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥)) ∈ ((ℝ D 𝐹) “ (𝐴[,]𝐵))) → (abs‘(((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥))) ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))))
176105, 107, 173, 175syl21anc 835 . . . . . . . . 9 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘(((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥))) ∈ (abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))))
177102, 103, 104, 176suprubd 11605 . . . . . . . 8 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘(((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥))) ≤ sup((abs “ ((ℝ D 𝐹) “ (𝐴[,]𝐵))), ℝ, < ))
178177, 1breqtrrdi 5110 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘(((𝐹𝑦) − (𝐹𝑥)) / (𝑦𝑥))) ≤ 𝐾)
179101, 178eqbrtrrd 5092 . . . . . 6 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((abs‘((𝐹𝑦) − (𝐹𝑥))) / (abs‘(𝑦𝑥))) ≤ 𝐾)
18088abscld 14798 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘((𝐹𝑦) − (𝐹𝑥))) ∈ ℝ)
18173ad2antrr 724 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝐾 ∈ ℝ)
18295, 100absrpcld 14810 . . . . . . 7 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘(𝑦𝑥)) ∈ ℝ+)
183180, 181, 182ledivmuld 12487 . . . . . 6 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (((abs‘((𝐹𝑦) − (𝐹𝑥))) / (abs‘(𝑦𝑥))) ≤ 𝐾 ↔ (abs‘((𝐹𝑦) − (𝐹𝑥))) ≤ ((abs‘(𝑦𝑥)) · 𝐾)))
184179, 183mpbid 234 . . . . 5 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘((𝐹𝑦) − (𝐹𝑥))) ≤ ((abs‘(𝑦𝑥)) · 𝐾))
185182rpcnd 12436 . . . . . 6 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘(𝑦𝑥)) ∈ ℂ)
186181recnd 10671 . . . . . 6 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → 𝐾 ∈ ℂ)
187185, 186mulcomd 10664 . . . . 5 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → ((abs‘(𝑦𝑥)) · 𝐾) = (𝐾 · (abs‘(𝑦𝑥))))
188184, 187breqtrd 5094 . . . 4 (((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) ∧ 𝑥 < 𝑦) → (abs‘((𝐹𝑦) − (𝐹𝑥))) ≤ (𝐾 · (abs‘(𝑦𝑥))))
189188ex 415 . . 3 ((𝜑 ∧ (𝑥 ∈ (𝐴[,]𝐵) ∧ 𝑦 ∈ (𝐴[,]𝐵))) → (𝑥 < 𝑦 → (abs‘((𝐹𝑦) − (𝐹𝑥))) ≤ (𝐾 · (abs‘(𝑦𝑥)))))
190189ralrimivva 3193 . 2 (𝜑 → ∀𝑥 ∈ (𝐴[,]𝐵)∀𝑦 ∈ (𝐴[,]𝐵)(𝑥 < 𝑦 → (abs‘((𝐹𝑦) − (𝐹𝑥))) ≤ (𝐾 · (abs‘(𝑦𝑥)))))
19173, 190jca 514 1 (𝜑 → (𝐾 ∈ ℝ ∧ ∀𝑥 ∈ (𝐴[,]𝐵)∀𝑦 ∈ (𝐴[,]𝐵)(𝑥 < 𝑦 → (abs‘((𝐹𝑦) − (𝐹𝑥))) ≤ (𝐾 · (abs‘(𝑦𝑥))))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 208  wa 398   = wceq 1537  wcel 2114  wne 3018  wral 3140  wrex 3141  wss 3938  c0 4293   class class class wbr 5068  dom cdm 5557  ran crn 5558  cres 5559  cima 5560  Fun wfun 6351  wf 6353  cfv 6357  (class class class)co 7158  pm cpm 8409  supcsup 8906  cc 10537  cr 10538   · cmul 10544  *cxr 10676   < clt 10677  cle 10678  cmin 10872   / cdiv 11299  +crp 12392  (,)cioo 12741  [,]cicc 12744  abscabs 14595  TopOpenctopn 16697  topGenctg 16713  fldccnfld 20547  intcnt 21627  cnccncf 23486   D cdv 24463
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2795  ax-rep 5192  ax-sep 5205  ax-nul 5212  ax-pow 5268  ax-pr 5332  ax-un 7463  ax-cnex 10595  ax-resscn 10596  ax-1cn 10597  ax-icn 10598  ax-addcl 10599  ax-addrcl 10600  ax-mulcl 10601  ax-mulrcl 10602  ax-mulcom 10603  ax-addass 10604  ax-mulass 10605  ax-distr 10606  ax-i2m1 10607  ax-1ne0 10608  ax-1rid 10609  ax-rnegex 10610  ax-rrecex 10611  ax-cnre 10612  ax-pre-lttri 10613  ax-pre-lttrn 10614  ax-pre-ltadd 10615  ax-pre-mulgt0 10616  ax-pre-sup 10617  ax-addf 10618  ax-mulf 10619
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2802  df-cleq 2816  df-clel 2895  df-nfc 2965  df-ne 3019  df-nel 3126  df-ral 3145  df-rex 3146  df-reu 3147  df-rmo 3148  df-rab 3149  df-v 3498  df-sbc 3775  df-csb 3886  df-dif 3941  df-un 3943  df-in 3945  df-ss 3954  df-pss 3956  df-nul 4294  df-if 4470  df-pw 4543  df-sn 4570  df-pr 4572  df-tp 4574  df-op 4576  df-uni 4841  df-int 4879  df-iun 4923  df-iin 4924  df-br 5069  df-opab 5131  df-mpt 5149  df-tr 5175  df-id 5462  df-eprel 5467  df-po 5476  df-so 5477  df-fr 5516  df-se 5517  df-we 5518  df-xp 5563  df-rel 5564  df-cnv 5565  df-co 5566  df-dm 5567  df-rn 5568  df-res 5569  df-ima 5570  df-pred 6150  df-ord 6196  df-on 6197  df-lim 6198  df-suc 6199  df-iota 6316  df-fun 6359  df-fn 6360  df-f 6361  df-f1 6362  df-fo 6363  df-f1o 6364  df-fv 6365  df-isom 6366  df-riota 7116  df-ov 7161  df-oprab 7162  df-mpo 7163  df-of 7411  df-om 7583  df-1st 7691  df-2nd 7692  df-supp 7833  df-wrecs 7949  df-recs 8010  df-rdg 8048  df-1o 8104  df-2o 8105  df-oadd 8108  df-er 8291  df-map 8410  df-pm 8411  df-ixp 8464  df-en 8512  df-dom 8513  df-sdom 8514  df-fin 8515  df-fsupp 8836  df-fi 8877  df-sup 8908  df-inf 8909  df-oi 8976  df-card 9370  df-pnf 10679  df-mnf 10680  df-xr 10681  df-ltxr 10682  df-le 10683  df-sub 10874  df-neg 10875  df-div 11300  df-nn 11641  df-2 11703  df-3 11704  df-4 11705  df-5 11706  df-6 11707  df-7 11708  df-8 11709  df-9 11710  df-n0 11901  df-z 11985  df-dec 12102  df-uz 12247  df-q 12352  df-rp 12393  df-xneg 12510  df-xadd 12511  df-xmul 12512  df-ioo 12745  df-ico 12747  df-icc 12748  df-fz 12896  df-fzo 13037  df-seq 13373  df-exp 13433  df-hash 13694  df-cj 14460  df-re 14461  df-im 14462  df-sqrt 14596  df-abs 14597  df-struct 16487  df-ndx 16488  df-slot 16489  df-base 16491  df-sets 16492  df-ress 16493  df-plusg 16580  df-mulr 16581  df-starv 16582  df-sca 16583  df-vsca 16584  df-ip 16585  df-tset 16586  df-ple 16587  df-ds 16589  df-unif 16590  df-hom 16591  df-cco 16592  df-rest 16698  df-topn 16699  df-0g 16717  df-gsum 16718  df-topgen 16719  df-pt 16720  df-prds 16723  df-xrs 16777  df-qtop 16782  df-imas 16783  df-xps 16785  df-mre 16859  df-mrc 16860  df-acs 16862  df-mgm 17854  df-sgrp 17903  df-mnd 17914  df-submnd 17959  df-mulg 18227  df-cntz 18449  df-cmn 18910  df-psmet 20539  df-xmet 20540  df-met 20541  df-bl 20542  df-mopn 20543  df-fbas 20544  df-fg 20545  df-cnfld 20548  df-top 21504  df-topon 21521  df-topsp 21543  df-bases 21556  df-cld 21629  df-ntr 21630  df-cls 21631  df-nei 21708  df-lp 21746  df-perf 21747  df-cn 21837  df-cnp 21838  df-haus 21925  df-cmp 21997  df-tx 22172  df-hmeo 22365  df-fil 22456  df-fm 22548  df-flim 22549  df-flf 22550  df-xms 22932  df-ms 22933  df-tms 22934  df-cncf 23488  df-limc 24466  df-dv 24467
This theorem is referenced by:  c1lip1  24596
  Copyright terms: Public domain W3C validator