Theorem dvferm1lem 25945

Description: Lemma for dvferm 25949. (Contributed by Mario Carneiro, 24-Feb-2015.)

Hypotheses

Ref	Expression
dvferm.a	⊢ (𝜑 → 𝐹:𝑋⟶ℝ)
dvferm.b	⊢ (𝜑 → 𝑋 ⊆ ℝ)
dvferm.u	⊢ (𝜑 → 𝑈 ∈ (𝐴(,)𝐵))
dvferm.s	⊢ (𝜑 → (𝐴(,)𝐵) ⊆ 𝑋)
dvferm.d	⊢ (𝜑 → 𝑈 ∈ dom (ℝ D 𝐹))
dvferm1.r	⊢ (𝜑 → ∀𝑦 ∈ (𝑈(,)𝐵)(𝐹‘𝑦) ≤ (𝐹‘𝑈))
dvferm1.z	⊢ (𝜑 → 0 < ((ℝ D 𝐹)‘𝑈))
dvferm1.t	⊢ (𝜑 → 𝑇 ∈ ℝ+)
dvferm1.l	⊢ (𝜑 → ∀𝑧 ∈ (𝑋 ∖ {𝑈})((𝑧 ≠ 𝑈 ∧ (abs‘(𝑧 − 𝑈)) < 𝑇) → (abs‘((((𝐹‘𝑧) − (𝐹‘𝑈)) / (𝑧 − 𝑈)) − ((ℝ D 𝐹)‘𝑈))) < ((ℝ D 𝐹)‘𝑈)))
dvferm1.x	⊢ 𝑆 = ((𝑈 + if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇))) / 2)

Assertion

Ref	Expression
dvferm1lem	⊢ ¬ 𝜑

Distinct variable groups:   𝑦,𝑧,𝐴   𝑦,𝐵,𝑧   𝑦,𝐹,𝑧   𝑦,𝑈,𝑧   𝑦,𝑋,𝑧   𝜑,𝑦   𝑦,𝑆,𝑧   𝑧,𝑇

Allowed substitution hints:   𝜑(𝑧)   𝑇(𝑦)

Proof of Theorem dvferm1lem

