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

Theorem lhop2 25524
Description: L'HΓ΄pital's Rule for limits from the left. If 𝐹 and 𝐺 are differentiable real functions on (𝐴, 𝐡), and 𝐹 and 𝐺 both approach 0 at 𝐡, and 𝐺(π‘₯) and 𝐺' (π‘₯) are not zero on (𝐴, 𝐡), and the limit of 𝐹' (π‘₯) / 𝐺' (π‘₯) at 𝐡 is 𝐢, then the limit 𝐹(π‘₯) / 𝐺(π‘₯) at 𝐡 also exists and equals 𝐢. (Contributed by Mario Carneiro, 29-Dec-2016.)
Hypotheses
Ref Expression
lhop2.a (πœ‘ β†’ 𝐴 ∈ ℝ*)
lhop2.b (πœ‘ β†’ 𝐡 ∈ ℝ)
lhop2.l (πœ‘ β†’ 𝐴 < 𝐡)
lhop2.f (πœ‘ β†’ 𝐹:(𝐴(,)𝐡)βŸΆβ„)
lhop2.g (πœ‘ β†’ 𝐺:(𝐴(,)𝐡)βŸΆβ„)
lhop2.if (πœ‘ β†’ dom (ℝ D 𝐹) = (𝐴(,)𝐡))
lhop2.ig (πœ‘ β†’ dom (ℝ D 𝐺) = (𝐴(,)𝐡))
lhop2.f0 (πœ‘ β†’ 0 ∈ (𝐹 limβ„‚ 𝐡))
lhop2.g0 (πœ‘ β†’ 0 ∈ (𝐺 limβ„‚ 𝐡))
lhop2.gn0 (πœ‘ β†’ Β¬ 0 ∈ ran 𝐺)
lhop2.gd0 (πœ‘ β†’ Β¬ 0 ∈ ran (ℝ D 𝐺))
lhop2.c (πœ‘ β†’ 𝐢 ∈ ((𝑧 ∈ (𝐴(,)𝐡) ↦ (((ℝ D 𝐹)β€˜π‘§) / ((ℝ D 𝐺)β€˜π‘§))) limβ„‚ 𝐡))
Assertion
Ref Expression
lhop2 (πœ‘ β†’ 𝐢 ∈ ((𝑧 ∈ (𝐴(,)𝐡) ↦ ((πΉβ€˜π‘§) / (πΊβ€˜π‘§))) limβ„‚ 𝐡))
Distinct variable groups:   𝑧,𝐴   𝑧,𝐡   𝑧,𝐢   πœ‘,𝑧   𝑧,𝐹   𝑧,𝐺

Proof of Theorem lhop2
Dummy variables π‘₯ π‘Ž 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 qssre 12940 . . 3 β„š βŠ† ℝ
2 lhop2.a . . . 4 (πœ‘ β†’ 𝐴 ∈ ℝ*)
3 lhop2.b . . . . 5 (πœ‘ β†’ 𝐡 ∈ ℝ)
43rexrd 11261 . . . 4 (πœ‘ β†’ 𝐡 ∈ ℝ*)
5 lhop2.l . . . 4 (πœ‘ β†’ 𝐴 < 𝐡)
6 qbtwnxr 13176 . . . 4 ((𝐴 ∈ ℝ* ∧ 𝐡 ∈ ℝ* ∧ 𝐴 < 𝐡) β†’ βˆƒπ‘Ž ∈ β„š (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))
72, 4, 5, 6syl3anc 1372 . . 3 (πœ‘ β†’ βˆƒπ‘Ž ∈ β„š (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))
8 ssrexv 4051 . . 3 (β„š βŠ† ℝ β†’ (βˆƒπ‘Ž ∈ β„š (𝐴 < π‘Ž ∧ π‘Ž < 𝐡) β†’ βˆƒπ‘Ž ∈ ℝ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡)))
91, 7, 8mpsyl 68 . 2 (πœ‘ β†’ βˆƒπ‘Ž ∈ ℝ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))
10 simpr 486 . . . . . 6 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ 𝑧 ∈ (π‘Ž(,)𝐡))
11 simprl 770 . . . . . . . 8 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ π‘Ž ∈ ℝ)
1211adantr 482 . . . . . . 7 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ π‘Ž ∈ ℝ)
133ad2antrr 725 . . . . . . 7 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ 𝐡 ∈ ℝ)
14 elioore 13351 . . . . . . . 8 (𝑧 ∈ (π‘Ž(,)𝐡) β†’ 𝑧 ∈ ℝ)
1514adantl 483 . . . . . . 7 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ 𝑧 ∈ ℝ)
16 iooneg 13445 . . . . . . 7 ((π‘Ž ∈ ℝ ∧ 𝐡 ∈ ℝ ∧ 𝑧 ∈ ℝ) β†’ (𝑧 ∈ (π‘Ž(,)𝐡) ↔ -𝑧 ∈ (-𝐡(,)-π‘Ž)))
1712, 13, 15, 16syl3anc 1372 . . . . . 6 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ (𝑧 ∈ (π‘Ž(,)𝐡) ↔ -𝑧 ∈ (-𝐡(,)-π‘Ž)))
1810, 17mpbid 231 . . . . 5 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ -𝑧 ∈ (-𝐡(,)-π‘Ž))
1918adantrr 716 . . . 4 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ (𝑧 ∈ (π‘Ž(,)𝐡) ∧ -𝑧 β‰  -𝐡)) β†’ -𝑧 ∈ (-𝐡(,)-π‘Ž))
20 lhop2.f . . . . . . . 8 (πœ‘ β†’ 𝐹:(𝐴(,)𝐡)βŸΆβ„)
2120ad2antrr 725 . . . . . . 7 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ 𝐹:(𝐴(,)𝐡)βŸΆβ„)
22 elioore 13351 . . . . . . . . . . . . 13 (π‘₯ ∈ (-𝐡(,)-π‘Ž) β†’ π‘₯ ∈ ℝ)
2322adantl 483 . . . . . . . . . . . 12 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ π‘₯ ∈ ℝ)
2423recnd 11239 . . . . . . . . . . 11 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ π‘₯ ∈ β„‚)
2524negnegd 11559 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ --π‘₯ = π‘₯)
26 simpr 486 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ π‘₯ ∈ (-𝐡(,)-π‘Ž))
2725, 26eqeltrd 2834 . . . . . . . . 9 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ --π‘₯ ∈ (-𝐡(,)-π‘Ž))
2811adantr 482 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ π‘Ž ∈ ℝ)
293ad2antrr 725 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ 𝐡 ∈ ℝ)
3023renegcld 11638 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ -π‘₯ ∈ ℝ)
31 iooneg 13445 . . . . . . . . . 10 ((π‘Ž ∈ ℝ ∧ 𝐡 ∈ ℝ ∧ -π‘₯ ∈ ℝ) β†’ (-π‘₯ ∈ (π‘Ž(,)𝐡) ↔ --π‘₯ ∈ (-𝐡(,)-π‘Ž)))
3228, 29, 30, 31syl3anc 1372 . . . . . . . . 9 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (-π‘₯ ∈ (π‘Ž(,)𝐡) ↔ --π‘₯ ∈ (-𝐡(,)-π‘Ž)))
3327, 32mpbird 257 . . . . . . . 8 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ -π‘₯ ∈ (π‘Ž(,)𝐡))
342adantr 482 . . . . . . . . . 10 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐴 ∈ ℝ*)
3511rexrd 11261 . . . . . . . . . . 11 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ π‘Ž ∈ ℝ*)
36 simprrl 780 . . . . . . . . . . 11 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐴 < π‘Ž)
3734, 35, 36xrltled 13126 . . . . . . . . . 10 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐴 ≀ π‘Ž)
38 iooss1 13356 . . . . . . . . . 10 ((𝐴 ∈ ℝ* ∧ 𝐴 ≀ π‘Ž) β†’ (π‘Ž(,)𝐡) βŠ† (𝐴(,)𝐡))
3934, 37, 38syl2anc 585 . . . . . . . . 9 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (π‘Ž(,)𝐡) βŠ† (𝐴(,)𝐡))
4039sselda 3982 . . . . . . . 8 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ -π‘₯ ∈ (π‘Ž(,)𝐡)) β†’ -π‘₯ ∈ (𝐴(,)𝐡))
4133, 40syldan 592 . . . . . . 7 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ -π‘₯ ∈ (𝐴(,)𝐡))
4221, 41ffvelcdmd 7085 . . . . . 6 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (πΉβ€˜-π‘₯) ∈ ℝ)
4342recnd 11239 . . . . 5 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (πΉβ€˜-π‘₯) ∈ β„‚)
44 lhop2.g . . . . . . . 8 (πœ‘ β†’ 𝐺:(𝐴(,)𝐡)βŸΆβ„)
4544ad2antrr 725 . . . . . . 7 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ 𝐺:(𝐴(,)𝐡)βŸΆβ„)
4645, 41ffvelcdmd 7085 . . . . . 6 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (πΊβ€˜-π‘₯) ∈ ℝ)
4746recnd 11239 . . . . 5 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (πΊβ€˜-π‘₯) ∈ β„‚)
48 lhop2.gn0 . . . . . . 7 (πœ‘ β†’ Β¬ 0 ∈ ran 𝐺)
4948ad2antrr 725 . . . . . 6 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ Β¬ 0 ∈ ran 𝐺)
5044adantr 482 . . . . . . . . . . . 12 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐺:(𝐴(,)𝐡)βŸΆβ„)
51 ax-resscn 11164 . . . . . . . . . . . 12 ℝ βŠ† β„‚
52 fss 6732 . . . . . . . . . . . 12 ((𝐺:(𝐴(,)𝐡)βŸΆβ„ ∧ ℝ βŠ† β„‚) β†’ 𝐺:(𝐴(,)𝐡)βŸΆβ„‚)
5350, 51, 52sylancl 587 . . . . . . . . . . 11 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐺:(𝐴(,)𝐡)βŸΆβ„‚)
5453adantr 482 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ 𝐺:(𝐴(,)𝐡)βŸΆβ„‚)
5554ffnd 6716 . . . . . . . . 9 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ 𝐺 Fn (𝐴(,)𝐡))
56 fnfvelrn 7080 . . . . . . . . 9 ((𝐺 Fn (𝐴(,)𝐡) ∧ -π‘₯ ∈ (𝐴(,)𝐡)) β†’ (πΊβ€˜-π‘₯) ∈ ran 𝐺)
5755, 41, 56syl2anc 585 . . . . . . . 8 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (πΊβ€˜-π‘₯) ∈ ran 𝐺)
58 eleq1 2822 . . . . . . . 8 ((πΊβ€˜-π‘₯) = 0 β†’ ((πΊβ€˜-π‘₯) ∈ ran 𝐺 ↔ 0 ∈ ran 𝐺))
5957, 58syl5ibcom 244 . . . . . . 7 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ ((πΊβ€˜-π‘₯) = 0 β†’ 0 ∈ ran 𝐺))
6059necon3bd 2955 . . . . . 6 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (Β¬ 0 ∈ ran 𝐺 β†’ (πΊβ€˜-π‘₯) β‰  0))
6149, 60mpd 15 . . . . 5 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (πΊβ€˜-π‘₯) β‰  0)
6243, 47, 61divcld 11987 . . . 4 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ ((πΉβ€˜-π‘₯) / (πΊβ€˜-π‘₯)) ∈ β„‚)
63 limcresi 25394 . . . . . 6 ((𝑧 ∈ ℝ ↦ -𝑧) limβ„‚ 𝐡) βŠ† (((𝑧 ∈ ℝ ↦ -𝑧) β†Ύ (π‘Ž(,)𝐡)) limβ„‚ 𝐡)
64 ioossre 13382 . . . . . . . 8 (π‘Ž(,)𝐡) βŠ† ℝ
65 resmpt 6036 . . . . . . . 8 ((π‘Ž(,)𝐡) βŠ† ℝ β†’ ((𝑧 ∈ ℝ ↦ -𝑧) β†Ύ (π‘Ž(,)𝐡)) = (𝑧 ∈ (π‘Ž(,)𝐡) ↦ -𝑧))
6664, 65ax-mp 5 . . . . . . 7 ((𝑧 ∈ ℝ ↦ -𝑧) β†Ύ (π‘Ž(,)𝐡)) = (𝑧 ∈ (π‘Ž(,)𝐡) ↦ -𝑧)
6766oveq1i 7416 . . . . . 6 (((𝑧 ∈ ℝ ↦ -𝑧) β†Ύ (π‘Ž(,)𝐡)) limβ„‚ 𝐡) = ((𝑧 ∈ (π‘Ž(,)𝐡) ↦ -𝑧) limβ„‚ 𝐡)
6863, 67sseqtri 4018 . . . . 5 ((𝑧 ∈ ℝ ↦ -𝑧) limβ„‚ 𝐡) βŠ† ((𝑧 ∈ (π‘Ž(,)𝐡) ↦ -𝑧) limβ„‚ 𝐡)
69 eqid 2733 . . . . . . . 8 (𝑧 ∈ ℝ ↦ -𝑧) = (𝑧 ∈ ℝ ↦ -𝑧)
7069negcncf 24430 . . . . . . 7 (ℝ βŠ† β„‚ β†’ (𝑧 ∈ ℝ ↦ -𝑧) ∈ (ℝ–cnβ†’β„‚))
7151, 70mp1i 13 . . . . . 6 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (𝑧 ∈ ℝ ↦ -𝑧) ∈ (ℝ–cnβ†’β„‚))
723adantr 482 . . . . . 6 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐡 ∈ ℝ)
73 negeq 11449 . . . . . 6 (𝑧 = 𝐡 β†’ -𝑧 = -𝐡)
7471, 72, 73cnmptlimc 25399 . . . . 5 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ -𝐡 ∈ ((𝑧 ∈ ℝ ↦ -𝑧) limβ„‚ 𝐡))
7568, 74sselid 3980 . . . 4 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ -𝐡 ∈ ((𝑧 ∈ (π‘Ž(,)𝐡) ↦ -𝑧) limβ„‚ 𝐡))
7672renegcld 11638 . . . . . 6 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ -𝐡 ∈ ℝ)
7711renegcld 11638 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ -π‘Ž ∈ ℝ)
7877rexrd 11261 . . . . . 6 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ -π‘Ž ∈ ℝ*)
79 simprrr 781 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ π‘Ž < 𝐡)
8011, 72ltnegd 11789 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (π‘Ž < 𝐡 ↔ -𝐡 < -π‘Ž))
8179, 80mpbid 231 . . . . . 6 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ -𝐡 < -π‘Ž)
8242fmpttd 7112 . . . . . 6 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)):(-𝐡(,)-π‘Ž)βŸΆβ„)
8346fmpttd 7112 . . . . . 6 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)):(-𝐡(,)-π‘Ž)βŸΆβ„)
84 reelprrecn 11199 . . . . . . . . . . 11 ℝ ∈ {ℝ, β„‚}
8584a1i 11 . . . . . . . . . 10 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ℝ ∈ {ℝ, β„‚})
86 neg1cn 12323 . . . . . . . . . . 11 -1 ∈ β„‚
8786a1i 11 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ -1 ∈ β„‚)
8820adantr 482 . . . . . . . . . . . 12 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐹:(𝐴(,)𝐡)βŸΆβ„)
8988ffvelcdmda 7084 . . . . . . . . . . 11 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑦 ∈ (𝐴(,)𝐡)) β†’ (πΉβ€˜π‘¦) ∈ ℝ)
9089recnd 11239 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑦 ∈ (𝐴(,)𝐡)) β†’ (πΉβ€˜π‘¦) ∈ β„‚)
91 fvexd 6904 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑦 ∈ (𝐴(,)𝐡)) β†’ ((ℝ D 𝐹)β€˜π‘¦) ∈ V)
92 1cnd 11206 . . . . . . . . . . 11 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ 1 ∈ β„‚)
93 simpr 486 . . . . . . . . . . . . 13 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ ℝ) β†’ π‘₯ ∈ ℝ)
9493recnd 11239 . . . . . . . . . . . 12 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ ℝ) β†’ π‘₯ ∈ β„‚)
95 1cnd 11206 . . . . . . . . . . . 12 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ ℝ) β†’ 1 ∈ β„‚)
9685dvmptid 25466 . . . . . . . . . . . 12 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (ℝ D (π‘₯ ∈ ℝ ↦ π‘₯)) = (π‘₯ ∈ ℝ ↦ 1))
97 ioossre 13382 . . . . . . . . . . . . 13 (-𝐡(,)-π‘Ž) βŠ† ℝ
9897a1i 11 . . . . . . . . . . . 12 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (-𝐡(,)-π‘Ž) βŠ† ℝ)
99 eqid 2733 . . . . . . . . . . . . 13 (TopOpenβ€˜β„‚fld) = (TopOpenβ€˜β„‚fld)
10099tgioo2 24311 . . . . . . . . . . . 12 (topGenβ€˜ran (,)) = ((TopOpenβ€˜β„‚fld) β†Ύt ℝ)
101 iooretop 24274 . . . . . . . . . . . . 13 (-𝐡(,)-π‘Ž) ∈ (topGenβ€˜ran (,))
102101a1i 11 . . . . . . . . . . . 12 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (-𝐡(,)-π‘Ž) ∈ (topGenβ€˜ran (,)))
10385, 94, 95, 96, 98, 100, 99, 102dvmptres 25472 . . . . . . . . . . 11 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ π‘₯)) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ 1))
10485, 24, 92, 103dvmptneg 25475 . . . . . . . . . 10 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -π‘₯)) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -1))
10588feqmptd 6958 . . . . . . . . . . . 12 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐹 = (𝑦 ∈ (𝐴(,)𝐡) ↦ (πΉβ€˜π‘¦)))
106105oveq2d 7422 . . . . . . . . . . 11 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (ℝ D 𝐹) = (ℝ D (𝑦 ∈ (𝐴(,)𝐡) ↦ (πΉβ€˜π‘¦))))
107 dvf 25416 . . . . . . . . . . . . 13 (ℝ D 𝐹):dom (ℝ D 𝐹)βŸΆβ„‚
108 lhop2.if . . . . . . . . . . . . . . 15 (πœ‘ β†’ dom (ℝ D 𝐹) = (𝐴(,)𝐡))
109108adantr 482 . . . . . . . . . . . . . 14 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ dom (ℝ D 𝐹) = (𝐴(,)𝐡))
110109feq2d 6701 . . . . . . . . . . . . 13 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((ℝ D 𝐹):dom (ℝ D 𝐹)βŸΆβ„‚ ↔ (ℝ D 𝐹):(𝐴(,)𝐡)βŸΆβ„‚))
111107, 110mpbii 232 . . . . . . . . . . . 12 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (ℝ D 𝐹):(𝐴(,)𝐡)βŸΆβ„‚)
112111feqmptd 6958 . . . . . . . . . . 11 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (ℝ D 𝐹) = (𝑦 ∈ (𝐴(,)𝐡) ↦ ((ℝ D 𝐹)β€˜π‘¦)))
113106, 112eqtr3d 2775 . . . . . . . . . 10 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (ℝ D (𝑦 ∈ (𝐴(,)𝐡) ↦ (πΉβ€˜π‘¦))) = (𝑦 ∈ (𝐴(,)𝐡) ↦ ((ℝ D 𝐹)β€˜π‘¦)))
114 fveq2 6889 . . . . . . . . . 10 (𝑦 = -π‘₯ β†’ (πΉβ€˜π‘¦) = (πΉβ€˜-π‘₯))
115 fveq2 6889 . . . . . . . . . 10 (𝑦 = -π‘₯ β†’ ((ℝ D 𝐹)β€˜π‘¦) = ((ℝ D 𝐹)β€˜-π‘₯))
11685, 85, 41, 87, 90, 91, 104, 113, 114, 115dvmptco 25481 . . . . . . . . 9 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (((ℝ D 𝐹)β€˜-π‘₯) Β· -1)))
117111adantr 482 . . . . . . . . . . . . 13 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (ℝ D 𝐹):(𝐴(,)𝐡)βŸΆβ„‚)
118117, 41ffvelcdmd 7085 . . . . . . . . . . . 12 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ ((ℝ D 𝐹)β€˜-π‘₯) ∈ β„‚)
119118, 87mulcomd 11232 . . . . . . . . . . 11 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (((ℝ D 𝐹)β€˜-π‘₯) Β· -1) = (-1 Β· ((ℝ D 𝐹)β€˜-π‘₯)))
120118mulm1d 11663 . . . . . . . . . . 11 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (-1 Β· ((ℝ D 𝐹)β€˜-π‘₯)) = -((ℝ D 𝐹)β€˜-π‘₯))
121119, 120eqtrd 2773 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (((ℝ D 𝐹)β€˜-π‘₯) Β· -1) = -((ℝ D 𝐹)β€˜-π‘₯))
122121mpteq2dva 5248 . . . . . . . . 9 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (((ℝ D 𝐹)β€˜-π‘₯) Β· -1)) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐹)β€˜-π‘₯)))
123116, 122eqtrd 2773 . . . . . . . 8 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐹)β€˜-π‘₯)))
124123dmeqd 5904 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ dom (ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))) = dom (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐹)β€˜-π‘₯)))
125 negex 11455 . . . . . . . 8 -((ℝ D 𝐹)β€˜-π‘₯) ∈ V
126 eqid 2733 . . . . . . . 8 (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐹)β€˜-π‘₯)) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐹)β€˜-π‘₯))
127125, 126dmmpti 6692 . . . . . . 7 dom (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐹)β€˜-π‘₯)) = (-𝐡(,)-π‘Ž)
128124, 127eqtrdi 2789 . . . . . 6 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ dom (ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))) = (-𝐡(,)-π‘Ž))
12950ffvelcdmda 7084 . . . . . . . . . . 11 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑦 ∈ (𝐴(,)𝐡)) β†’ (πΊβ€˜π‘¦) ∈ ℝ)
130129recnd 11239 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑦 ∈ (𝐴(,)𝐡)) β†’ (πΊβ€˜π‘¦) ∈ β„‚)
131 fvexd 6904 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑦 ∈ (𝐴(,)𝐡)) β†’ ((ℝ D 𝐺)β€˜π‘¦) ∈ V)
13250feqmptd 6958 . . . . . . . . . . . 12 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐺 = (𝑦 ∈ (𝐴(,)𝐡) ↦ (πΊβ€˜π‘¦)))
133132oveq2d 7422 . . . . . . . . . . 11 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (ℝ D 𝐺) = (ℝ D (𝑦 ∈ (𝐴(,)𝐡) ↦ (πΊβ€˜π‘¦))))
134 dvf 25416 . . . . . . . . . . . . 13 (ℝ D 𝐺):dom (ℝ D 𝐺)βŸΆβ„‚
135 lhop2.ig . . . . . . . . . . . . . . 15 (πœ‘ β†’ dom (ℝ D 𝐺) = (𝐴(,)𝐡))
136135adantr 482 . . . . . . . . . . . . . 14 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ dom (ℝ D 𝐺) = (𝐴(,)𝐡))
137136feq2d 6701 . . . . . . . . . . . . 13 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((ℝ D 𝐺):dom (ℝ D 𝐺)βŸΆβ„‚ ↔ (ℝ D 𝐺):(𝐴(,)𝐡)βŸΆβ„‚))
138134, 137mpbii 232 . . . . . . . . . . . 12 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (ℝ D 𝐺):(𝐴(,)𝐡)βŸΆβ„‚)
139138feqmptd 6958 . . . . . . . . . . 11 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (ℝ D 𝐺) = (𝑦 ∈ (𝐴(,)𝐡) ↦ ((ℝ D 𝐺)β€˜π‘¦)))
140133, 139eqtr3d 2775 . . . . . . . . . 10 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (ℝ D (𝑦 ∈ (𝐴(,)𝐡) ↦ (πΊβ€˜π‘¦))) = (𝑦 ∈ (𝐴(,)𝐡) ↦ ((ℝ D 𝐺)β€˜π‘¦)))
141 fveq2 6889 . . . . . . . . . 10 (𝑦 = -π‘₯ β†’ (πΊβ€˜π‘¦) = (πΊβ€˜-π‘₯))
142 fveq2 6889 . . . . . . . . . 10 (𝑦 = -π‘₯ β†’ ((ℝ D 𝐺)β€˜π‘¦) = ((ℝ D 𝐺)β€˜-π‘₯))
14385, 85, 41, 87, 130, 131, 104, 140, 141, 142dvmptco 25481 . . . . . . . . 9 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (((ℝ D 𝐺)β€˜-π‘₯) Β· -1)))
144138adantr 482 . . . . . . . . . . . . 13 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (ℝ D 𝐺):(𝐴(,)𝐡)βŸΆβ„‚)
145144, 41ffvelcdmd 7085 . . . . . . . . . . . 12 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ ((ℝ D 𝐺)β€˜-π‘₯) ∈ β„‚)
146145, 87mulcomd 11232 . . . . . . . . . . 11 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (((ℝ D 𝐺)β€˜-π‘₯) Β· -1) = (-1 Β· ((ℝ D 𝐺)β€˜-π‘₯)))
147145mulm1d 11663 . . . . . . . . . . 11 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (-1 Β· ((ℝ D 𝐺)β€˜-π‘₯)) = -((ℝ D 𝐺)β€˜-π‘₯))
148146, 147eqtrd 2773 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (((ℝ D 𝐺)β€˜-π‘₯) Β· -1) = -((ℝ D 𝐺)β€˜-π‘₯))
149148mpteq2dva 5248 . . . . . . . . 9 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (((ℝ D 𝐺)β€˜-π‘₯) Β· -1)) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐺)β€˜-π‘₯)))
150143, 149eqtrd 2773 . . . . . . . 8 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐺)β€˜-π‘₯)))
151150dmeqd 5904 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ dom (ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))) = dom (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐺)β€˜-π‘₯)))
152 negex 11455 . . . . . . . 8 -((ℝ D 𝐺)β€˜-π‘₯) ∈ V
153 eqid 2733 . . . . . . . 8 (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐺)β€˜-π‘₯)) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐺)β€˜-π‘₯))
154152, 153dmmpti 6692 . . . . . . 7 dom (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐺)β€˜-π‘₯)) = (-𝐡(,)-π‘Ž)
155151, 154eqtrdi 2789 . . . . . 6 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ dom (ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))) = (-𝐡(,)-π‘Ž))
15641adantrr 716 . . . . . . 7 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ (π‘₯ ∈ (-𝐡(,)-π‘Ž) ∧ -π‘₯ β‰  𝐡)) β†’ -π‘₯ ∈ (𝐴(,)𝐡))
157 limcresi 25394 . . . . . . . . 9 ((π‘₯ ∈ ℝ ↦ -π‘₯) limβ„‚ -𝐡) βŠ† (((π‘₯ ∈ ℝ ↦ -π‘₯) β†Ύ (-𝐡(,)-π‘Ž)) limβ„‚ -𝐡)
158 resmpt 6036 . . . . . . . . . . 11 ((-𝐡(,)-π‘Ž) βŠ† ℝ β†’ ((π‘₯ ∈ ℝ ↦ -π‘₯) β†Ύ (-𝐡(,)-π‘Ž)) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -π‘₯))
15997, 158ax-mp 5 . . . . . . . . . 10 ((π‘₯ ∈ ℝ ↦ -π‘₯) β†Ύ (-𝐡(,)-π‘Ž)) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -π‘₯)
160159oveq1i 7416 . . . . . . . . 9 (((π‘₯ ∈ ℝ ↦ -π‘₯) β†Ύ (-𝐡(,)-π‘Ž)) limβ„‚ -𝐡) = ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -π‘₯) limβ„‚ -𝐡)
161157, 160sseqtri 4018 . . . . . . . 8 ((π‘₯ ∈ ℝ ↦ -π‘₯) limβ„‚ -𝐡) βŠ† ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -π‘₯) limβ„‚ -𝐡)
16272recnd 11239 . . . . . . . . . 10 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐡 ∈ β„‚)
163162negnegd 11559 . . . . . . . . 9 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ --𝐡 = 𝐡)
164 eqid 2733 . . . . . . . . . . . 12 (π‘₯ ∈ ℝ ↦ -π‘₯) = (π‘₯ ∈ ℝ ↦ -π‘₯)
165164negcncf 24430 . . . . . . . . . . 11 (ℝ βŠ† β„‚ β†’ (π‘₯ ∈ ℝ ↦ -π‘₯) ∈ (ℝ–cnβ†’β„‚))
16651, 165mp1i 13 . . . . . . . . . 10 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (π‘₯ ∈ ℝ ↦ -π‘₯) ∈ (ℝ–cnβ†’β„‚))
167 negeq 11449 . . . . . . . . . 10 (π‘₯ = -𝐡 β†’ -π‘₯ = --𝐡)
168166, 76, 167cnmptlimc 25399 . . . . . . . . 9 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ --𝐡 ∈ ((π‘₯ ∈ ℝ ↦ -π‘₯) limβ„‚ -𝐡))
169163, 168eqeltrrd 2835 . . . . . . . 8 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐡 ∈ ((π‘₯ ∈ ℝ ↦ -π‘₯) limβ„‚ -𝐡))
170161, 169sselid 3980 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐡 ∈ ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -π‘₯) limβ„‚ -𝐡))
171 lhop2.f0 . . . . . . . . 9 (πœ‘ β†’ 0 ∈ (𝐹 limβ„‚ 𝐡))
172171adantr 482 . . . . . . . 8 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 0 ∈ (𝐹 limβ„‚ 𝐡))
173105oveq1d 7421 . . . . . . . 8 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (𝐹 limβ„‚ 𝐡) = ((𝑦 ∈ (𝐴(,)𝐡) ↦ (πΉβ€˜π‘¦)) limβ„‚ 𝐡))
174172, 173eleqtrd 2836 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 0 ∈ ((𝑦 ∈ (𝐴(,)𝐡) ↦ (πΉβ€˜π‘¦)) limβ„‚ 𝐡))
175 eliooord 13380 . . . . . . . . . . . . . 14 (π‘₯ ∈ (-𝐡(,)-π‘Ž) β†’ (-𝐡 < π‘₯ ∧ π‘₯ < -π‘Ž))
176175adantl 483 . . . . . . . . . . . . 13 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (-𝐡 < π‘₯ ∧ π‘₯ < -π‘Ž))
177176simpld 496 . . . . . . . . . . . 12 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ -𝐡 < π‘₯)
17829, 23, 177ltnegcon1d 11791 . . . . . . . . . . 11 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ -π‘₯ < 𝐡)
17930, 178ltned 11347 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ -π‘₯ β‰  𝐡)
180179neneqd 2946 . . . . . . . . 9 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ Β¬ -π‘₯ = 𝐡)
181180pm2.21d 121 . . . . . . . 8 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (-π‘₯ = 𝐡 β†’ (πΉβ€˜-π‘₯) = 0))
182181impr 456 . . . . . . 7 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ (π‘₯ ∈ (-𝐡(,)-π‘Ž) ∧ -π‘₯ = 𝐡)) β†’ (πΉβ€˜-π‘₯) = 0)
183156, 90, 170, 174, 114, 182limcco 25402 . . . . . 6 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 0 ∈ ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)) limβ„‚ -𝐡))
184 lhop2.g0 . . . . . . . . 9 (πœ‘ β†’ 0 ∈ (𝐺 limβ„‚ 𝐡))
185184adantr 482 . . . . . . . 8 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 0 ∈ (𝐺 limβ„‚ 𝐡))
186132oveq1d 7421 . . . . . . . 8 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (𝐺 limβ„‚ 𝐡) = ((𝑦 ∈ (𝐴(,)𝐡) ↦ (πΊβ€˜π‘¦)) limβ„‚ 𝐡))
187185, 186eleqtrd 2836 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 0 ∈ ((𝑦 ∈ (𝐴(,)𝐡) ↦ (πΊβ€˜π‘¦)) limβ„‚ 𝐡))
188180pm2.21d 121 . . . . . . . 8 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (-π‘₯ = 𝐡 β†’ (πΊβ€˜-π‘₯) = 0))
189188impr 456 . . . . . . 7 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ (π‘₯ ∈ (-𝐡(,)-π‘Ž) ∧ -π‘₯ = 𝐡)) β†’ (πΊβ€˜-π‘₯) = 0)
190156, 130, 170, 187, 141, 189limcco 25402 . . . . . 6 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 0 ∈ ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)) limβ„‚ -𝐡))
19157fmpttd 7112 . . . . . . . 8 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)):(-𝐡(,)-π‘Ž)⟢ran 𝐺)
192191frnd 6723 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ran (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)) βŠ† ran 𝐺)
19348adantr 482 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ Β¬ 0 ∈ ran 𝐺)
194192, 193ssneldd 3985 . . . . . 6 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ Β¬ 0 ∈ ran (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))
195 lhop2.gd0 . . . . . . . 8 (πœ‘ β†’ Β¬ 0 ∈ ran (ℝ D 𝐺))
196195adantr 482 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ Β¬ 0 ∈ ran (ℝ D 𝐺))
197150rneqd 5936 . . . . . . . . 9 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ran (ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))) = ran (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐺)β€˜-π‘₯)))
198197eleq2d 2820 . . . . . . . 8 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (0 ∈ ran (ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))) ↔ 0 ∈ ran (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐺)β€˜-π‘₯))))
199153, 152elrnmpti 5958 . . . . . . . . 9 (0 ∈ ran (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐺)β€˜-π‘₯)) ↔ βˆƒπ‘₯ ∈ (-𝐡(,)-π‘Ž)0 = -((ℝ D 𝐺)β€˜-π‘₯))
200 eqcom 2740 . . . . . . . . . . 11 (0 = -((ℝ D 𝐺)β€˜-π‘₯) ↔ -((ℝ D 𝐺)β€˜-π‘₯) = 0)
201145negeq0d 11560 . . . . . . . . . . . 12 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (((ℝ D 𝐺)β€˜-π‘₯) = 0 ↔ -((ℝ D 𝐺)β€˜-π‘₯) = 0))
202144ffnd 6716 . . . . . . . . . . . . . 14 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (ℝ D 𝐺) Fn (𝐴(,)𝐡))
203 fnfvelrn 7080 . . . . . . . . . . . . . 14 (((ℝ D 𝐺) Fn (𝐴(,)𝐡) ∧ -π‘₯ ∈ (𝐴(,)𝐡)) β†’ ((ℝ D 𝐺)β€˜-π‘₯) ∈ ran (ℝ D 𝐺))
204202, 41, 203syl2anc 585 . . . . . . . . . . . . 13 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ ((ℝ D 𝐺)β€˜-π‘₯) ∈ ran (ℝ D 𝐺))
205 eleq1 2822 . . . . . . . . . . . . 13 (((ℝ D 𝐺)β€˜-π‘₯) = 0 β†’ (((ℝ D 𝐺)β€˜-π‘₯) ∈ ran (ℝ D 𝐺) ↔ 0 ∈ ran (ℝ D 𝐺)))
206204, 205syl5ibcom 244 . . . . . . . . . . . 12 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (((ℝ D 𝐺)β€˜-π‘₯) = 0 β†’ 0 ∈ ran (ℝ D 𝐺)))
207201, 206sylbird 260 . . . . . . . . . . 11 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (-((ℝ D 𝐺)β€˜-π‘₯) = 0 β†’ 0 ∈ ran (ℝ D 𝐺)))
208200, 207biimtrid 241 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (0 = -((ℝ D 𝐺)β€˜-π‘₯) β†’ 0 ∈ ran (ℝ D 𝐺)))
209208rexlimdva 3156 . . . . . . . . 9 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (βˆƒπ‘₯ ∈ (-𝐡(,)-π‘Ž)0 = -((ℝ D 𝐺)β€˜-π‘₯) β†’ 0 ∈ ran (ℝ D 𝐺)))
210199, 209biimtrid 241 . . . . . . . 8 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (0 ∈ ran (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐺)β€˜-π‘₯)) β†’ 0 ∈ ran (ℝ D 𝐺)))
211198, 210sylbid 239 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (0 ∈ ran (ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))) β†’ 0 ∈ ran (ℝ D 𝐺)))
212196, 211mtod 197 . . . . . 6 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ Β¬ 0 ∈ ran (ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))))
213111ffvelcdmda 7084 . . . . . . . . 9 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ ((ℝ D 𝐹)β€˜π‘§) ∈ β„‚)
214138ffvelcdmda 7084 . . . . . . . . 9 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ ((ℝ D 𝐺)β€˜π‘§) ∈ β„‚)
215195ad2antrr 725 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ Β¬ 0 ∈ ran (ℝ D 𝐺))
216138ffnd 6716 . . . . . . . . . . . . 13 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (ℝ D 𝐺) Fn (𝐴(,)𝐡))
217 fnfvelrn 7080 . . . . . . . . . . . . 13 (((ℝ D 𝐺) Fn (𝐴(,)𝐡) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ ((ℝ D 𝐺)β€˜π‘§) ∈ ran (ℝ D 𝐺))
218216, 217sylan 581 . . . . . . . . . . . 12 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ ((ℝ D 𝐺)β€˜π‘§) ∈ ran (ℝ D 𝐺))
219 eleq1 2822 . . . . . . . . . . . 12 (((ℝ D 𝐺)β€˜π‘§) = 0 β†’ (((ℝ D 𝐺)β€˜π‘§) ∈ ran (ℝ D 𝐺) ↔ 0 ∈ ran (ℝ D 𝐺)))
220218, 219syl5ibcom 244 . . . . . . . . . . 11 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ (((ℝ D 𝐺)β€˜π‘§) = 0 β†’ 0 ∈ ran (ℝ D 𝐺)))
221220necon3bd 2955 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ (Β¬ 0 ∈ ran (ℝ D 𝐺) β†’ ((ℝ D 𝐺)β€˜π‘§) β‰  0))
222215, 221mpd 15 . . . . . . . . 9 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ ((ℝ D 𝐺)β€˜π‘§) β‰  0)
223213, 214, 222divcld 11987 . . . . . . . 8 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ (((ℝ D 𝐹)β€˜π‘§) / ((ℝ D 𝐺)β€˜π‘§)) ∈ β„‚)
224 lhop2.c . . . . . . . . 9 (πœ‘ β†’ 𝐢 ∈ ((𝑧 ∈ (𝐴(,)𝐡) ↦ (((ℝ D 𝐹)β€˜π‘§) / ((ℝ D 𝐺)β€˜π‘§))) limβ„‚ 𝐡))
225224adantr 482 . . . . . . . 8 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐢 ∈ ((𝑧 ∈ (𝐴(,)𝐡) ↦ (((ℝ D 𝐹)β€˜π‘§) / ((ℝ D 𝐺)β€˜π‘§))) limβ„‚ 𝐡))
226 fveq2 6889 . . . . . . . . 9 (𝑧 = -π‘₯ β†’ ((ℝ D 𝐹)β€˜π‘§) = ((ℝ D 𝐹)β€˜-π‘₯))
227 fveq2 6889 . . . . . . . . 9 (𝑧 = -π‘₯ β†’ ((ℝ D 𝐺)β€˜π‘§) = ((ℝ D 𝐺)β€˜-π‘₯))
228226, 227oveq12d 7424 . . . . . . . 8 (𝑧 = -π‘₯ β†’ (((ℝ D 𝐹)β€˜π‘§) / ((ℝ D 𝐺)β€˜π‘§)) = (((ℝ D 𝐹)β€˜-π‘₯) / ((ℝ D 𝐺)β€˜-π‘₯)))
229180pm2.21d 121 . . . . . . . . 9 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (-π‘₯ = 𝐡 β†’ (((ℝ D 𝐹)β€˜-π‘₯) / ((ℝ D 𝐺)β€˜-π‘₯)) = 𝐢))
230229impr 456 . . . . . . . 8 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ (π‘₯ ∈ (-𝐡(,)-π‘Ž) ∧ -π‘₯ = 𝐡)) β†’ (((ℝ D 𝐹)β€˜-π‘₯) / ((ℝ D 𝐺)β€˜-π‘₯)) = 𝐢)
231156, 223, 170, 225, 228, 230limcco 25402 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐢 ∈ ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (((ℝ D 𝐹)β€˜-π‘₯) / ((ℝ D 𝐺)β€˜-π‘₯))) limβ„‚ -𝐡))
232 nfcv 2904 . . . . . . . . . . . . 13 β„²π‘₯ℝ
233 nfcv 2904 . . . . . . . . . . . . 13 β„²π‘₯ D
234 nfmpt1 5256 . . . . . . . . . . . . 13 β„²π‘₯(π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))
235232, 233, 234nfov 7436 . . . . . . . . . . . 12 β„²π‘₯(ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))
236 nfcv 2904 . . . . . . . . . . . 12 β„²π‘₯𝑦
237235, 236nffv 6899 . . . . . . . . . . 11 β„²π‘₯((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))β€˜π‘¦)
238 nfcv 2904 . . . . . . . . . . 11 β„²π‘₯ /
239 nfmpt1 5256 . . . . . . . . . . . . 13 β„²π‘₯(π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))
240232, 233, 239nfov 7436 . . . . . . . . . . . 12 β„²π‘₯(ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))
241240, 236nffv 6899 . . . . . . . . . . 11 β„²π‘₯((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))β€˜π‘¦)
242237, 238, 241nfov 7436 . . . . . . . . . 10 β„²π‘₯(((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))β€˜π‘¦) / ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))β€˜π‘¦))
243 nfcv 2904 . . . . . . . . . 10 Ⅎ𝑦(((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))β€˜π‘₯) / ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))β€˜π‘₯))
244 fveq2 6889 . . . . . . . . . . 11 (𝑦 = π‘₯ β†’ ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))β€˜π‘¦) = ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))β€˜π‘₯))
245 fveq2 6889 . . . . . . . . . . 11 (𝑦 = π‘₯ β†’ ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))β€˜π‘¦) = ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))β€˜π‘₯))
246244, 245oveq12d 7424 . . . . . . . . . 10 (𝑦 = π‘₯ β†’ (((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))β€˜π‘¦) / ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))β€˜π‘¦)) = (((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))β€˜π‘₯) / ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))β€˜π‘₯)))
247242, 243, 246cbvmpt 5259 . . . . . . . . 9 (𝑦 ∈ (-𝐡(,)-π‘Ž) ↦ (((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))β€˜π‘¦) / ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))β€˜π‘¦))) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))β€˜π‘₯) / ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))β€˜π‘₯)))
248123fveq1d 6891 . . . . . . . . . . . . 13 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))β€˜π‘₯) = ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐹)β€˜-π‘₯))β€˜π‘₯))
249126fvmpt2 7007 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ∧ -((ℝ D 𝐹)β€˜-π‘₯) ∈ V) β†’ ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐹)β€˜-π‘₯))β€˜π‘₯) = -((ℝ D 𝐹)β€˜-π‘₯))
250125, 249mpan2 690 . . . . . . . . . . . . 13 (π‘₯ ∈ (-𝐡(,)-π‘Ž) β†’ ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐹)β€˜-π‘₯))β€˜π‘₯) = -((ℝ D 𝐹)β€˜-π‘₯))
251248, 250sylan9eq 2793 . . . . . . . . . . . 12 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))β€˜π‘₯) = -((ℝ D 𝐹)β€˜-π‘₯))
252150fveq1d 6891 . . . . . . . . . . . . 13 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))β€˜π‘₯) = ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐺)β€˜-π‘₯))β€˜π‘₯))
253153fvmpt2 7007 . . . . . . . . . . . . . 14 ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ∧ -((ℝ D 𝐺)β€˜-π‘₯) ∈ V) β†’ ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐺)β€˜-π‘₯))β€˜π‘₯) = -((ℝ D 𝐺)β€˜-π‘₯))
254152, 253mpan2 690 . . . . . . . . . . . . 13 (π‘₯ ∈ (-𝐡(,)-π‘Ž) β†’ ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ -((ℝ D 𝐺)β€˜-π‘₯))β€˜π‘₯) = -((ℝ D 𝐺)β€˜-π‘₯))
255252, 254sylan9eq 2793 . . . . . . . . . . . 12 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))β€˜π‘₯) = -((ℝ D 𝐺)β€˜-π‘₯))
256251, 255oveq12d 7424 . . . . . . . . . . 11 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))β€˜π‘₯) / ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))β€˜π‘₯)) = (-((ℝ D 𝐹)β€˜-π‘₯) / -((ℝ D 𝐺)β€˜-π‘₯)))
257195ad2antrr 725 . . . . . . . . . . . . 13 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ Β¬ 0 ∈ ran (ℝ D 𝐺))
258206necon3bd 2955 . . . . . . . . . . . . 13 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (Β¬ 0 ∈ ran (ℝ D 𝐺) β†’ ((ℝ D 𝐺)β€˜-π‘₯) β‰  0))
259257, 258mpd 15 . . . . . . . . . . . 12 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ ((ℝ D 𝐺)β€˜-π‘₯) β‰  0)
260118, 145, 259div2negd 12002 . . . . . . . . . . 11 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (-((ℝ D 𝐹)β€˜-π‘₯) / -((ℝ D 𝐺)β€˜-π‘₯)) = (((ℝ D 𝐹)β€˜-π‘₯) / ((ℝ D 𝐺)β€˜-π‘₯)))
261256, 260eqtrd 2773 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))β€˜π‘₯) / ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))β€˜π‘₯)) = (((ℝ D 𝐹)β€˜-π‘₯) / ((ℝ D 𝐺)β€˜-π‘₯)))
262261mpteq2dva 5248 . . . . . . . . 9 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))β€˜π‘₯) / ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))β€˜π‘₯))) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (((ℝ D 𝐹)β€˜-π‘₯) / ((ℝ D 𝐺)β€˜-π‘₯))))
263247, 262eqtrid 2785 . . . . . . . 8 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (𝑦 ∈ (-𝐡(,)-π‘Ž) ↦ (((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))β€˜π‘¦) / ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))β€˜π‘¦))) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (((ℝ D 𝐹)β€˜-π‘₯) / ((ℝ D 𝐺)β€˜-π‘₯))))
264263oveq1d 7421 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((𝑦 ∈ (-𝐡(,)-π‘Ž) ↦ (((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))β€˜π‘¦) / ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))β€˜π‘¦))) limβ„‚ -𝐡) = ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (((ℝ D 𝐹)β€˜-π‘₯) / ((ℝ D 𝐺)β€˜-π‘₯))) limβ„‚ -𝐡))
265231, 264eleqtrrd 2837 . . . . . 6 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐢 ∈ ((𝑦 ∈ (-𝐡(,)-π‘Ž) ↦ (((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)))β€˜π‘¦) / ((ℝ D (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)))β€˜π‘¦))) limβ„‚ -𝐡))
26676, 78, 81, 82, 83, 128, 155, 183, 190, 194, 212, 265lhop1 25523 . . . . 5 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐢 ∈ ((𝑦 ∈ (-𝐡(,)-π‘Ž) ↦ (((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))β€˜π‘¦) / ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))β€˜π‘¦))) limβ„‚ -𝐡))
267 nffvmpt1 6900 . . . . . . . . 9 β„²π‘₯((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))β€˜π‘¦)
268 nffvmpt1 6900 . . . . . . . . 9 β„²π‘₯((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))β€˜π‘¦)
269267, 238, 268nfov 7436 . . . . . . . 8 β„²π‘₯(((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))β€˜π‘¦) / ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))β€˜π‘¦))
270 nfcv 2904 . . . . . . . 8 Ⅎ𝑦(((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))β€˜π‘₯) / ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))β€˜π‘₯))
271 fveq2 6889 . . . . . . . . 9 (𝑦 = π‘₯ β†’ ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))β€˜π‘¦) = ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))β€˜π‘₯))
272 fveq2 6889 . . . . . . . . 9 (𝑦 = π‘₯ β†’ ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))β€˜π‘¦) = ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))β€˜π‘₯))
273271, 272oveq12d 7424 . . . . . . . 8 (𝑦 = π‘₯ β†’ (((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))β€˜π‘¦) / ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))β€˜π‘¦)) = (((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))β€˜π‘₯) / ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))β€˜π‘₯)))
274269, 270, 273cbvmpt 5259 . . . . . . 7 (𝑦 ∈ (-𝐡(,)-π‘Ž) ↦ (((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))β€˜π‘¦) / ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))β€˜π‘¦))) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))β€˜π‘₯) / ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))β€˜π‘₯)))
275 fvex 6902 . . . . . . . . . 10 (πΉβ€˜-π‘₯) ∈ V
276 eqid 2733 . . . . . . . . . . 11 (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯)) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))
277276fvmpt2 7007 . . . . . . . . . 10 ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ∧ (πΉβ€˜-π‘₯) ∈ V) β†’ ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))β€˜π‘₯) = (πΉβ€˜-π‘₯))
27826, 275, 277sylancl 587 . . . . . . . . 9 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))β€˜π‘₯) = (πΉβ€˜-π‘₯))
279 fvex 6902 . . . . . . . . . 10 (πΊβ€˜-π‘₯) ∈ V
280 eqid 2733 . . . . . . . . . . 11 (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯)) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))
281280fvmpt2 7007 . . . . . . . . . 10 ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ∧ (πΊβ€˜-π‘₯) ∈ V) β†’ ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))β€˜π‘₯) = (πΊβ€˜-π‘₯))
28226, 279, 281sylancl 587 . . . . . . . . 9 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))β€˜π‘₯) = (πΊβ€˜-π‘₯))
283278, 282oveq12d 7424 . . . . . . . 8 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ π‘₯ ∈ (-𝐡(,)-π‘Ž)) β†’ (((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))β€˜π‘₯) / ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))β€˜π‘₯)) = ((πΉβ€˜-π‘₯) / (πΊβ€˜-π‘₯)))
284283mpteq2dva 5248 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))β€˜π‘₯) / ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))β€˜π‘₯))) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ ((πΉβ€˜-π‘₯) / (πΊβ€˜-π‘₯))))
285274, 284eqtrid 2785 . . . . . 6 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (𝑦 ∈ (-𝐡(,)-π‘Ž) ↦ (((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))β€˜π‘¦) / ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))β€˜π‘¦))) = (π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ ((πΉβ€˜-π‘₯) / (πΊβ€˜-π‘₯))))
286285oveq1d 7421 . . . . 5 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((𝑦 ∈ (-𝐡(,)-π‘Ž) ↦ (((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΉβ€˜-π‘₯))β€˜π‘¦) / ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ (πΊβ€˜-π‘₯))β€˜π‘¦))) limβ„‚ -𝐡) = ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ ((πΉβ€˜-π‘₯) / (πΊβ€˜-π‘₯))) limβ„‚ -𝐡))
287266, 286eleqtrd 2836 . . . 4 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐢 ∈ ((π‘₯ ∈ (-𝐡(,)-π‘Ž) ↦ ((πΉβ€˜-π‘₯) / (πΊβ€˜-π‘₯))) limβ„‚ -𝐡))
288 negeq 11449 . . . . . 6 (π‘₯ = -𝑧 β†’ -π‘₯ = --𝑧)
289288fveq2d 6893 . . . . 5 (π‘₯ = -𝑧 β†’ (πΉβ€˜-π‘₯) = (πΉβ€˜--𝑧))
290288fveq2d 6893 . . . . 5 (π‘₯ = -𝑧 β†’ (πΊβ€˜-π‘₯) = (πΊβ€˜--𝑧))
291289, 290oveq12d 7424 . . . 4 (π‘₯ = -𝑧 β†’ ((πΉβ€˜-π‘₯) / (πΊβ€˜-π‘₯)) = ((πΉβ€˜--𝑧) / (πΊβ€˜--𝑧)))
29276adantr 482 . . . . . . . 8 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ -𝐡 ∈ ℝ)
293 eliooord 13380 . . . . . . . . . . 11 (𝑧 ∈ (π‘Ž(,)𝐡) β†’ (π‘Ž < 𝑧 ∧ 𝑧 < 𝐡))
294293adantl 483 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ (π‘Ž < 𝑧 ∧ 𝑧 < 𝐡))
295294simprd 497 . . . . . . . . 9 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ 𝑧 < 𝐡)
29615, 13ltnegd 11789 . . . . . . . . 9 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ (𝑧 < 𝐡 ↔ -𝐡 < -𝑧))
297295, 296mpbid 231 . . . . . . . 8 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ -𝐡 < -𝑧)
298292, 297gtned 11346 . . . . . . 7 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ -𝑧 β‰  -𝐡)
299298neneqd 2946 . . . . . 6 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ Β¬ -𝑧 = -𝐡)
300299pm2.21d 121 . . . . 5 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ (-𝑧 = -𝐡 β†’ ((πΉβ€˜--𝑧) / (πΊβ€˜--𝑧)) = 𝐢))
301300impr 456 . . . 4 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ (𝑧 ∈ (π‘Ž(,)𝐡) ∧ -𝑧 = -𝐡)) β†’ ((πΉβ€˜--𝑧) / (πΊβ€˜--𝑧)) = 𝐢)
30219, 62, 75, 287, 291, 301limcco 25402 . . 3 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐢 ∈ ((𝑧 ∈ (π‘Ž(,)𝐡) ↦ ((πΉβ€˜--𝑧) / (πΊβ€˜--𝑧))) limβ„‚ 𝐡))
30315recnd 11239 . . . . . . . . 9 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ 𝑧 ∈ β„‚)
304303negnegd 11559 . . . . . . . 8 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ --𝑧 = 𝑧)
305304fveq2d 6893 . . . . . . 7 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ (πΉβ€˜--𝑧) = (πΉβ€˜π‘§))
306304fveq2d 6893 . . . . . . 7 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ (πΊβ€˜--𝑧) = (πΊβ€˜π‘§))
307305, 306oveq12d 7424 . . . . . 6 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (π‘Ž(,)𝐡)) β†’ ((πΉβ€˜--𝑧) / (πΊβ€˜--𝑧)) = ((πΉβ€˜π‘§) / (πΊβ€˜π‘§)))
308307mpteq2dva 5248 . . . . 5 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (𝑧 ∈ (π‘Ž(,)𝐡) ↦ ((πΉβ€˜--𝑧) / (πΊβ€˜--𝑧))) = (𝑧 ∈ (π‘Ž(,)𝐡) ↦ ((πΉβ€˜π‘§) / (πΊβ€˜π‘§))))
309308oveq1d 7421 . . . 4 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((𝑧 ∈ (π‘Ž(,)𝐡) ↦ ((πΉβ€˜--𝑧) / (πΊβ€˜--𝑧))) limβ„‚ 𝐡) = ((𝑧 ∈ (π‘Ž(,)𝐡) ↦ ((πΉβ€˜π‘§) / (πΊβ€˜π‘§))) limβ„‚ 𝐡))
31039resmptd 6039 . . . . 5 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((𝑧 ∈ (𝐴(,)𝐡) ↦ ((πΉβ€˜π‘§) / (πΊβ€˜π‘§))) β†Ύ (π‘Ž(,)𝐡)) = (𝑧 ∈ (π‘Ž(,)𝐡) ↦ ((πΉβ€˜π‘§) / (πΊβ€˜π‘§))))
311310oveq1d 7421 . . . 4 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (((𝑧 ∈ (𝐴(,)𝐡) ↦ ((πΉβ€˜π‘§) / (πΊβ€˜π‘§))) β†Ύ (π‘Ž(,)𝐡)) limβ„‚ 𝐡) = ((𝑧 ∈ (π‘Ž(,)𝐡) ↦ ((πΉβ€˜π‘§) / (πΊβ€˜π‘§))) limβ„‚ 𝐡))
312 fss 6732 . . . . . . . . 9 ((𝐹:(𝐴(,)𝐡)βŸΆβ„ ∧ ℝ βŠ† β„‚) β†’ 𝐹:(𝐴(,)𝐡)βŸΆβ„‚)
31388, 51, 312sylancl 587 . . . . . . . 8 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐹:(𝐴(,)𝐡)βŸΆβ„‚)
314313ffvelcdmda 7084 . . . . . . 7 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ (πΉβ€˜π‘§) ∈ β„‚)
31553ffvelcdmda 7084 . . . . . . 7 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ (πΊβ€˜π‘§) ∈ β„‚)
31648ad2antrr 725 . . . . . . . 8 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ Β¬ 0 ∈ ran 𝐺)
31750ffnd 6716 . . . . . . . . . . 11 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐺 Fn (𝐴(,)𝐡))
318 fnfvelrn 7080 . . . . . . . . . . 11 ((𝐺 Fn (𝐴(,)𝐡) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ (πΊβ€˜π‘§) ∈ ran 𝐺)
319317, 318sylan 581 . . . . . . . . . 10 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ (πΊβ€˜π‘§) ∈ ran 𝐺)
320 eleq1 2822 . . . . . . . . . 10 ((πΊβ€˜π‘§) = 0 β†’ ((πΊβ€˜π‘§) ∈ ran 𝐺 ↔ 0 ∈ ran 𝐺))
321319, 320syl5ibcom 244 . . . . . . . . 9 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ ((πΊβ€˜π‘§) = 0 β†’ 0 ∈ ran 𝐺))
322321necon3bd 2955 . . . . . . . 8 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ (Β¬ 0 ∈ ran 𝐺 β†’ (πΊβ€˜π‘§) β‰  0))
323316, 322mpd 15 . . . . . . 7 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ (πΊβ€˜π‘§) β‰  0)
324314, 315, 323divcld 11987 . . . . . 6 (((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) ∧ 𝑧 ∈ (𝐴(,)𝐡)) β†’ ((πΉβ€˜π‘§) / (πΊβ€˜π‘§)) ∈ β„‚)
325324fmpttd 7112 . . . . 5 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (𝑧 ∈ (𝐴(,)𝐡) ↦ ((πΉβ€˜π‘§) / (πΊβ€˜π‘§))):(𝐴(,)𝐡)βŸΆβ„‚)
326 ioossre 13382 . . . . . . 7 (𝐴(,)𝐡) βŠ† ℝ
327326, 51sstri 3991 . . . . . 6 (𝐴(,)𝐡) βŠ† β„‚
328327a1i 11 . . . . 5 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (𝐴(,)𝐡) βŠ† β„‚)
329 eqid 2733 . . . . 5 ((TopOpenβ€˜β„‚fld) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})) = ((TopOpenβ€˜β„‚fld) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡}))
330 ssun2 4173 . . . . . . 7 {𝐡} βŠ† ((π‘Ž(,)𝐡) βˆͺ {𝐡})
331 snssg 4787 . . . . . . . 8 (𝐡 ∈ ℝ β†’ (𝐡 ∈ ((π‘Ž(,)𝐡) βˆͺ {𝐡}) ↔ {𝐡} βŠ† ((π‘Ž(,)𝐡) βˆͺ {𝐡})))
33272, 331syl 17 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (𝐡 ∈ ((π‘Ž(,)𝐡) βˆͺ {𝐡}) ↔ {𝐡} βŠ† ((π‘Ž(,)𝐡) βˆͺ {𝐡})))
333330, 332mpbiri 258 . . . . . 6 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐡 ∈ ((π‘Ž(,)𝐡) βˆͺ {𝐡}))
33499cnfldtopon 24291 . . . . . . . . 9 (TopOpenβ€˜β„‚fld) ∈ (TopOnβ€˜β„‚)
335326a1i 11 . . . . . . . . . . 11 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (𝐴(,)𝐡) βŠ† ℝ)
33672snssd 4812 . . . . . . . . . . 11 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ {𝐡} βŠ† ℝ)
337335, 336unssd 4186 . . . . . . . . . 10 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((𝐴(,)𝐡) βˆͺ {𝐡}) βŠ† ℝ)
338337, 51sstrdi 3994 . . . . . . . . 9 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((𝐴(,)𝐡) βˆͺ {𝐡}) βŠ† β„‚)
339 resttopon 22657 . . . . . . . . 9 (((TopOpenβ€˜β„‚fld) ∈ (TopOnβ€˜β„‚) ∧ ((𝐴(,)𝐡) βˆͺ {𝐡}) βŠ† β„‚) β†’ ((TopOpenβ€˜β„‚fld) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})) ∈ (TopOnβ€˜((𝐴(,)𝐡) βˆͺ {𝐡})))
340334, 338, 339sylancr 588 . . . . . . . 8 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((TopOpenβ€˜β„‚fld) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})) ∈ (TopOnβ€˜((𝐴(,)𝐡) βˆͺ {𝐡})))
341 topontop 22407 . . . . . . . 8 (((TopOpenβ€˜β„‚fld) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})) ∈ (TopOnβ€˜((𝐴(,)𝐡) βˆͺ {𝐡})) β†’ ((TopOpenβ€˜β„‚fld) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})) ∈ Top)
342340, 341syl 17 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((TopOpenβ€˜β„‚fld) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})) ∈ Top)
343 indi 4273 . . . . . . . . . 10 ((π‘Ž(,)+∞) ∩ ((𝐴(,)𝐡) βˆͺ {𝐡})) = (((π‘Ž(,)+∞) ∩ (𝐴(,)𝐡)) βˆͺ ((π‘Ž(,)+∞) ∩ {𝐡}))
344 pnfxr 11265 . . . . . . . . . . . . . 14 +∞ ∈ ℝ*
345344a1i 11 . . . . . . . . . . . . 13 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ +∞ ∈ ℝ*)
3464adantr 482 . . . . . . . . . . . . 13 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐡 ∈ ℝ*)
347 iooin 13355 . . . . . . . . . . . . 13 (((π‘Ž ∈ ℝ* ∧ +∞ ∈ ℝ*) ∧ (𝐴 ∈ ℝ* ∧ 𝐡 ∈ ℝ*)) β†’ ((π‘Ž(,)+∞) ∩ (𝐴(,)𝐡)) = (if(π‘Ž ≀ 𝐴, 𝐴, π‘Ž)(,)if(+∞ ≀ 𝐡, +∞, 𝐡)))
34835, 345, 34, 346, 347syl22anc 838 . . . . . . . . . . . 12 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((π‘Ž(,)+∞) ∩ (𝐴(,)𝐡)) = (if(π‘Ž ≀ 𝐴, 𝐴, π‘Ž)(,)if(+∞ ≀ 𝐡, +∞, 𝐡)))
349 xrltnle 11278 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℝ* ∧ π‘Ž ∈ ℝ*) β†’ (𝐴 < π‘Ž ↔ Β¬ π‘Ž ≀ 𝐴))
35034, 35, 349syl2anc 585 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (𝐴 < π‘Ž ↔ Β¬ π‘Ž ≀ 𝐴))
35136, 350mpbid 231 . . . . . . . . . . . . . 14 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ Β¬ π‘Ž ≀ 𝐴)
352351iffalsed 4539 . . . . . . . . . . . . 13 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ if(π‘Ž ≀ 𝐴, 𝐴, π‘Ž) = π‘Ž)
35372ltpnfd 13098 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐡 < +∞)
354 xrltnle 11278 . . . . . . . . . . . . . . . 16 ((𝐡 ∈ ℝ* ∧ +∞ ∈ ℝ*) β†’ (𝐡 < +∞ ↔ Β¬ +∞ ≀ 𝐡))
355346, 344, 354sylancl 587 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (𝐡 < +∞ ↔ Β¬ +∞ ≀ 𝐡))
356353, 355mpbid 231 . . . . . . . . . . . . . 14 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ Β¬ +∞ ≀ 𝐡)
357356iffalsed 4539 . . . . . . . . . . . . 13 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ if(+∞ ≀ 𝐡, +∞, 𝐡) = 𝐡)
358352, 357oveq12d 7424 . . . . . . . . . . . 12 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (if(π‘Ž ≀ 𝐴, 𝐴, π‘Ž)(,)if(+∞ ≀ 𝐡, +∞, 𝐡)) = (π‘Ž(,)𝐡))
359348, 358eqtrd 2773 . . . . . . . . . . 11 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((π‘Ž(,)+∞) ∩ (𝐴(,)𝐡)) = (π‘Ž(,)𝐡))
360 elioopnf 13417 . . . . . . . . . . . . . . 15 (π‘Ž ∈ ℝ* β†’ (𝐡 ∈ (π‘Ž(,)+∞) ↔ (𝐡 ∈ ℝ ∧ π‘Ž < 𝐡)))
36135, 360syl 17 . . . . . . . . . . . . . 14 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (𝐡 ∈ (π‘Ž(,)+∞) ↔ (𝐡 ∈ ℝ ∧ π‘Ž < 𝐡)))
36272, 79, 361mpbir2and 712 . . . . . . . . . . . . 13 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐡 ∈ (π‘Ž(,)+∞))
363362snssd 4812 . . . . . . . . . . . 12 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ {𝐡} βŠ† (π‘Ž(,)+∞))
364 sseqin2 4215 . . . . . . . . . . . 12 ({𝐡} βŠ† (π‘Ž(,)+∞) ↔ ((π‘Ž(,)+∞) ∩ {𝐡}) = {𝐡})
365363, 364sylib 217 . . . . . . . . . . 11 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((π‘Ž(,)+∞) ∩ {𝐡}) = {𝐡})
366359, 365uneq12d 4164 . . . . . . . . . 10 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (((π‘Ž(,)+∞) ∩ (𝐴(,)𝐡)) βˆͺ ((π‘Ž(,)+∞) ∩ {𝐡})) = ((π‘Ž(,)𝐡) βˆͺ {𝐡}))
367343, 366eqtrid 2785 . . . . . . . . 9 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((π‘Ž(,)+∞) ∩ ((𝐴(,)𝐡) βˆͺ {𝐡})) = ((π‘Ž(,)𝐡) βˆͺ {𝐡}))
368 retop 24270 . . . . . . . . . 10 (topGenβ€˜ran (,)) ∈ Top
369 reex 11198 . . . . . . . . . . . 12 ℝ ∈ V
370369ssex 5321 . . . . . . . . . . 11 (((𝐴(,)𝐡) βˆͺ {𝐡}) βŠ† ℝ β†’ ((𝐴(,)𝐡) βˆͺ {𝐡}) ∈ V)
371337, 370syl 17 . . . . . . . . . 10 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((𝐴(,)𝐡) βˆͺ {𝐡}) ∈ V)
372 iooretop 24274 . . . . . . . . . . 11 (π‘Ž(,)+∞) ∈ (topGenβ€˜ran (,))
373372a1i 11 . . . . . . . . . 10 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (π‘Ž(,)+∞) ∈ (topGenβ€˜ran (,)))
374 elrestr 17371 . . . . . . . . . 10 (((topGenβ€˜ran (,)) ∈ Top ∧ ((𝐴(,)𝐡) βˆͺ {𝐡}) ∈ V ∧ (π‘Ž(,)+∞) ∈ (topGenβ€˜ran (,))) β†’ ((π‘Ž(,)+∞) ∩ ((𝐴(,)𝐡) βˆͺ {𝐡})) ∈ ((topGenβ€˜ran (,)) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})))
375368, 371, 373, 374mp3an2i 1467 . . . . . . . . 9 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((π‘Ž(,)+∞) ∩ ((𝐴(,)𝐡) βˆͺ {𝐡})) ∈ ((topGenβ€˜ran (,)) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})))
376367, 375eqeltrrd 2835 . . . . . . . 8 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((π‘Ž(,)𝐡) βˆͺ {𝐡}) ∈ ((topGenβ€˜ran (,)) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})))
377 eqid 2733 . . . . . . . . . 10 (topGenβ€˜ran (,)) = (topGenβ€˜ran (,))
37899, 377rerest 24312 . . . . . . . . 9 (((𝐴(,)𝐡) βˆͺ {𝐡}) βŠ† ℝ β†’ ((TopOpenβ€˜β„‚fld) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})) = ((topGenβ€˜ran (,)) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})))
379337, 378syl 17 . . . . . . . 8 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((TopOpenβ€˜β„‚fld) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})) = ((topGenβ€˜ran (,)) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})))
380376, 379eleqtrrd 2837 . . . . . . 7 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((π‘Ž(,)𝐡) βˆͺ {𝐡}) ∈ ((TopOpenβ€˜β„‚fld) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})))
381 isopn3i 22578 . . . . . . 7 ((((TopOpenβ€˜β„‚fld) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})) ∈ Top ∧ ((π‘Ž(,)𝐡) βˆͺ {𝐡}) ∈ ((TopOpenβ€˜β„‚fld) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡}))) β†’ ((intβ€˜((TopOpenβ€˜β„‚fld) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})))β€˜((π‘Ž(,)𝐡) βˆͺ {𝐡})) = ((π‘Ž(,)𝐡) βˆͺ {𝐡}))
382342, 380, 381syl2anc 585 . . . . . 6 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((intβ€˜((TopOpenβ€˜β„‚fld) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})))β€˜((π‘Ž(,)𝐡) βˆͺ {𝐡})) = ((π‘Ž(,)𝐡) βˆͺ {𝐡}))
383333, 382eleqtrrd 2837 . . . . 5 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐡 ∈ ((intβ€˜((TopOpenβ€˜β„‚fld) β†Ύt ((𝐴(,)𝐡) βˆͺ {𝐡})))β€˜((π‘Ž(,)𝐡) βˆͺ {𝐡})))
384325, 39, 328, 99, 329, 383limcres 25395 . . . 4 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ (((𝑧 ∈ (𝐴(,)𝐡) ↦ ((πΉβ€˜π‘§) / (πΊβ€˜π‘§))) β†Ύ (π‘Ž(,)𝐡)) limβ„‚ 𝐡) = ((𝑧 ∈ (𝐴(,)𝐡) ↦ ((πΉβ€˜π‘§) / (πΊβ€˜π‘§))) limβ„‚ 𝐡))
385309, 311, 3843eqtr2d 2779 . . 3 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ ((𝑧 ∈ (π‘Ž(,)𝐡) ↦ ((πΉβ€˜--𝑧) / (πΊβ€˜--𝑧))) limβ„‚ 𝐡) = ((𝑧 ∈ (𝐴(,)𝐡) ↦ ((πΉβ€˜π‘§) / (πΊβ€˜π‘§))) limβ„‚ 𝐡))
386302, 385eleqtrd 2836 . 2 ((πœ‘ ∧ (π‘Ž ∈ ℝ ∧ (𝐴 < π‘Ž ∧ π‘Ž < 𝐡))) β†’ 𝐢 ∈ ((𝑧 ∈ (𝐴(,)𝐡) ↦ ((πΉβ€˜π‘§) / (πΊβ€˜π‘§))) limβ„‚ 𝐡))
3879, 386rexlimddv 3162 1 (πœ‘ β†’ 𝐢 ∈ ((𝑧 ∈ (𝐴(,)𝐡) ↦ ((πΉβ€˜π‘§) / (πΊβ€˜π‘§))) limβ„‚ 𝐡))
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ↔ wb 205   ∧ wa 397   = wceq 1542   ∈ wcel 2107   β‰  wne 2941  βˆƒwrex 3071  Vcvv 3475   βˆͺ cun 3946   ∩ cin 3947   βŠ† wss 3948  ifcif 4528  {csn 4628  {cpr 4630   class class class wbr 5148   ↦ cmpt 5231  dom cdm 5676  ran crn 5677   β†Ύ cres 5678   Fn wfn 6536  βŸΆwf 6537  β€˜cfv 6541  (class class class)co 7406  β„‚cc 11105  β„cr 11106  0cc0 11107  1c1 11108   Β· cmul 11112  +∞cpnf 11242  β„*cxr 11244   < clt 11245   ≀ cle 11246  -cneg 11442   / cdiv 11868  β„šcq 12929  (,)cioo 13321   β†Ύt crest 17363  TopOpenctopn 17364  topGenctg 17380  β„‚fldccnfld 20937  Topctop 22387  TopOnctopon 22404  intcnt 22513  β€“cnβ†’ccncf 24384   limβ„‚ climc 25371   D cdv 25372
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7722  ax-cnex 11163  ax-resscn 11164  ax-1cn 11165  ax-icn 11166  ax-addcl 11167  ax-addrcl 11168  ax-mulcl 11169  ax-mulrcl 11170  ax-mulcom 11171  ax-addass 11172  ax-mulass 11173  ax-distr 11174  ax-i2m1 11175  ax-1ne0 11176  ax-1rid 11177  ax-rnegex 11178  ax-rrecex 11179  ax-cnre 11180  ax-pre-lttri 11181  ax-pre-lttrn 11182  ax-pre-ltadd 11183  ax-pre-mulgt0 11184  ax-pre-sup 11185  ax-addf 11186  ax-mulf 11187
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-tp 4633  df-op 4635  df-uni 4909  df-int 4951  df-iun 4999  df-iin 5000  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-se 5632  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-pred 6298  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6493  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-isom 6550  df-riota 7362  df-ov 7409  df-oprab 7410  df-mpo 7411  df-of 7667  df-om 7853  df-1st 7972  df-2nd 7973  df-supp 8144  df-frecs 8263  df-wrecs 8294  df-recs 8368  df-rdg 8407  df-1o 8463  df-2o 8464  df-er 8700  df-map 8819  df-pm 8820  df-ixp 8889  df-en 8937  df-dom 8938  df-sdom 8939  df-fin 8940  df-fsupp 9359  df-fi 9403  df-sup 9434  df-inf 9435  df-oi 9502  df-card 9931  df-pnf 11247  df-mnf 11248  df-xr 11249  df-ltxr 11250  df-le 11251  df-sub 11443  df-neg 11444  df-div 11869  df-nn 12210  df-2 12272  df-3 12273  df-4 12274  df-5 12275  df-6 12276  df-7 12277  df-8 12278  df-9 12279  df-n0 12470  df-z 12556  df-dec 12675  df-uz 12820  df-q 12930  df-rp 12972  df-xneg 13089  df-xadd 13090  df-xmul 13091  df-ioo 13325  df-ioc 13326  df-ico 13327  df-icc 13328  df-fz 13482  df-fzo 13625  df-seq 13964  df-exp 14025  df-hash 14288  df-cj 15043  df-re 15044  df-im 15045  df-sqrt 15179  df-abs 15180  df-struct 17077  df-sets 17094  df-slot 17112  df-ndx 17124  df-base 17142  df-ress 17171  df-plusg 17207  df-mulr 17208  df-starv 17209  df-sca 17210  df-vsca 17211  df-ip 17212  df-tset 17213  df-ple 17214  df-ds 17216  df-unif 17217  df-hom 17218  df-cco 17219  df-rest 17365  df-topn 17366  df-0g 17384  df-gsum 17385  df-topgen 17386  df-pt 17387  df-prds 17390  df-xrs 17445  df-qtop 17450  df-imas 17451  df-xps 17453  df-mre 17527  df-mrc 17528  df-acs 17530  df-mgm 18558  df-sgrp 18607  df-mnd 18623  df-submnd 18669  df-mulg 18946  df-cntz 19176  df-cmn 19645  df-psmet 20929  df-xmet 20930  df-met 20931  df-bl 20932  df-mopn 20933  df-fbas 20934  df-fg 20935  df-cnfld 20938  df-top 22388  df-topon 22405  df-topsp 22427  df-bases 22441  df-cld 22515  df-ntr 22516  df-cls 22517  df-nei 22594  df-lp 22632  df-perf 22633  df-cn 22723  df-cnp 22724  df-haus 22811  df-cmp 22883  df-tx 23058  df-hmeo 23251  df-fil 23342  df-fm 23434  df-flim 23435  df-flf 23436  df-xms 23818  df-ms 23819  df-tms 23820  df-cncf 24386  df-limc 25375  df-dv 25376
This theorem is referenced by:  lhop  25525  fourierdlem60  44869
  Copyright terms: Public domain W3C validator