Step	Hyp	Ref	Expression
1		dvferm.a	. . . . . . . . 9 ⊢ (𝜑 → 𝐹:𝑋⟶ℝ)
2		dvferm.b	. . . . . . . . 9 ⊢ (𝜑 → 𝑋 ⊆ ℝ)
3		dvfre 25912	. . . . . . . . 9 ⊢ ((𝐹:𝑋⟶ℝ ∧ 𝑋 ⊆ ℝ) → (ℝ D 𝐹):dom (ℝ D 𝐹)⟶ℝ)
4	1, 2, 3	syl2anc 584	. . . . . . . 8 ⊢ (𝜑 → (ℝ D 𝐹):dom (ℝ D 𝐹)⟶ℝ)
5		dvferm.d	. . . . . . . 8 ⊢ (𝜑 → 𝑈 ∈ dom (ℝ D 𝐹))
6	4, 5	ffvelcdmd 7080	. . . . . . 7 ⊢ (𝜑 → ((ℝ D 𝐹)‘𝑈) ∈ ℝ)
7	6	recnd 11268	. . . . . 6 ⊢ (𝜑 → ((ℝ D 𝐹)‘𝑈) ∈ ℂ)
8	7	subidd 11587	. . . . 5 ⊢ (𝜑 → (((ℝ D 𝐹)‘𝑈) − ((ℝ D 𝐹)‘𝑈)) = 0)
9		ioossre 13429	. . . . . . . . . 10 ⊢ (𝐴(,)𝐵) ⊆ ℝ
10		dvferm.u	. . . . . . . . . 10 ⊢ (𝜑 → 𝑈 ∈ (𝐴(,)𝐵))
11	9, 10	sselid 3961	. . . . . . . . 9 ⊢ (𝜑 → 𝑈 ∈ ℝ)
12		eliooord 13427	. . . . . . . . . . . . . 14 ⊢ (𝑈 ∈ (𝐴(,)𝐵) → (𝐴 < 𝑈 ∧ 𝑈 < 𝐵))
13	10, 12	syl 17	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐴 < 𝑈 ∧ 𝑈 < 𝐵))
14	13	simprd 495	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑈 < 𝐵)
15		dvferm1.t	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑇 ∈ ℝ+)
16	11, 15	ltaddrpd 13089	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑈 < (𝑈 + 𝑇))
17		breq2 5128	. . . . . . . . . . . . 13 ⊢ (𝐵 = if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) → (𝑈 < 𝐵 ↔ 𝑈 < if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇))))
18		breq2 5128	. . . . . . . . . . . . 13 ⊢ ((𝑈 + 𝑇) = if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) → (𝑈 < (𝑈 + 𝑇) ↔ 𝑈 < if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇))))
19	17, 18	ifboth 4545	. . . . . . . . . . . 12 ⊢ ((𝑈 < 𝐵 ∧ 𝑈 < (𝑈 + 𝑇)) → 𝑈 < if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)))
20	14, 16, 19	syl2anc 584	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑈 < if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)))
21		ne0i 4321	. . . . . . . . . . . . . . . 16 ⊢ (𝑈 ∈ (𝐴(,)𝐵) → (𝐴(,)𝐵) ≠ ∅)
22		ndmioo 13394	. . . . . . . . . . . . . . . . 17 ⊢ (¬ (𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → (𝐴(,)𝐵) = ∅)
23	22	necon1ai 2960	. . . . . . . . . . . . . . . 16 ⊢ ((𝐴(,)𝐵) ≠ ∅ → (𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*))
24	10, 21, 23	3syl 18	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝐴 ∈ ℝ* ∧ 𝐵 ∈ ℝ*))
25	24	simprd 495	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐵 ∈ ℝ*)
26	15	rpred 13056	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑇 ∈ ℝ)
27	11, 26	readdcld 11269	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑈 + 𝑇) ∈ ℝ)
28	27	rexrd 11290	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑈 + 𝑇) ∈ ℝ*)
29	25, 28	ifcld 4552	. . . . . . . . . . . . 13 ⊢ (𝜑 → if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) ∈ ℝ*)
30		mnfxr 11297	. . . . . . . . . . . . . . . 16 ⊢ -∞ ∈ ℝ*
31	30	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → -∞ ∈ ℝ*)
32	11	rexrd 11290	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑈 ∈ ℝ*)
33	11	mnfltd 13145	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → -∞ < 𝑈)
34	31, 32, 25, 33, 14	xrlttrd 13180	. . . . . . . . . . . . . 14 ⊢ (𝜑 → -∞ < 𝐵)
35	27	mnfltd 13145	. . . . . . . . . . . . . 14 ⊢ (𝜑 → -∞ < (𝑈 + 𝑇))
36		breq2 5128	. . . . . . . . . . . . . . 15 ⊢ (𝐵 = if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) → (-∞ < 𝐵 ↔ -∞ < if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇))))
37		breq2 5128	. . . . . . . . . . . . . . 15 ⊢ ((𝑈 + 𝑇) = if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) → (-∞ < (𝑈 + 𝑇) ↔ -∞ < if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇))))
38	36, 37	ifboth 4545	. . . . . . . . . . . . . 14 ⊢ ((-∞ < 𝐵 ∧ -∞ < (𝑈 + 𝑇)) → -∞ < if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)))
39	34, 35, 38	syl2anc 584	. . . . . . . . . . . . 13 ⊢ (𝜑 → -∞ < if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)))
40		xrmin2 13199	. . . . . . . . . . . . . 14 ⊢ ((𝐵 ∈ ℝ* ∧ (𝑈 + 𝑇) ∈ ℝ*) → if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) ≤ (𝑈 + 𝑇))
41	25, 28, 40	syl2anc 584	. . . . . . . . . . . . 13 ⊢ (𝜑 → if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) ≤ (𝑈 + 𝑇))
42		xrre 13190	. . . . . . . . . . . . 13 ⊢ (((if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) ∈ ℝ* ∧ (𝑈 + 𝑇) ∈ ℝ) ∧ (-∞ < if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) ∧ if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) ≤ (𝑈 + 𝑇))) → if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) ∈ ℝ)
43	29, 27, 39, 41, 42	syl22anc 838	. . . . . . . . . . . 12 ⊢ (𝜑 → if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) ∈ ℝ)
44		avglt1 12484	. . . . . . . . . . . 12 ⊢ ((𝑈 ∈ ℝ ∧ if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) ∈ ℝ) → (𝑈 < if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) ↔ 𝑈 < ((𝑈 + if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇))) / 2)))
45	11, 43, 44	syl2anc 584	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑈 < if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) ↔ 𝑈 < ((𝑈 + if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇))) / 2)))
46	20, 45	mpbid 232	. . . . . . . . . 10 ⊢ (𝜑 → 𝑈 < ((𝑈 + if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇))) / 2))
47		dvferm1.x	. . . . . . . . . 10 ⊢ 𝑆 = ((𝑈 + if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇))) / 2)
48	46, 47	breqtrrdi 5166	. . . . . . . . 9 ⊢ (𝜑 → 𝑈 < 𝑆)
49	11, 48	gtned 11375	. . . . . . . 8 ⊢ (𝜑 → 𝑆 ≠ 𝑈)
50	11, 43	readdcld 11269	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑈 + if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇))) ∈ ℝ)
51	50	rehalfcld 12493	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑈 + if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇))) / 2) ∈ ℝ)
52	47, 51	eqeltrid 2839	. . . . . . . . . 10 ⊢ (𝜑 → 𝑆 ∈ ℝ)
53	11, 52, 48	ltled 11388	. . . . . . . . . 10 ⊢ (𝜑 → 𝑈 ≤ 𝑆)
54	11, 52, 53	abssubge0d 15455	. . . . . . . . 9 ⊢ (𝜑 → (abs‘(𝑆 − 𝑈)) = (𝑆 − 𝑈))
55		avglt2 12485	. . . . . . . . . . . . . 14 ⊢ ((𝑈 ∈ ℝ ∧ if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) ∈ ℝ) → (𝑈 < if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) ↔ ((𝑈 + if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇))) / 2) < if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇))))
56	11, 43, 55	syl2anc 584	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑈 < if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) ↔ ((𝑈 + if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇))) / 2) < if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇))))
57	20, 56	mpbid 232	. . . . . . . . . . . 12 ⊢ (𝜑 → ((𝑈 + if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇))) / 2) < if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)))
58	47, 57	eqbrtrid 5159	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑆 < if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)))
59	52, 43, 27, 58, 41	ltletrd 11400	. . . . . . . . . 10 ⊢ (𝜑 → 𝑆 < (𝑈 + 𝑇))
60	52, 11, 26	ltsubadd2d 11840	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑆 − 𝑈) < 𝑇 ↔ 𝑆 < (𝑈 + 𝑇)))
61	59, 60	mpbird 257	. . . . . . . . 9 ⊢ (𝜑 → (𝑆 − 𝑈) < 𝑇)
62	54, 61	eqbrtrd 5146	. . . . . . . 8 ⊢ (𝜑 → (abs‘(𝑆 − 𝑈)) < 𝑇)
63		neeq1 2995	. . . . . . . . . . 11 ⊢ (𝑧 = 𝑆 → (𝑧 ≠ 𝑈 ↔ 𝑆 ≠ 𝑈))
64		fvoveq1 7433	. . . . . . . . . . . 12 ⊢ (𝑧 = 𝑆 → (abs‘(𝑧 − 𝑈)) = (abs‘(𝑆 − 𝑈)))
65	64	breq1d 5134	. . . . . . . . . . 11 ⊢ (𝑧 = 𝑆 → ((abs‘(𝑧 − 𝑈)) < 𝑇 ↔ (abs‘(𝑆 − 𝑈)) < 𝑇))
66	63, 65	anbi12d 632	. . . . . . . . . 10 ⊢ (𝑧 = 𝑆 → ((𝑧 ≠ 𝑈 ∧ (abs‘(𝑧 − 𝑈)) < 𝑇) ↔ (𝑆 ≠ 𝑈 ∧ (abs‘(𝑆 − 𝑈)) < 𝑇)))
67		fveq2 6881	. . . . . . . . . . . . . 14 ⊢ (𝑧 = 𝑆 → (𝐹‘𝑧) = (𝐹‘𝑆))
68	67	oveq1d 7425	. . . . . . . . . . . . 13 ⊢ (𝑧 = 𝑆 → ((𝐹‘𝑧) − (𝐹‘𝑈)) = ((𝐹‘𝑆) − (𝐹‘𝑈)))
69		oveq1 7417	. . . . . . . . . . . . 13 ⊢ (𝑧 = 𝑆 → (𝑧 − 𝑈) = (𝑆 − 𝑈))
70	68, 69	oveq12d 7428	. . . . . . . . . . . 12 ⊢ (𝑧 = 𝑆 → (((𝐹‘𝑧) − (𝐹‘𝑈)) / (𝑧 − 𝑈)) = (((𝐹‘𝑆) − (𝐹‘𝑈)) / (𝑆 − 𝑈)))
71	70	fvoveq1d 7432	. . . . . . . . . . 11 ⊢ (𝑧 = 𝑆 → (abs‘((((𝐹‘𝑧) − (𝐹‘𝑈)) / (𝑧 − 𝑈)) − ((ℝ D 𝐹)‘𝑈))) = (abs‘((((𝐹‘𝑆) − (𝐹‘𝑈)) / (𝑆 − 𝑈)) − ((ℝ D 𝐹)‘𝑈))))
72	71	breq1d 5134	. . . . . . . . . 10 ⊢ (𝑧 = 𝑆 → ((abs‘((((𝐹‘𝑧) − (𝐹‘𝑈)) / (𝑧 − 𝑈)) − ((ℝ D 𝐹)‘𝑈))) < ((ℝ D 𝐹)‘𝑈) ↔ (abs‘((((𝐹‘𝑆) − (𝐹‘𝑈)) / (𝑆 − 𝑈)) − ((ℝ D 𝐹)‘𝑈))) < ((ℝ D 𝐹)‘𝑈)))
73	66, 72	imbi12d 344	. . . . . . . . 9 ⊢ (𝑧 = 𝑆 → (((𝑧 ≠ 𝑈 ∧ (abs‘(𝑧 − 𝑈)) < 𝑇) → (abs‘((((𝐹‘𝑧) − (𝐹‘𝑈)) / (𝑧 − 𝑈)) − ((ℝ D 𝐹)‘𝑈))) < ((ℝ D 𝐹)‘𝑈)) ↔ ((𝑆 ≠ 𝑈 ∧ (abs‘(𝑆 − 𝑈)) < 𝑇) → (abs‘((((𝐹‘𝑆) − (𝐹‘𝑈)) / (𝑆 − 𝑈)) − ((ℝ D 𝐹)‘𝑈))) < ((ℝ D 𝐹)‘𝑈))))
74		dvferm1.l	. . . . . . . . 9 ⊢ (𝜑 → ∀𝑧 ∈ (𝑋 ∖ {𝑈})((𝑧 ≠ 𝑈 ∧ (abs‘(𝑧 − 𝑈)) < 𝑇) → (abs‘((((𝐹‘𝑧) − (𝐹‘𝑈)) / (𝑧 − 𝑈)) − ((ℝ D 𝐹)‘𝑈))) < ((ℝ D 𝐹)‘𝑈)))
75	24	simpld 494	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐴 ∈ ℝ*)
76	13	simpld 494	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐴 < 𝑈)
77	75, 32, 76	xrltled 13171	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐴 ≤ 𝑈)
78		iooss1 13402	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℝ* ∧ 𝐴 ≤ 𝑈) → (𝑈(,)𝐵) ⊆ (𝐴(,)𝐵))
79	75, 77, 78	syl2anc 584	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑈(,)𝐵) ⊆ (𝐴(,)𝐵))
80		dvferm.s	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐴(,)𝐵) ⊆ 𝑋)
81	79, 80	sstrd 3974	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑈(,)𝐵) ⊆ 𝑋)
82	52	rexrd 11290	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑆 ∈ ℝ*)
83		xrmin1 13198	. . . . . . . . . . . . . 14 ⊢ ((𝐵 ∈ ℝ* ∧ (𝑈 + 𝑇) ∈ ℝ*) → if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) ≤ 𝐵)
84	25, 28, 83	syl2anc 584	. . . . . . . . . . . . 13 ⊢ (𝜑 → if(𝐵 ≤ (𝑈 + 𝑇), 𝐵, (𝑈 + 𝑇)) ≤ 𝐵)
85	82, 29, 25, 58, 84	xrltletrd 13182	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑆 < 𝐵)
86		elioo2 13408	. . . . . . . . . . . . 13 ⊢ ((𝑈 ∈ ℝ* ∧ 𝐵 ∈ ℝ*) → (𝑆 ∈ (𝑈(,)𝐵) ↔ (𝑆 ∈ ℝ ∧ 𝑈 < 𝑆 ∧ 𝑆 < 𝐵)))
87	32, 25, 86	syl2anc 584	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑆 ∈ (𝑈(,)𝐵) ↔ (𝑆 ∈ ℝ ∧ 𝑈 < 𝑆 ∧ 𝑆 < 𝐵)))
88	52, 48, 85, 87	mpbir3and 1343	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑆 ∈ (𝑈(,)𝐵))
89	81, 88	sseldd 3964	. . . . . . . . . 10 ⊢ (𝜑 → 𝑆 ∈ 𝑋)
90		eldifsn 4767	. . . . . . . . . 10 ⊢ (𝑆 ∈ (𝑋 ∖ {𝑈}) ↔ (𝑆 ∈ 𝑋 ∧ 𝑆 ≠ 𝑈))
91	89, 49, 90	sylanbrc 583	. . . . . . . . 9 ⊢ (𝜑 → 𝑆 ∈ (𝑋 ∖ {𝑈}))
92	73, 74, 91	rspcdva 3607	. . . . . . . 8 ⊢ (𝜑 → ((𝑆 ≠ 𝑈 ∧ (abs‘(𝑆 − 𝑈)) < 𝑇) → (abs‘((((𝐹‘𝑆) − (𝐹‘𝑈)) / (𝑆 − 𝑈)) − ((ℝ D 𝐹)‘𝑈))) < ((ℝ D 𝐹)‘𝑈)))
93	49, 62, 92	mp2and 699	. . . . . . 7 ⊢ (𝜑 → (abs‘((((𝐹‘𝑆) − (𝐹‘𝑈)) / (𝑆 − 𝑈)) − ((ℝ D 𝐹)‘𝑈))) < ((ℝ D 𝐹)‘𝑈))
94	1, 89	ffvelcdmd 7080	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹‘𝑆) ∈ ℝ)
95	80, 10	sseldd 3964	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑈 ∈ 𝑋)
96	1, 95	ffvelcdmd 7080	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹‘𝑈) ∈ ℝ)
97	94, 96	resubcld 11670	. . . . . . . . 9 ⊢ (𝜑 → ((𝐹‘𝑆) − (𝐹‘𝑈)) ∈ ℝ)
98	52, 11	resubcld 11670	. . . . . . . . . 10 ⊢ (𝜑 → (𝑆 − 𝑈) ∈ ℝ)
99	11, 52	posdifd 11829	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑈 < 𝑆 ↔ 0 < (𝑆 − 𝑈)))
100	48, 99	mpbid 232	. . . . . . . . . 10 ⊢ (𝜑 → 0 < (𝑆 − 𝑈))
101	98, 100	elrpd 13053	. . . . . . . . 9 ⊢ (𝜑 → (𝑆 − 𝑈) ∈ ℝ+)
102	97, 101	rerpdivcld 13087	. . . . . . . 8 ⊢ (𝜑 → (((𝐹‘𝑆) − (𝐹‘𝑈)) / (𝑆 − 𝑈)) ∈ ℝ)
103	102, 6, 6	absdifltd 15457	. . . . . . 7 ⊢ (𝜑 → ((abs‘((((𝐹‘𝑆) − (𝐹‘𝑈)) / (𝑆 − 𝑈)) − ((ℝ D 𝐹)‘𝑈))) < ((ℝ D 𝐹)‘𝑈) ↔ ((((ℝ D 𝐹)‘𝑈) − ((ℝ D 𝐹)‘𝑈)) < (((𝐹‘𝑆) − (𝐹‘𝑈)) / (𝑆 − 𝑈)) ∧ (((𝐹‘𝑆) − (𝐹‘𝑈)) / (𝑆 − 𝑈)) < (((ℝ D 𝐹)‘𝑈) + ((ℝ D 𝐹)‘𝑈)))))
104	93, 103	mpbid 232	. . . . . 6 ⊢ (𝜑 → ((((ℝ D 𝐹)‘𝑈) − ((ℝ D 𝐹)‘𝑈)) < (((𝐹‘𝑆) − (𝐹‘𝑈)) / (𝑆 − 𝑈)) ∧ (((𝐹‘𝑆) − (𝐹‘𝑈)) / (𝑆 − 𝑈)) < (((ℝ D 𝐹)‘𝑈) + ((ℝ D 𝐹)‘𝑈))))
105	104	simpld 494	. . . . 5 ⊢ (𝜑 → (((ℝ D 𝐹)‘𝑈) − ((ℝ D 𝐹)‘𝑈)) < (((𝐹‘𝑆) − (𝐹‘𝑈)) / (𝑆 − 𝑈)))
106	8, 105	eqbrtrrd 5148	. . . 4 ⊢ (𝜑 → 0 < (((𝐹‘𝑆) − (𝐹‘𝑈)) / (𝑆 − 𝑈)))
107		gt0div 12113	. . . . 5 ⊢ ((((𝐹‘𝑆) − (𝐹‘𝑈)) ∈ ℝ ∧ (𝑆 − 𝑈) ∈ ℝ ∧ 0 < (𝑆 − 𝑈)) → (0 < ((𝐹‘𝑆) − (𝐹‘𝑈)) ↔ 0 < (((𝐹‘𝑆) − (𝐹‘𝑈)) / (𝑆 − 𝑈))))
108	97, 98, 100, 107	syl3anc 1373	. . . 4 ⊢ (𝜑 → (0 < ((𝐹‘𝑆) − (𝐹‘𝑈)) ↔ 0 < (((𝐹‘𝑆) − (𝐹‘𝑈)) / (𝑆 − 𝑈))))
109	106, 108	mpbird 257	. . 3 ⊢ (𝜑 → 0 < ((𝐹‘𝑆) − (𝐹‘𝑈)))
110	96, 94	posdifd 11829	. . 3 ⊢ (𝜑 → ((𝐹‘𝑈) < (𝐹‘𝑆) ↔ 0 < ((𝐹‘𝑆) − (𝐹‘𝑈))))
111	109, 110	mpbird 257	. 2 ⊢ (𝜑 → (𝐹‘𝑈) < (𝐹‘𝑆))
112		fveq2 6881	. . . . 5 ⊢ (𝑦 = 𝑆 → (𝐹‘𝑦) = (𝐹‘𝑆))
113	112	breq1d 5134	. . . 4 ⊢ (𝑦 = 𝑆 → ((𝐹‘𝑦) ≤ (𝐹‘𝑈) ↔ (𝐹‘𝑆) ≤ (𝐹‘𝑈)))
114		dvferm1.r	. . . 4 ⊢ (𝜑 → ∀𝑦 ∈ (𝑈(,)𝐵)(𝐹‘𝑦) ≤ (𝐹‘𝑈))
115	113, 114, 88	rspcdva 3607	. . 3 ⊢ (𝜑 → (𝐹‘𝑆) ≤ (𝐹‘𝑈))
116	94, 96, 115	lensymd 11391	. 2 ⊢ (𝜑 → ¬ (𝐹‘𝑈) < (𝐹‘𝑆))
117	111, 116	pm2.65i 194	1 ⊢ ¬ 𝜑

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∧ w3a 1086   = wceq 1540   ∈ wcel 2109   ≠ wne 2933  ∀wral 3052   ∖ cdif 3928   ⊆ wss 3931  ∅c0 4313  ifcif 4505  {csn 4606   class class class wbr 5124  dom cdm 5659  ⟶wf 6532  ‘cfv 6536  (class class class)co 7410  ℝcr 11133  0cc0 11134   + caddc 11137  -∞cmnf 11272  ℝ^*cxr 11273   < clt 11274   ≤ cle 11275   − cmin 11471   / cdiv 11899  2c2 12300  ℝ⁺crp 13013  (,)cioo 13367  abscabs 15258   D cdv 25821

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 2708  ax-rep 5254  ax-sep 5271  ax-nul 5281  ax-pow 5340  ax-pr 5407  ax-un 7734  ax-cnex 11190  ax-resscn 11191  ax-1cn 11192  ax-icn 11193  ax-addcl 11194  ax-addrcl 11195  ax-mulcl 11196  ax-mulrcl 11197  ax-mulcom 11198  ax-addass 11199  ax-mulass 11200  ax-distr 11201  ax-i2m1 11202  ax-1ne0 11203  ax-1rid 11204  ax-rnegex 11205  ax-rrecex 11206  ax-cnre 11207  ax-pre-lttri 11208  ax-pre-lttrn 11209  ax-pre-ltadd 11210  ax-pre-mulgt0 11211  ax-pre-sup 11212

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 2540  df-eu 2569  df-clab 2715  df-cleq 2728  df-clel 2810  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3062  df-rmo 3364  df-reu 3365  df-rab 3421  df-v 3466  df-sbc 3771  df-csb 3880  df-dif 3934  df-un 3936  df-in 3938  df-ss 3948  df-pss 3951  df-nul 4314  df-if 4506  df-pw 4582  df-sn 4607  df-pr 4609  df-tp 4611  df-op 4613  df-uni 4889  df-int 4928  df-iun 4974  df-iin 4975  df-br 5125  df-opab 5187  df-mpt 5207  df-tr 5235  df-id 5553  df-eprel 5558  df-po 5566  df-so 5567  df-fr 5611  df-we 5613  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  df-pred 6295  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-om 7867  df-1st 7993  df-2nd 7994  df-frecs 8285  df-wrecs 8316  df-recs 8390  df-rdg 8429  df-1o 8485  df-er 8724  df-map 8847  df-pm 8848  df-en 8965  df-dom 8966  df-sdom 8967  df-fin 8968  df-fi 9428  df-sup 9459  df-inf 9460  df-pnf 11276  df-mnf 11277  df-xr 11278  df-ltxr 11279  df-le 11280  df-sub 11473  df-neg 11474  df-div 11900  df-nn 12246  df-2 12308  df-3 12309  df-4 12310  df-5 12311  df-6 12312  df-7 12313  df-8 12314  df-9 12315  df-n0 12507  df-z 12594  df-dec 12714  df-uz 12858  df-q 12970  df-rp 13014  df-xneg 13133  df-xadd 13134  df-xmul 13135  df-ioo 13371  df-icc 13374  df-fz 13530  df-seq 14025  df-exp 14085  df-cj 15123  df-re 15124  df-im 15125  df-sqrt 15259  df-abs 15260  df-struct 17171  df-slot 17206  df-ndx 17218  df-base 17234  df-plusg 17289  df-mulr 17290  df-starv 17291  df-tset 17295  df-ple 17296  df-ds 17298  df-unif 17299  df-rest 17441  df-topn 17442  df-topgen 17462  df-psmet 21312  df-xmet 21313  df-met 21314  df-bl 21315  df-mopn 21316  df-fbas 21317  df-fg 21318  df-cnfld 21321  df-top 22837  df-topon 22854  df-topsp 22876  df-bases 22889  df-cld 22962  df-ntr 22963  df-cls 22964  df-nei 23041  df-lp 23079  df-perf 23080  df-cn 23170  df-cnp 23171  df-haus 23258  df-fil 23789  df-fm 23881  df-flim 23882  df-flf 23883  df-xms 24264  df-ms 24265  df-cncf 24827  df-limc 25824  df-dv 25825

This theorem is referenced by:  dvferm1  25946