dvfsumlem2 - Metamath Proof Explorer

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

Theorem dvfsumlem2 23790

Description: Lemma for dvfsumrlim 23794. (Contributed by Mario Carneiro, 17-May-2016.)

**Hypotheses**
Ref	Expression
dvfsum.s	⊢ 𝑆 = (𝑇(,)+∞)
dvfsum.z	⊢ 𝑍 = (ℤ_≥‘𝑀)
dvfsum.m	⊢ (𝜑 → 𝑀 ∈ ℤ)
dvfsum.d	⊢ (𝜑 → 𝐷 ∈ ℝ)
dvfsum.md	⊢ (𝜑 → 𝑀 ≤ (𝐷 + 1))
dvfsum.t	⊢ (𝜑 → 𝑇 ∈ ℝ)
dvfsum.a	⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → 𝐴 ∈ ℝ)
dvfsum.b1	⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → 𝐵 ∈ 𝑉)
dvfsum.b2	⊢ ((𝜑 ∧ 𝑥 ∈ 𝑍) → 𝐵 ∈ ℝ)
dvfsum.b3	⊢ (𝜑 → (ℝ D (𝑥 ∈ 𝑆 ↦ 𝐴)) = (𝑥 ∈ 𝑆 ↦ 𝐵))
dvfsum.c	⊢ (𝑥 = 𝑘 → 𝐵 = 𝐶)
dvfsum.u	⊢ (𝜑 → 𝑈 ∈ ℝ^*)
dvfsum.l	⊢ ((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑥 ∧ 𝑥 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ 𝐵)
dvfsum.h	⊢ 𝐻 = (𝑥 ∈ 𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶 − 𝐴)))
dvfsumlem1.1	⊢ (𝜑 → 𝑋 ∈ 𝑆)
dvfsumlem1.2	⊢ (𝜑 → 𝑌 ∈ 𝑆)
dvfsumlem1.3	⊢ (𝜑 → 𝐷 ≤ 𝑋)
dvfsumlem1.4	⊢ (𝜑 → 𝑋 ≤ 𝑌)
dvfsumlem1.5	⊢ (𝜑 → 𝑌 ≤ 𝑈)
dvfsumlem1.6	⊢ (𝜑 → 𝑌 ≤ ((⌊‘𝑋) + 1))

**Assertion**
Ref	Expression
dvfsumlem2	⊢ (𝜑 → ((𝐻‘𝑌) ≤ (𝐻‘𝑋) ∧ ((𝐻‘𝑋) − ⦋𝑋 / 𝑥⦌𝐵) ≤ ((𝐻‘𝑌) − ⦋𝑌 / 𝑥⦌𝐵)))

Distinct variable groups: 𝐵,𝑘 𝑥,𝐶 𝑥,𝑘,𝐷 𝜑,𝑘,𝑥 𝑆,𝑘,𝑥 𝑘,𝑀,𝑥 𝑥,𝑇 𝑘,𝑌,𝑥 𝑥,𝑍 𝑈,𝑘,𝑥 𝑘,𝑋,𝑥 Allowed substitution hints: 𝐴(𝑥,𝑘) 𝐵(𝑥) 𝐶(𝑘) 𝑇(𝑘) 𝐻(𝑥,𝑘) 𝑉(𝑥,𝑘) 𝑍(𝑘)

Proof of Theorem dvfsumlem2 Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		dvfsum.s	. . . . . . . . 9 ⊢ 𝑆 = (𝑇(,)+∞)
2		ioossre 12235	. . . . . . . . 9 ⊢ (𝑇(,)+∞) ⊆ ℝ
3	1, 2	eqsstri 3635	. . . . . . . 8 ⊢ 𝑆 ⊆ ℝ
4		dvfsumlem1.2	. . . . . . . 8 ⊢ (𝜑 → 𝑌 ∈ 𝑆)
5	3, 4	sseldi 3601	. . . . . . 7 ⊢ (𝜑 → 𝑌 ∈ ℝ)
6		dvfsumlem1.1	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑋 ∈ 𝑆)
7	6, 1	syl6eleq 2711	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ (𝑇(,)+∞))
8		dvfsum.t	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑇 ∈ ℝ)
9	8	rexrd 10089	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑇 ∈ ℝ^*)
10		elioopnf 12267	. . . . . . . . . . 11 ⊢ (𝑇 ∈ ℝ^* → (𝑋 ∈ (𝑇(,)+∞) ↔ (𝑋 ∈ ℝ ∧ 𝑇 < 𝑋)))
11	9, 10	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (𝑋 ∈ (𝑇(,)+∞) ↔ (𝑋 ∈ ℝ ∧ 𝑇 < 𝑋)))
12	7, 11	mpbid 222	. . . . . . . . 9 ⊢ (𝜑 → (𝑋 ∈ ℝ ∧ 𝑇 < 𝑋))
13	12	simpld 475	. . . . . . . 8 ⊢ (𝜑 → 𝑋 ∈ ℝ)
14		reflcl 12597	. . . . . . . 8 ⊢ (𝑋 ∈ ℝ → (⌊‘𝑋) ∈ ℝ)
15	13, 14	syl 17	. . . . . . 7 ⊢ (𝜑 → (⌊‘𝑋) ∈ ℝ)
16	5, 15	resubcld 10458	. . . . . 6 ⊢ (𝜑 → (𝑌 − (⌊‘𝑋)) ∈ ℝ)
17	13	rexrd 10089	. . . . . . . 8 ⊢ (𝜑 → 𝑋 ∈ ℝ^*)
18	5	rexrd 10089	. . . . . . . 8 ⊢ (𝜑 → 𝑌 ∈ ℝ^*)
19		dvfsumlem1.4	. . . . . . . 8 ⊢ (𝜑 → 𝑋 ≤ 𝑌)
20		ubicc2 12289	. . . . . . . 8 ⊢ ((𝑋 ∈ ℝ^* ∧ 𝑌 ∈ ℝ^* ∧ 𝑋 ≤ 𝑌) → 𝑌 ∈ (𝑋[,]𝑌))
21	17, 18, 19, 20	syl3anc 1326	. . . . . . 7 ⊢ (𝜑 → 𝑌 ∈ (𝑋[,]𝑌))
22		pnfxr 10092	. . . . . . . . . . . . 13 ⊢ +∞ ∈ ℝ^*
23	22	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → +∞ ∈ ℝ^*)
24	12	simprd 479	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑇 < 𝑋)
25		ltpnf 11954	. . . . . . . . . . . . 13 ⊢ (𝑌 ∈ ℝ → 𝑌 < +∞)
26	5, 25	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑌 < +∞)
27		iccssioo 12242	. . . . . . . . . . . 12 ⊢ (((𝑇 ∈ ℝ^* ∧ +∞ ∈ ℝ^*) ∧ (𝑇 < 𝑋 ∧ 𝑌 < +∞)) → (𝑋[,]𝑌) ⊆ (𝑇(,)+∞))
28	9, 23, 24, 26, 27	syl22anc 1327	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑋[,]𝑌) ⊆ (𝑇(,)+∞))
29	28, 1	syl6sseqr 3652	. . . . . . . . . 10 ⊢ (𝜑 → (𝑋[,]𝑌) ⊆ 𝑆)
30	29	sselda 3603	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑦 ∈ 𝑆)
31	3	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑆 ⊆ ℝ)
32		dvfsum.a	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → 𝐴 ∈ ℝ)
33		dvfsum.b1	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → 𝐵 ∈ 𝑉)
34		dvfsum.b3	. . . . . . . . . . . . 13 ⊢ (𝜑 → (ℝ D (𝑥 ∈ 𝑆 ↦ 𝐴)) = (𝑥 ∈ 𝑆 ↦ 𝐵))
35	31, 32, 33, 34	dvmptrecl 23787	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → 𝐵 ∈ ℝ)
36		eqid 2622	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ 𝑆 ↦ 𝐵) = (𝑥 ∈ 𝑆 ↦ 𝐵)
37	35, 36	fmptd 6385	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑥 ∈ 𝑆 ↦ 𝐵):𝑆⟶ℝ)
38		nfcv 2764	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑦𝐵
39		nfcsb1v 3549	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑥⦋𝑦 / 𝑥⦌𝐵
40		csbeq1a 3542	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑦 → 𝐵 = ⦋𝑦 / 𝑥⦌𝐵)
41	38, 39, 40	cbvmpt 4749	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ 𝑆 ↦ 𝐵) = (𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐵)
42	41	fmpt 6381	. . . . . . . . . . 11 ⊢ (∀𝑦 ∈ 𝑆 ⦋𝑦 / 𝑥⦌𝐵 ∈ ℝ ↔ (𝑥 ∈ 𝑆 ↦ 𝐵):𝑆⟶ℝ)
43	37, 42	sylibr 224	. . . . . . . . . 10 ⊢ (𝜑 → ∀𝑦 ∈ 𝑆 ⦋𝑦 / 𝑥⦌𝐵 ∈ ℝ)
44	43	r19.21bi 2932	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝑆) → ⦋𝑦 / 𝑥⦌𝐵 ∈ ℝ)
45	30, 44	syldan 487	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → ⦋𝑦 / 𝑥⦌𝐵 ∈ ℝ)
46	45	ralrimiva 2966	. . . . . . 7 ⊢ (𝜑 → ∀𝑦 ∈ (𝑋[,]𝑌)⦋𝑦 / 𝑥⦌𝐵 ∈ ℝ)
47		csbeq1 3536	. . . . . . . . 9 ⊢ (𝑦 = 𝑌 → ⦋𝑦 / 𝑥⦌𝐵 = ⦋𝑌 / 𝑥⦌𝐵)
48	47	eleq1d 2686	. . . . . . . 8 ⊢ (𝑦 = 𝑌 → (⦋𝑦 / 𝑥⦌𝐵 ∈ ℝ ↔ ⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ))
49	48	rspcv 3305	. . . . . . 7 ⊢ (𝑌 ∈ (𝑋[,]𝑌) → (∀𝑦 ∈ (𝑋[,]𝑌)⦋𝑦 / 𝑥⦌𝐵 ∈ ℝ → ⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ))
50	21, 46, 49	sylc 65	. . . . . 6 ⊢ (𝜑 → ⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ)
51	16, 50	remulcld 10070	. . . . 5 ⊢ (𝜑 → ((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) ∈ ℝ)
52		eqid 2622	. . . . . . . . . . 11 ⊢ (𝑥 ∈ 𝑆 ↦ 𝐴) = (𝑥 ∈ 𝑆 ↦ 𝐴)
53	32, 52	fmptd 6385	. . . . . . . . . 10 ⊢ (𝜑 → (𝑥 ∈ 𝑆 ↦ 𝐴):𝑆⟶ℝ)
54		nfcv 2764	. . . . . . . . . . . 12 ⊢ Ⅎ𝑦𝐴
55		nfcsb1v 3549	. . . . . . . . . . . 12 ⊢ Ⅎ𝑥⦋𝑦 / 𝑥⦌𝐴
56		csbeq1a 3542	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑦 → 𝐴 = ⦋𝑦 / 𝑥⦌𝐴)
57	54, 55, 56	cbvmpt 4749	. . . . . . . . . . 11 ⊢ (𝑥 ∈ 𝑆 ↦ 𝐴) = (𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐴)
58	57	fmpt 6381	. . . . . . . . . 10 ⊢ (∀𝑦 ∈ 𝑆 ⦋𝑦 / 𝑥⦌𝐴 ∈ ℝ ↔ (𝑥 ∈ 𝑆 ↦ 𝐴):𝑆⟶ℝ)
59	53, 58	sylibr 224	. . . . . . . . 9 ⊢ (𝜑 → ∀𝑦 ∈ 𝑆 ⦋𝑦 / 𝑥⦌𝐴 ∈ ℝ)
60	59	r19.21bi 2932	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝑆) → ⦋𝑦 / 𝑥⦌𝐴 ∈ ℝ)
61	30, 60	syldan 487	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → ⦋𝑦 / 𝑥⦌𝐴 ∈ ℝ)
62	61	ralrimiva 2966	. . . . . 6 ⊢ (𝜑 → ∀𝑦 ∈ (𝑋[,]𝑌)⦋𝑦 / 𝑥⦌𝐴 ∈ ℝ)
63		csbeq1 3536	. . . . . . . 8 ⊢ (𝑦 = 𝑌 → ⦋𝑦 / 𝑥⦌𝐴 = ⦋𝑌 / 𝑥⦌𝐴)
64	63	eleq1d 2686	. . . . . . 7 ⊢ (𝑦 = 𝑌 → (⦋𝑦 / 𝑥⦌𝐴 ∈ ℝ ↔ ⦋𝑌 / 𝑥⦌𝐴 ∈ ℝ))
65	64	rspcv 3305	. . . . . 6 ⊢ (𝑌 ∈ (𝑋[,]𝑌) → (∀𝑦 ∈ (𝑋[,]𝑌)⦋𝑦 / 𝑥⦌𝐴 ∈ ℝ → ⦋𝑌 / 𝑥⦌𝐴 ∈ ℝ))
66	21, 62, 65	sylc 65	. . . . 5 ⊢ (𝜑 → ⦋𝑌 / 𝑥⦌𝐴 ∈ ℝ)
67	51, 66	resubcld 10458	. . . 4 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) ∈ ℝ)
68	13, 15	resubcld 10458	. . . . . 6 ⊢ (𝜑 → (𝑋 − (⌊‘𝑋)) ∈ ℝ)
69		lbicc2 12288	. . . . . . . 8 ⊢ ((𝑋 ∈ ℝ^* ∧ 𝑌 ∈ ℝ^* ∧ 𝑋 ≤ 𝑌) → 𝑋 ∈ (𝑋[,]𝑌))
70	17, 18, 19, 69	syl3anc 1326	. . . . . . 7 ⊢ (𝜑 → 𝑋 ∈ (𝑋[,]𝑌))
71		csbeq1 3536	. . . . . . . . 9 ⊢ (𝑦 = 𝑋 → ⦋𝑦 / 𝑥⦌𝐵 = ⦋𝑋 / 𝑥⦌𝐵)
72	71	eleq1d 2686	. . . . . . . 8 ⊢ (𝑦 = 𝑋 → (⦋𝑦 / 𝑥⦌𝐵 ∈ ℝ ↔ ⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ))
73	72	rspcv 3305	. . . . . . 7 ⊢ (𝑋 ∈ (𝑋[,]𝑌) → (∀𝑦 ∈ (𝑋[,]𝑌)⦋𝑦 / 𝑥⦌𝐵 ∈ ℝ → ⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ))
74	70, 46, 73	sylc 65	. . . . . 6 ⊢ (𝜑 → ⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ)
75	68, 74	remulcld 10070	. . . . 5 ⊢ (𝜑 → ((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) ∈ ℝ)
76		csbeq1 3536	. . . . . . . 8 ⊢ (𝑦 = 𝑋 → ⦋𝑦 / 𝑥⦌𝐴 = ⦋𝑋 / 𝑥⦌𝐴)
77	76	eleq1d 2686	. . . . . . 7 ⊢ (𝑦 = 𝑋 → (⦋𝑦 / 𝑥⦌𝐴 ∈ ℝ ↔ ⦋𝑋 / 𝑥⦌𝐴 ∈ ℝ))
78	77	rspcv 3305	. . . . . 6 ⊢ (𝑋 ∈ (𝑋[,]𝑌) → (∀𝑦 ∈ (𝑋[,]𝑌)⦋𝑦 / 𝑥⦌𝐴 ∈ ℝ → ⦋𝑋 / 𝑥⦌𝐴 ∈ ℝ))
79	70, 62, 78	sylc 65	. . . . 5 ⊢ (𝜑 → ⦋𝑋 / 𝑥⦌𝐴 ∈ ℝ)
80	75, 79	resubcld 10458	. . . 4 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) ∈ ℝ)
81		fzfid 12772	. . . . 5 ⊢ (𝜑 → (𝑀...(⌊‘𝑋)) ∈ Fin)
82		dvfsum.b2	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑍) → 𝐵 ∈ ℝ)
83	82	ralrimiva 2966	. . . . . 6 ⊢ (𝜑 → ∀𝑥 ∈ 𝑍 𝐵 ∈ ℝ)
84		elfzuz 12338	. . . . . . 7 ⊢ (𝑘 ∈ (𝑀...(⌊‘𝑋)) → 𝑘 ∈ (ℤ_≥‘𝑀))
85		dvfsum.z	. . . . . . 7 ⊢ 𝑍 = (ℤ_≥‘𝑀)
86	84, 85	syl6eleqr 2712	. . . . . 6 ⊢ (𝑘 ∈ (𝑀...(⌊‘𝑋)) → 𝑘 ∈ 𝑍)
87		dvfsum.c	. . . . . . . 8 ⊢ (𝑥 = 𝑘 → 𝐵 = 𝐶)
88	87	eleq1d 2686	. . . . . . 7 ⊢ (𝑥 = 𝑘 → (𝐵 ∈ ℝ ↔ 𝐶 ∈ ℝ))
89	88	rspccva 3308	. . . . . 6 ⊢ ((∀𝑥 ∈ 𝑍 𝐵 ∈ ℝ ∧ 𝑘 ∈ 𝑍) → 𝐶 ∈ ℝ)
90	83, 86, 89	syl2an 494	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝑀...(⌊‘𝑋))) → 𝐶 ∈ ℝ)
91	81, 90	fsumrecl 14465	. . . 4 ⊢ (𝜑 → Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶 ∈ ℝ)
92	68, 50	remulcld 10070	. . . . . 6 ⊢ (𝜑 → ((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) ∈ ℝ)
93	92, 79	resubcld 10458	. . . . 5 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) ∈ ℝ)
94	5, 13	resubcld 10458	. . . . . . . . 9 ⊢ (𝜑 → (𝑌 − 𝑋) ∈ ℝ)
95	50, 94	remulcld 10070	. . . . . . . 8 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) ∈ ℝ)
96	50	recnd 10068	. . . . . . . . . 10 ⊢ (𝜑 → ⦋𝑌 / 𝑥⦌𝐵 ∈ ℂ)
97	5	recnd 10068	. . . . . . . . . 10 ⊢ (𝜑 → 𝑌 ∈ ℂ)
98	13	recnd 10068	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ ℂ)
99	96, 97, 98	subdid 10486	. . . . . . . . 9 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) = ((⦋𝑌 / 𝑥⦌𝐵 · 𝑌) − (⦋𝑌 / 𝑥⦌𝐵 · 𝑋)))
100		eqid 2622	. . . . . . . . . . 11 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
101	100	mulcn 22670	. . . . . . . . . . 11 ⊢ · ∈ (((TopOpen‘ℂ_fld) ×_t (TopOpen‘ℂ_fld)) Cn (TopOpen‘ℂ_fld))
102	28, 2	syl6ss 3615	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑋[,]𝑌) ⊆ ℝ)
103		ax-resscn 9993	. . . . . . . . . . . . 13 ⊢ ℝ ⊆ ℂ
104	102, 103	syl6ss 3615	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑋[,]𝑌) ⊆ ℂ)
105	103	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → ℝ ⊆ ℂ)
106		cncfmptc 22714	. . . . . . . . . . . 12 ⊢ ((⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ ∧ (𝑋[,]𝑌) ⊆ ℂ ∧ ℝ ⊆ ℂ) → (𝑦 ∈ (𝑋[,]𝑌) ↦ ⦋𝑌 / 𝑥⦌𝐵) ∈ ((𝑋[,]𝑌)–cn→ℝ))
107	50, 104, 105, 106	syl3anc 1326	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) ↦ ⦋𝑌 / 𝑥⦌𝐵) ∈ ((𝑋[,]𝑌)–cn→ℝ))
108		cncfmptid 22715	. . . . . . . . . . . 12 ⊢ (((𝑋[,]𝑌) ⊆ ℝ ∧ ℝ ⊆ ℂ) → (𝑦 ∈ (𝑋[,]𝑌) ↦ 𝑦) ∈ ((𝑋[,]𝑌)–cn→ℝ))
109	102, 103, 108	sylancl 694	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) ↦ 𝑦) ∈ ((𝑋[,]𝑌)–cn→ℝ))
110		remulcl 10021	. . . . . . . . . . 11 ⊢ ((⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (⦋𝑌 / 𝑥⦌𝐵 · 𝑦) ∈ ℝ)
111	100, 101, 107, 109, 103, 110	cncfmpt2ss 22718	. . . . . . . . . 10 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵 · 𝑦)) ∈ ((𝑋[,]𝑌)–cn→ℝ))
112		reelprrecn 10028	. . . . . . . . . . . . 13 ⊢ ℝ ∈ {ℝ, ℂ}
113	112	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → ℝ ∈ {ℝ, ℂ})
114		ioossicc 12259	. . . . . . . . . . . . . . 15 ⊢ (𝑋(,)𝑌) ⊆ (𝑋[,]𝑌)
115	114, 102	syl5ss 3614	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑋(,)𝑌) ⊆ ℝ)
116	115	sselda 3603	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋(,)𝑌)) → 𝑦 ∈ ℝ)
117	116	recnd 10068	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋(,)𝑌)) → 𝑦 ∈ ℂ)
118		1cnd 10056	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋(,)𝑌)) → 1 ∈ ℂ)
119		simpr 477	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℝ)
120	119	recnd 10068	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℂ)
121		1cnd 10056	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 1 ∈ ℂ)
122	113	dvmptid 23720	. . . . . . . . . . . . 13 ⊢ (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ 𝑦)) = (𝑦 ∈ ℝ ↦ 1))
123	100	tgioo2 22606	. . . . . . . . . . . . 13 ⊢ (topGen‘ran (,)) = ((TopOpen‘ℂ_fld) ↾_t ℝ)
124		iooretop 22569	. . . . . . . . . . . . . 14 ⊢ (𝑋(,)𝑌) ∈ (topGen‘ran (,))
125	124	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑋(,)𝑌) ∈ (topGen‘ran (,)))
126	113, 120, 121, 122, 115, 123, 100, 125	dvmptres 23726	. . . . . . . . . . . 12 ⊢ (𝜑 → (ℝ D (𝑦 ∈ (𝑋(,)𝑌) ↦ 𝑦)) = (𝑦 ∈ (𝑋(,)𝑌) ↦ 1))
127	113, 117, 118, 126, 96	dvmptcmul 23727	. . . . . . . . . . 11 ⊢ (𝜑 → (ℝ D (𝑦 ∈ (𝑋(,)𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵 · 𝑦))) = (𝑦 ∈ (𝑋(,)𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵 · 1)))
128	96	mulid1d 10057	. . . . . . . . . . . 12 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐵 · 1) = ⦋𝑌 / 𝑥⦌𝐵)
129	128	mpteq2dv 4745	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑦 ∈ (𝑋(,)𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵 · 1)) = (𝑦 ∈ (𝑋(,)𝑌) ↦ ⦋𝑌 / 𝑥⦌𝐵))
130	127, 129	eqtrd 2656	. . . . . . . . . 10 ⊢ (𝜑 → (ℝ D (𝑦 ∈ (𝑋(,)𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵 · 𝑦))) = (𝑦 ∈ (𝑋(,)𝑌) ↦ ⦋𝑌 / 𝑥⦌𝐵))
131	29	resmptd 5452	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐴) ↾ (𝑋[,]𝑌)) = (𝑦 ∈ (𝑋[,]𝑌) ↦ ⦋𝑦 / 𝑥⦌𝐴))
132	32	recnd 10068	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → 𝐴 ∈ ℂ)
133	132, 52	fmptd 6385	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑥 ∈ 𝑆 ↦ 𝐴):𝑆⟶ℂ)
134	34	dmeqd 5326	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → dom (ℝ D (𝑥 ∈ 𝑆 ↦ 𝐴)) = dom (𝑥 ∈ 𝑆 ↦ 𝐵))
135	33	ralrimiva 2966	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ∀𝑥 ∈ 𝑆 𝐵 ∈ 𝑉)
136		dmmptg 5632	. . . . . . . . . . . . . . . . . 18 ⊢ (∀𝑥 ∈ 𝑆 𝐵 ∈ 𝑉 → dom (𝑥 ∈ 𝑆 ↦ 𝐵) = 𝑆)
137	135, 136	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → dom (𝑥 ∈ 𝑆 ↦ 𝐵) = 𝑆)
138	134, 137	eqtrd 2656	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → dom (ℝ D (𝑥 ∈ 𝑆 ↦ 𝐴)) = 𝑆)
139		dvcn 23684	. . . . . . . . . . . . . . . 16 ⊢ (((ℝ ⊆ ℂ ∧ (𝑥 ∈ 𝑆 ↦ 𝐴):𝑆⟶ℂ ∧ 𝑆 ⊆ ℝ) ∧ dom (ℝ D (𝑥 ∈ 𝑆 ↦ 𝐴)) = 𝑆) → (𝑥 ∈ 𝑆 ↦ 𝐴) ∈ (𝑆–cn→ℂ))
140	105, 133, 31, 138, 139	syl31anc 1329	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑥 ∈ 𝑆 ↦ 𝐴) ∈ (𝑆–cn→ℂ))
141		cncffvrn 22701	. . . . . . . . . . . . . . 15 ⊢ ((ℝ ⊆ ℂ ∧ (𝑥 ∈ 𝑆 ↦ 𝐴) ∈ (𝑆–cn→ℂ)) → ((𝑥 ∈ 𝑆 ↦ 𝐴) ∈ (𝑆–cn→ℝ) ↔ (𝑥 ∈ 𝑆 ↦ 𝐴):𝑆⟶ℝ))
142	103, 140, 141	sylancr 695	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑥 ∈ 𝑆 ↦ 𝐴) ∈ (𝑆–cn→ℝ) ↔ (𝑥 ∈ 𝑆 ↦ 𝐴):𝑆⟶ℝ))
143	53, 142	mpbird 247	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑥 ∈ 𝑆 ↦ 𝐴) ∈ (𝑆–cn→ℝ))
144	57, 143	syl5eqelr 2706	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐴) ∈ (𝑆–cn→ℝ))
145		rescncf 22700	. . . . . . . . . . . 12 ⊢ ((𝑋[,]𝑌) ⊆ 𝑆 → ((𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐴) ∈ (𝑆–cn→ℝ) → ((𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐴) ↾ (𝑋[,]𝑌)) ∈ ((𝑋[,]𝑌)–cn→ℝ)))
146	29, 144, 145	sylc 65	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐴) ↾ (𝑋[,]𝑌)) ∈ ((𝑋[,]𝑌)–cn→ℝ))
147	131, 146	eqeltrrd 2702	. . . . . . . . . 10 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) ↦ ⦋𝑦 / 𝑥⦌𝐴) ∈ ((𝑋[,]𝑌)–cn→ℝ))
148	60	recnd 10068	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝑆) → ⦋𝑦 / 𝑥⦌𝐴 ∈ ℂ)
149	57	oveq2i 6661	. . . . . . . . . . . 12 ⊢ (ℝ D (𝑥 ∈ 𝑆 ↦ 𝐴)) = (ℝ D (𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐴))
150	34, 149, 41	3eqtr3g 2679	. . . . . . . . . . 11 ⊢ (𝜑 → (ℝ D (𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐴)) = (𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐵))
151	114, 29	syl5ss 3614	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑋(,)𝑌) ⊆ 𝑆)
152	113, 148, 44, 150, 151, 123, 100, 125	dvmptres 23726	. . . . . . . . . 10 ⊢ (𝜑 → (ℝ D (𝑦 ∈ (𝑋(,)𝑌) ↦ ⦋𝑦 / 𝑥⦌𝐴)) = (𝑦 ∈ (𝑋(,)𝑌) ↦ ⦋𝑦 / 𝑥⦌𝐵))
153	114	sseli 3599	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (𝑋(,)𝑌) → 𝑦 ∈ (𝑋[,]𝑌))
154		simpl 473	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝜑)
155	4	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑌 ∈ 𝑆)
156		dvfsum.d	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐷 ∈ ℝ)
157	156	adantr 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝐷 ∈ ℝ)
158	13	adantr 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑋 ∈ ℝ)
159		elicc2 12238	. . . . . . . . . . . . . . . 16 ⊢ ((𝑋 ∈ ℝ ∧ 𝑌 ∈ ℝ) → (𝑦 ∈ (𝑋[,]𝑌) ↔ (𝑦 ∈ ℝ ∧ 𝑋 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌)))
160	13, 5, 159	syl2anc 693	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) ↔ (𝑦 ∈ ℝ ∧ 𝑋 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌)))
161	160	biimpa 501	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → (𝑦 ∈ ℝ ∧ 𝑋 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌))
162	161	simp1d 1073	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑦 ∈ ℝ)
163		dvfsumlem1.3	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐷 ≤ 𝑋)
164	163	adantr 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝐷 ≤ 𝑋)
165	161	simp2d 1074	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑋 ≤ 𝑦)
166	157, 158, 162, 164, 165	letrd 10194	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝐷 ≤ 𝑦)
167	161	simp3d 1075	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑦 ≤ 𝑌)
168		dvfsumlem1.5	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑌 ≤ 𝑈)
169	168	adantr 481	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑌 ≤ 𝑈)
170		simp2r 1088	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌 ∧ 𝑌 ≤ 𝑈)) → 𝑌 ∈ 𝑆)
171		eleq1 2689	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑌 → (𝑘 ∈ 𝑆 ↔ 𝑌 ∈ 𝑆))
172	171	anbi2d 740	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑌 → ((𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ↔ (𝑦 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆)))
173		breq2 4657	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑌 → (𝑦 ≤ 𝑘 ↔ 𝑦 ≤ 𝑌))
174		breq1 4656	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑌 → (𝑘 ≤ 𝑈 ↔ 𝑌 ≤ 𝑈))
175	173, 174	3anbi23d 1402	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑌 → ((𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈) ↔ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌 ∧ 𝑌 ≤ 𝑈)))
176	172, 175	3anbi23d 1402	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑌 → ((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) ↔ (𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌 ∧ 𝑌 ≤ 𝑈))))
177		vex 3203	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑘 ∈ V
178	177, 87	csbie 3559	. . . . . . . . . . . . . . . . 17 ⊢ ⦋𝑘 / 𝑥⦌𝐵 = 𝐶
179		csbeq1 3536	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑌 → ⦋𝑘 / 𝑥⦌𝐵 = ⦋𝑌 / 𝑥⦌𝐵)
180	178, 179	syl5eqr 2670	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑌 → 𝐶 = ⦋𝑌 / 𝑥⦌𝐵)
181	180	breq1d 4663	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑌 → (𝐶 ≤ ⦋𝑦 / 𝑥⦌𝐵 ↔ ⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑦 / 𝑥⦌𝐵))
182	176, 181	imbi12d 334	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑌 → (((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑦 / 𝑥⦌𝐵) ↔ ((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌 ∧ 𝑌 ≤ 𝑈)) → ⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑦 / 𝑥⦌𝐵)))
183		nfv 1843	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑥(𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈))
184		nfcv 2764	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑥𝐶
185		nfcv 2764	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑥 ≤
186	184, 185, 39	nfbr 4699	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑥 𝐶 ≤ ⦋𝑦 / 𝑥⦌𝐵
187	183, 186	nfim 1825	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑥((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑦 / 𝑥⦌𝐵)
188		eleq1 2689	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑦 → (𝑥 ∈ 𝑆 ↔ 𝑦 ∈ 𝑆))
189	188	anbi1d 741	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑦 → ((𝑥 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ↔ (𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆)))
190		breq2 4657	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑦 → (𝐷 ≤ 𝑥 ↔ 𝐷 ≤ 𝑦))
191		breq1 4656	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑦 → (𝑥 ≤ 𝑘 ↔ 𝑦 ≤ 𝑘))
192	190, 191	3anbi12d 1400	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑦 → ((𝐷 ≤ 𝑥 ∧ 𝑥 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈) ↔ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)))
193	189, 192	3anbi23d 1402	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑦 → ((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑥 ∧ 𝑥 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) ↔ (𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈))))
194	40	breq2d 4665	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑦 → (𝐶 ≤ 𝐵 ↔ 𝐶 ≤ ⦋𝑦 / 𝑥⦌𝐵))
195	193, 194	imbi12d 334	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑦 → (((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑥 ∧ 𝑥 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ 𝐵) ↔ ((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑦 / 𝑥⦌𝐵)))
196		dvfsum.l	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑥 ∧ 𝑥 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ 𝐵)
197	187, 195, 196	chvar 2262	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑦 / 𝑥⦌𝐵)
198	182, 197	vtoclg 3266	. . . . . . . . . . . . 13 ⊢ (𝑌 ∈ 𝑆 → ((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌 ∧ 𝑌 ≤ 𝑈)) → ⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑦 / 𝑥⦌𝐵))
199	170, 198	mpcom 38	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌 ∧ 𝑌 ≤ 𝑈)) → ⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑦 / 𝑥⦌𝐵)
200	154, 30, 155, 166, 167, 169, 199	syl123anc 1343	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → ⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑦 / 𝑥⦌𝐵)
201	153, 200	sylan2 491	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋(,)𝑌)) → ⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑦 / 𝑥⦌𝐵)
202		oveq2 6658	. . . . . . . . . 10 ⊢ (𝑦 = 𝑋 → (⦋𝑌 / 𝑥⦌𝐵 · 𝑦) = (⦋𝑌 / 𝑥⦌𝐵 · 𝑋))
203		oveq2 6658	. . . . . . . . . 10 ⊢ (𝑦 = 𝑌 → (⦋𝑌 / 𝑥⦌𝐵 · 𝑦) = (⦋𝑌 / 𝑥⦌𝐵 · 𝑌))
204	13, 5, 111, 130, 147, 152, 201, 70, 21, 19, 202, 76, 203, 63	dvle 23770	. . . . . . . . 9 ⊢ (𝜑 → ((⦋𝑌 / 𝑥⦌𝐵 · 𝑌) − (⦋𝑌 / 𝑥⦌𝐵 · 𝑋)) ≤ (⦋𝑌 / 𝑥⦌𝐴 − ⦋𝑋 / 𝑥⦌𝐴))
205	99, 204	eqbrtrd 4675	. . . . . . . 8 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) ≤ (⦋𝑌 / 𝑥⦌𝐴 − ⦋𝑋 / 𝑥⦌𝐴))
206	95, 66, 79, 205	lesubd 10631	. . . . . . 7 ⊢ (𝜑 → ⦋𝑋 / 𝑥⦌𝐴 ≤ (⦋𝑌 / 𝑥⦌𝐴 − (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋))))
207	92	recnd 10068	. . . . . . . . 9 ⊢ (𝜑 → ((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) ∈ ℂ)
208	51	recnd 10068	. . . . . . . . 9 ⊢ (𝜑 → ((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) ∈ ℂ)
209	66	recnd 10068	. . . . . . . . 9 ⊢ (𝜑 → ⦋𝑌 / 𝑥⦌𝐴 ∈ ℂ)
210	207, 208, 209	subsubd 10420	. . . . . . . 8 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴)) = ((((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)) + ⦋𝑌 / 𝑥⦌𝐴))
211	208, 207	negsubdi2d 10408	. . . . . . . . . . 11 ⊢ (𝜑 → -(((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)) = (((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)))
212	15	recnd 10068	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (⌊‘𝑋) ∈ ℂ)
213	97, 98, 212	nnncan2d 10427	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑌 − (⌊‘𝑋)) − (𝑋 − (⌊‘𝑋))) = (𝑌 − 𝑋))
214	213	oveq1d 6665	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − (𝑋 − (⌊‘𝑋))) · ⦋𝑌 / 𝑥⦌𝐵) = ((𝑌 − 𝑋) · ⦋𝑌 / 𝑥⦌𝐵))
215	16	recnd 10068	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑌 − (⌊‘𝑋)) ∈ ℂ)
216	68	recnd 10068	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑋 − (⌊‘𝑋)) ∈ ℂ)
217	215, 216, 96	subdird 10487	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − (𝑋 − (⌊‘𝑋))) · ⦋𝑌 / 𝑥⦌𝐵) = (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)))
218	94	recnd 10068	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑌 − 𝑋) ∈ ℂ)
219	218, 96	mulcomd 10061	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝑌 − 𝑋) · ⦋𝑌 / 𝑥⦌𝐵) = (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)))
220	214, 217, 219	3eqtr3d 2664	. . . . . . . . . . . 12 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)) = (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)))
221	220	negeqd 10275	. . . . . . . . . . 11 ⊢ (𝜑 → -(((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)) = -(⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)))
222	211, 221	eqtr3d 2658	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)) = -(⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)))
223	222	oveq1d 6665	. . . . . . . . 9 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)) + ⦋𝑌 / 𝑥⦌𝐴) = (-(⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) + ⦋𝑌 / 𝑥⦌𝐴))
224	95	recnd 10068	. . . . . . . . . 10 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) ∈ ℂ)
225	224, 209	negsubdid 10407	. . . . . . . . 9 ⊢ (𝜑 → -((⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) − ⦋𝑌 / 𝑥⦌𝐴) = (-(⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) + ⦋𝑌 / 𝑥⦌𝐴))
226	223, 225	eqtr4d 2659	. . . . . . . 8 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)) + ⦋𝑌 / 𝑥⦌𝐴) = -((⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) − ⦋𝑌 / 𝑥⦌𝐴))
227	224, 209	negsubdi2d 10408	. . . . . . . 8 ⊢ (𝜑 → -((⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) − ⦋𝑌 / 𝑥⦌𝐴) = (⦋𝑌 / 𝑥⦌𝐴 − (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋))))
228	210, 226, 227	3eqtrd 2660	. . . . . . 7 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴)) = (⦋𝑌 / 𝑥⦌𝐴 − (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋))))
229	206, 228	breqtrrd 4681	. . . . . 6 ⊢ (𝜑 → ⦋𝑋 / 𝑥⦌𝐴 ≤ (((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴)))
230	79, 92, 67, 229	lesubd 10631	. . . . 5 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) ≤ (((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴))
231		flle 12600	. . . . . . . . 9 ⊢ (𝑋 ∈ ℝ → (⌊‘𝑋) ≤ 𝑋)
232	13, 231	syl 17	. . . . . . . 8 ⊢ (𝜑 → (⌊‘𝑋) ≤ 𝑋)
233	13, 15	subge0d 10617	. . . . . . . 8 ⊢ (𝜑 → (0 ≤ (𝑋 − (⌊‘𝑋)) ↔ (⌊‘𝑋) ≤ 𝑋))
234	232, 233	mpbird 247	. . . . . . 7 ⊢ (𝜑 → 0 ≤ (𝑋 − (⌊‘𝑋)))
235	200	ralrimiva 2966	. . . . . . . 8 ⊢ (𝜑 → ∀𝑦 ∈ (𝑋[,]𝑌)⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑦 / 𝑥⦌𝐵)
236	71	breq2d 4665	. . . . . . . . 9 ⊢ (𝑦 = 𝑋 → (⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑦 / 𝑥⦌𝐵 ↔ ⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑋 / 𝑥⦌𝐵))
237	236	rspcv 3305	. . . . . . . 8 ⊢ (𝑋 ∈ (𝑋[,]𝑌) → (∀𝑦 ∈ (𝑋[,]𝑌)⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑦 / 𝑥⦌𝐵 → ⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑋 / 𝑥⦌𝐵))
238	70, 235, 237	sylc 65	. . . . . . 7 ⊢ (𝜑 → ⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑋 / 𝑥⦌𝐵)
239	50, 74, 68, 234, 238	lemul2ad 10964	. . . . . 6 ⊢ (𝜑 → ((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) ≤ ((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵))
240	92, 75, 79, 239	lesub1dd 10643	. . . . 5 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) ≤ (((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴))
241	67, 93, 80, 230, 240	letrd 10194	. . . 4 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) ≤ (((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴))
242	67, 80, 91, 241	leadd1dd 10641	. . 3 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶) ≤ ((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶))
243		dvfsum.m	. . . 4 ⊢ (𝜑 → 𝑀 ∈ ℤ)
244		dvfsum.md	. . . 4 ⊢ (𝜑 → 𝑀 ≤ (𝐷 + 1))
245		dvfsum.u	. . . 4 ⊢ (𝜑 → 𝑈 ∈ ℝ^*)
246		dvfsum.h	. . . 4 ⊢ 𝐻 = (𝑥 ∈ 𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶 − 𝐴)))
247		dvfsumlem1.6	. . . 4 ⊢ (𝜑 → 𝑌 ≤ ((⌊‘𝑋) + 1))
248	1, 85, 243, 156, 244, 8, 32, 33, 82, 34, 87, 245, 196, 246, 6, 4, 163, 19, 168, 247	dvfsumlem1 23789	. . 3 ⊢ (𝜑 → (𝐻‘𝑌) = ((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶))
249	13	leidd 10594	. . . 4 ⊢ (𝜑 → 𝑋 ≤ 𝑋)
250	17, 18, 245, 19, 168	xrletrd 11993	. . . 4 ⊢ (𝜑 → 𝑋 ≤ 𝑈)
251		fllep1 12602	. . . . 5 ⊢ (𝑋 ∈ ℝ → 𝑋 ≤ ((⌊‘𝑋) + 1))
252	13, 251	syl 17	. . . 4 ⊢ (𝜑 → 𝑋 ≤ ((⌊‘𝑋) + 1))
253	1, 85, 243, 156, 244, 8, 32, 33, 82, 34, 87, 245, 196, 246, 6, 6, 163, 249, 250, 252	dvfsumlem1 23789	. . 3 ⊢ (𝜑 → (𝐻‘𝑋) = ((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶))
254	242, 248, 253	3brtr4d 4685	. 2 ⊢ (𝜑 → (𝐻‘𝑌) ≤ (𝐻‘𝑋))
255	80, 74	resubcld 10458	. . . . 5 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) − ⦋𝑋 / 𝑥⦌𝐵) ∈ ℝ)
256	67, 50	resubcld 10458	. . . . 5 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) − ⦋𝑌 / 𝑥⦌𝐵) ∈ ℝ)
257		peano2rem 10348	. . . . . . . . . . 11 ⊢ ((𝑋 − (⌊‘𝑋)) ∈ ℝ → ((𝑋 − (⌊‘𝑋)) − 1) ∈ ℝ)
258	68, 257	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑋 − (⌊‘𝑋)) − 1) ∈ ℝ)
259	258, 74	remulcld 10070	. . . . . . . . 9 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) ∈ ℝ)
260	259, 79	resubcld 10458	. . . . . . . 8 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) ∈ ℝ)
261		peano2rem 10348	. . . . . . . . . . 11 ⊢ ((𝑌 − (⌊‘𝑋)) ∈ ℝ → ((𝑌 − (⌊‘𝑋)) − 1) ∈ ℝ)
262	16, 261	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑌 − (⌊‘𝑋)) − 1) ∈ ℝ)
263	262, 74	remulcld 10070	. . . . . . . . 9 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) ∈ ℝ)
264	263, 66	resubcld 10458	. . . . . . . 8 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) ∈ ℝ)
265	262, 50	remulcld 10070	. . . . . . . . 9 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) ∈ ℝ)
266	265, 66	resubcld 10458	. . . . . . . 8 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) ∈ ℝ)
267	259	recnd 10068	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) ∈ ℂ)
268	263	recnd 10068	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) ∈ ℂ)
269	267, 268	subcld 10392	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵)) ∈ ℂ)
270	269, 209	addcomd 10238	. . . . . . . . . . . 12 ⊢ (𝜑 → (((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵)) + ⦋𝑌 / 𝑥⦌𝐴) = (⦋𝑌 / 𝑥⦌𝐴 + ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵))))
271	267, 268, 209	subsubd 10420	. . . . . . . . . . . 12 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴)) = (((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵)) + ⦋𝑌 / 𝑥⦌𝐴))
272	209, 268, 267	subsub2d 10421	. . . . . . . . . . . 12 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐴 − ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵))) = (⦋𝑌 / 𝑥⦌𝐴 + ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵))))
273	270, 271, 272	3eqtr4d 2666	. . . . . . . . . . 11 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴)) = (⦋𝑌 / 𝑥⦌𝐴 − ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵))))
274		1cnd 10056	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 1 ∈ ℂ)
275	215, 216, 274	nnncan2d 10427	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) − ((𝑋 − (⌊‘𝑋)) − 1)) = ((𝑌 − (⌊‘𝑋)) − (𝑋 − (⌊‘𝑋))))
276	275, 213	eqtrd 2656	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) − ((𝑋 − (⌊‘𝑋)) − 1)) = (𝑌 − 𝑋))
277	276	oveq1d 6665	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) − 1) − ((𝑋 − (⌊‘𝑋)) − 1)) · ⦋𝑋 / 𝑥⦌𝐵) = ((𝑌 − 𝑋) · ⦋𝑋 / 𝑥⦌𝐵))
278	262	recnd 10068	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑌 − (⌊‘𝑋)) − 1) ∈ ℂ)
279	258	recnd 10068	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑋 − (⌊‘𝑋)) − 1) ∈ ℂ)
280	74	recnd 10068	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ⦋𝑋 / 𝑥⦌𝐵 ∈ ℂ)
281	278, 279, 280	subdird 10487	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) − 1) − ((𝑋 − (⌊‘𝑋)) − 1)) · ⦋𝑋 / 𝑥⦌𝐵) = ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵)))
282	218, 280	mulcomd 10061	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝑌 − 𝑋) · ⦋𝑋 / 𝑥⦌𝐵) = (⦋𝑋 / 𝑥⦌𝐵 · (𝑌 − 𝑋)))
283	277, 281, 282	3eqtr3d 2664	. . . . . . . . . . . 12 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵)) = (⦋𝑋 / 𝑥⦌𝐵 · (𝑌 − 𝑋)))
284	283	oveq2d 6666	. . . . . . . . . . 11 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐴 − ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵))) = (⦋𝑌 / 𝑥⦌𝐴 − (⦋𝑋 / 𝑥⦌𝐵 · (𝑌 − 𝑋))))
285	273, 284	eqtrd 2656	. . . . . . . . . 10 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴)) = (⦋𝑌 / 𝑥⦌𝐴 − (⦋𝑋 / 𝑥⦌𝐵 · (𝑌 − 𝑋))))
286	74, 94	remulcld 10070	. . . . . . . . . . 11 ⊢ (𝜑 → (⦋𝑋 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) ∈ ℝ)
287		cncfmptc 22714	. . . . . . . . . . . . . . 15 ⊢ ((⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ ∧ (𝑋[,]𝑌) ⊆ ℂ ∧ ℝ ⊆ ℂ) → (𝑦 ∈ (𝑋[,]𝑌) ↦ ⦋𝑋 / 𝑥⦌𝐵) ∈ ((𝑋[,]𝑌)–cn→ℝ))
288	74, 104, 105, 287	syl3anc 1326	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) ↦ ⦋𝑋 / 𝑥⦌𝐵) ∈ ((𝑋[,]𝑌)–cn→ℝ))
289		remulcl 10021	. . . . . . . . . . . . . 14 ⊢ ((⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (⦋𝑋 / 𝑥⦌𝐵 · 𝑦) ∈ ℝ)
290	100, 101, 288, 109, 103, 289	cncfmpt2ss 22718	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵 · 𝑦)) ∈ ((𝑋[,]𝑌)–cn→ℝ))
291	113, 117, 118, 126, 280	dvmptcmul 23727	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (ℝ D (𝑦 ∈ (𝑋(,)𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵 · 𝑦))) = (𝑦 ∈ (𝑋(,)𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵 · 1)))
292	280	mulid1d 10057	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (⦋𝑋 / 𝑥⦌𝐵 · 1) = ⦋𝑋 / 𝑥⦌𝐵)
293	292	mpteq2dv 4745	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑦 ∈ (𝑋(,)𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵 · 1)) = (𝑦 ∈ (𝑋(,)𝑌) ↦ ⦋𝑋 / 𝑥⦌𝐵))
294	291, 293	eqtrd 2656	. . . . . . . . . . . . 13 ⊢ (𝜑 → (ℝ D (𝑦 ∈ (𝑋(,)𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵 · 𝑦))) = (𝑦 ∈ (𝑋(,)𝑌) ↦ ⦋𝑋 / 𝑥⦌𝐵))
295	6	adantr 481	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑋 ∈ 𝑆)
296	162	rexrd 10089	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑦 ∈ ℝ^*)
297	18	adantr 481	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑌 ∈ ℝ^*)
298	245	adantr 481	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑈 ∈ ℝ^*)
299	296, 297, 298, 167, 169	xrletrd 11993	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑦 ≤ 𝑈)
300		vex 3203	. . . . . . . . . . . . . . . 16 ⊢ 𝑦 ∈ V
301		eleq1 2689	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = 𝑦 → (𝑘 ∈ 𝑆 ↔ 𝑦 ∈ 𝑆))
302	301	anbi2d 740	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 𝑦 → ((𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ↔ (𝑋 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆)))
303		breq2 4657	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = 𝑦 → (𝑋 ≤ 𝑘 ↔ 𝑋 ≤ 𝑦))
304		breq1 4656	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = 𝑦 → (𝑘 ≤ 𝑈 ↔ 𝑦 ≤ 𝑈))
305	303, 304	3anbi23d 1402	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 𝑦 → ((𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈) ↔ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑦 ∧ 𝑦 ≤ 𝑈)))
306	302, 305	3anbi23d 1402	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑦 → ((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) ↔ (𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑦 ∧ 𝑦 ≤ 𝑈))))
307		csbeq1 3536	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = 𝑦 → ⦋𝑘 / 𝑥⦌𝐵 = ⦋𝑦 / 𝑥⦌𝐵)
308	178, 307	syl5eqr 2670	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 𝑦 → 𝐶 = ⦋𝑦 / 𝑥⦌𝐵)
309	308	breq1d 4663	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑦 → (𝐶 ≤ ⦋𝑋 / 𝑥⦌𝐵 ↔ ⦋𝑦 / 𝑥⦌𝐵 ≤ ⦋𝑋 / 𝑥⦌𝐵))
310	306, 309	imbi12d 334	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑦 → (((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑋 / 𝑥⦌𝐵) ↔ ((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑦 ∧ 𝑦 ≤ 𝑈)) → ⦋𝑦 / 𝑥⦌𝐵 ≤ ⦋𝑋 / 𝑥⦌𝐵)))
311		simp2l 1087	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝑋 ∈ 𝑆)
312		nfv 1843	. . . . . . . . . . . . . . . . . . 19 ⊢ Ⅎ𝑥(𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈))
313		nfcsb1v 3549	. . . . . . . . . . . . . . . . . . . 20 ⊢ Ⅎ𝑥⦋𝑋 / 𝑥⦌𝐵
314	184, 185, 313	nfbr 4699	. . . . . . . . . . . . . . . . . . 19 ⊢ Ⅎ𝑥 𝐶 ≤ ⦋𝑋 / 𝑥⦌𝐵
315	312, 314	nfim 1825	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑥((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑋 / 𝑥⦌𝐵)
316		eleq1 2689	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = 𝑋 → (𝑥 ∈ 𝑆 ↔ 𝑋 ∈ 𝑆))
317	316	anbi1d 741	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = 𝑋 → ((𝑥 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ↔ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆)))
318		breq2 4657	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = 𝑋 → (𝐷 ≤ 𝑥 ↔ 𝐷 ≤ 𝑋))
319		breq1 4656	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = 𝑋 → (𝑥 ≤ 𝑘 ↔ 𝑋 ≤ 𝑘))
320	318, 319	3anbi12d 1400	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = 𝑋 → ((𝐷 ≤ 𝑥 ∧ 𝑥 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈) ↔ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)))
321	317, 320	3anbi23d 1402	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = 𝑋 → ((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑥 ∧ 𝑥 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) ↔ (𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈))))
322		csbeq1a 3542	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = 𝑋 → 𝐵 = ⦋𝑋 / 𝑥⦌𝐵)
323	322	breq2d 4665	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = 𝑋 → (𝐶 ≤ 𝐵 ↔ 𝐶 ≤ ⦋𝑋 / 𝑥⦌𝐵))
324	321, 323	imbi12d 334	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑋 → (((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑥 ∧ 𝑥 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ 𝐵) ↔ ((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑋 / 𝑥⦌𝐵)))
325	315, 324, 196	vtoclg1f 3265	. . . . . . . . . . . . . . . . 17 ⊢ (𝑋 ∈ 𝑆 → ((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑋 / 𝑥⦌𝐵))
326	311, 325	mpcom 38	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑋 / 𝑥⦌𝐵)
327	300, 310, 326	vtocl 3259	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑦 ∧ 𝑦 ≤ 𝑈)) → ⦋𝑦 / 𝑥⦌𝐵 ≤ ⦋𝑋 / 𝑥⦌𝐵)
328	154, 295, 30, 164, 165, 299, 327	syl123anc 1343	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → ⦋𝑦 / 𝑥⦌𝐵 ≤ ⦋𝑋 / 𝑥⦌𝐵)
329	153, 328	sylan2 491	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋(,)𝑌)) → ⦋𝑦 / 𝑥⦌𝐵 ≤ ⦋𝑋 / 𝑥⦌𝐵)
330		oveq2 6658	. . . . . . . . . . . . 13 ⊢ (𝑦 = 𝑋 → (⦋𝑋 / 𝑥⦌𝐵 · 𝑦) = (⦋𝑋 / 𝑥⦌𝐵 · 𝑋))
331		oveq2 6658	. . . . . . . . . . . . 13 ⊢ (𝑦 = 𝑌 → (⦋𝑋 / 𝑥⦌𝐵 · 𝑦) = (⦋𝑋 / 𝑥⦌𝐵 · 𝑌))
332	13, 5, 147, 152, 290, 294, 329, 70, 21, 19, 76, 330, 63, 331	dvle 23770	. . . . . . . . . . . 12 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐴 − ⦋𝑋 / 𝑥⦌𝐴) ≤ ((⦋𝑋 / 𝑥⦌𝐵 · 𝑌) − (⦋𝑋 / 𝑥⦌𝐵 · 𝑋)))
333	280, 97, 98	subdid 10486	. . . . . . . . . . . 12 ⊢ (𝜑 → (⦋𝑋 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) = ((⦋𝑋 / 𝑥⦌𝐵 · 𝑌) − (⦋𝑋 / 𝑥⦌𝐵 · 𝑋)))
334	332, 333	breqtrrd 4681	. . . . . . . . . . 11 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐴 − ⦋𝑋 / 𝑥⦌𝐴) ≤ (⦋𝑋 / 𝑥⦌𝐵 · (𝑌 − 𝑋)))
335	66, 79, 286, 334	subled 10630	. . . . . . . . . 10 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐴 − (⦋𝑋 / 𝑥⦌𝐵 · (𝑌 − 𝑋))) ≤ ⦋𝑋 / 𝑥⦌𝐴)
336	285, 335	eqbrtrd 4675	. . . . . . . . 9 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴)) ≤ ⦋𝑋 / 𝑥⦌𝐴)
337	259, 264, 79, 336	subled 10630	. . . . . . . 8 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) ≤ ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴))
338	262	renegcld 10457	. . . . . . . . . . . 12 ⊢ (𝜑 → -((𝑌 − (⌊‘𝑋)) − 1) ∈ ℝ)
339		1red 10055	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 1 ∈ ℝ)
340	5, 15, 339	lesubadd2d 10626	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((𝑌 − (⌊‘𝑋)) ≤ 1 ↔ 𝑌 ≤ ((⌊‘𝑋) + 1)))
341	247, 340	mpbird 247	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑌 − (⌊‘𝑋)) ≤ 1)
342	16, 339	suble0d 10618	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) ≤ 0 ↔ (𝑌 − (⌊‘𝑋)) ≤ 1))
343	341, 342	mpbird 247	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝑌 − (⌊‘𝑋)) − 1) ≤ 0)
344	262	le0neg1d 10599	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) ≤ 0 ↔ 0 ≤ -((𝑌 − (⌊‘𝑋)) − 1)))
345	343, 344	mpbid 222	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 ≤ -((𝑌 − (⌊‘𝑋)) − 1))
346	50, 74, 338, 345, 238	lemul2ad 10964	. . . . . . . . . . 11 ⊢ (𝜑 → (-((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) ≤ (-((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵))
347	278, 96	mulneg1d 10483	. . . . . . . . . . 11 ⊢ (𝜑 → (-((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) = -(((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵))
348	278, 280	mulneg1d 10483	. . . . . . . . . . 11 ⊢ (𝜑 → (-((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) = -(((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵))
349	346, 347, 348	3brtr3d 4684	. . . . . . . . . 10 ⊢ (𝜑 → -(((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) ≤ -(((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵))
350	263, 265	lenegd 10606	. . . . . . . . . 10 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) ≤ (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) ↔ -(((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) ≤ -(((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵)))
351	349, 350	mpbird 247	. . . . . . . . 9 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) ≤ (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵))
352	263, 265, 66, 351	lesub1dd 10643	. . . . . . . 8 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) ≤ ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴))
353	260, 264, 266, 337, 352	letrd 10194	. . . . . . 7 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) ≤ ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴))
354	216, 274, 280	subdird 10487	. . . . . . . . 9 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) = (((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − (1 · ⦋𝑋 / 𝑥⦌𝐵)))
355	280	mulid2d 10058	. . . . . . . . . 10 ⊢ (𝜑 → (1 · ⦋𝑋 / 𝑥⦌𝐵) = ⦋𝑋 / 𝑥⦌𝐵)
356	355	oveq2d 6666	. . . . . . . . 9 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − (1 · ⦋𝑋 / 𝑥⦌𝐵)) = (((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐵))
357	354, 356	eqtrd 2656	. . . . . . . 8 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) = (((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐵))
358	357	oveq1d 6665	. . . . . . 7 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) = ((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴))
359	215, 274, 96	subdird 10487	. . . . . . . . 9 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) = (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − (1 · ⦋𝑌 / 𝑥⦌𝐵)))
360	96	mulid2d 10058	. . . . . . . . . 10 ⊢ (𝜑 → (1 · ⦋𝑌 / 𝑥⦌𝐵) = ⦋𝑌 / 𝑥⦌𝐵)
361	360	oveq2d 6666	. . . . . . . . 9 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − (1 · ⦋𝑌 / 𝑥⦌𝐵)) = (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐵))
362	359, 361	eqtrd 2656	. . . . . . . 8 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) = (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐵))
363	362	oveq1d 6665	. . . . . . 7 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) = ((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴))
364	353, 358, 363	3brtr3d 4684	. . . . . 6 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) ≤ ((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴))
365	75	recnd 10068	. . . . . . 7 ⊢ (𝜑 → ((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) ∈ ℂ)
366	79	recnd 10068	. . . . . . 7 ⊢ (𝜑 → ⦋𝑋 / 𝑥⦌𝐴 ∈ ℂ)
367	365, 366, 280	sub32d 10424	. . . . . 6 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) − ⦋𝑋 / 𝑥⦌𝐵) = ((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴))
368	208, 209, 96	sub32d 10424	. . . . . 6 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) − ⦋𝑌 / 𝑥⦌𝐵) = ((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴))
369	364, 367, 368	3brtr4d 4685	. . . . 5 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) − ⦋𝑋 / 𝑥⦌𝐵) ≤ ((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) − ⦋𝑌 / 𝑥⦌𝐵))
370	255, 256, 91, 369	leadd1dd 10641	. . . 4 ⊢ (𝜑 → (((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) − ⦋𝑋 / 𝑥⦌𝐵) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶) ≤ (((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) − ⦋𝑌 / 𝑥⦌𝐵) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶))
371	80	recnd 10068	. . . . 5 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) ∈ ℂ)
372	91	recnd 10068	. . . . 5 ⊢ (𝜑 → Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶 ∈ ℂ)
373	371, 372, 280	addsubd 10413	. . . 4 ⊢ (𝜑 → (((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶) − ⦋𝑋 / 𝑥⦌𝐵) = (((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) − ⦋𝑋 / 𝑥⦌𝐵) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶))
374	67	recnd 10068	. . . . 5 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) ∈ ℂ)
375	374, 372, 96	addsubd 10413	. . . 4 ⊢ (𝜑 → (((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶) − ⦋𝑌 / 𝑥⦌𝐵) = (((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) − ⦋𝑌 / 𝑥⦌𝐵) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶))
376	370, 373, 375	3brtr4d 4685	. . 3 ⊢ (𝜑 → (((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶) − ⦋𝑋 / 𝑥⦌𝐵) ≤ (((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶) − ⦋𝑌 / 𝑥⦌𝐵))
377	253	oveq1d 6665	. . 3 ⊢ (𝜑 → ((𝐻‘𝑋) − ⦋𝑋 / 𝑥⦌𝐵) = (((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶) − ⦋𝑋 / 𝑥⦌𝐵))
378	248	oveq1d 6665	. . 3 ⊢ (𝜑 → ((𝐻‘𝑌) − ⦋𝑌 / 𝑥⦌𝐵) = (((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶) − ⦋𝑌 / 𝑥⦌𝐵))
379	376, 377, 378	3brtr4d 4685	. 2 ⊢ (𝜑 → ((𝐻‘𝑋) − ⦋𝑋 / 𝑥⦌𝐵) ≤ ((𝐻‘𝑌) − ⦋𝑌 / 𝑥⦌𝐵))
380	254, 379	jca 554	1 ⊢ (𝜑 → ((𝐻‘𝑌) ≤ (𝐻‘𝑋) ∧ ((𝐻‘𝑋) − ⦋𝑋 / 𝑥⦌𝐵) ≤ ((𝐻‘𝑌) − ⦋𝑌 / 𝑥⦌𝐵)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 196 ∧ wa 384 ∧ w3a 1037 = wceq 1483 ∈ wcel 1990 ∀wral 2912 ⦋csb 3533 ⊆ wss 3574 {cpr 4179 class class class wbr 4653 ↦ cmpt 4729 dom cdm 5114 ran crn 5115 ↾ cres 5116 ⟶wf 5884 ‘cfv 5888 (class class class)co 6650 ℂcc 9934 ℝcr 9935 0cc0 9936 1c1 9937 + caddc 9939 · cmul 9941 +∞cpnf 10071 ℝ^*cxr 10073 < clt 10074 ≤ cle 10075 − cmin 10266 -cneg 10267 ℤcz 11377 ℤ_≥cuz 11687 (,)cioo 12175 [,]cicc 12178 ...cfz 12326 ⌊cfl 12591 Σcsu 14416 TopOpenctopn 16082 topGenctg 16098 ℂ_fldccnfld 19746 –cn→ccncf 22679 D cdv 23627

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1722 ax-4 1737 ax-5 1839 ax-6 1888 ax-7 1935 ax-8 1992 ax-9 1999 ax-10 2019 ax-11 2034 ax-12 2047 ax-13 2246 ax-ext 2602 ax-rep 4771 ax-sep 4781 ax-nul 4789 ax-pow 4843 ax-pr 4906 ax-un 6949 ax-inf2 8538 ax-cnex 9992 ax-resscn 9993 ax-1cn 9994 ax-icn 9995 ax-addcl 9996 ax-addrcl 9997 ax-mulcl 9998 ax-mulrcl 9999 ax-mulcom 10000 ax-addass 10001 ax-mulass 10002 ax-distr 10003 ax-i2m1 10004 ax-1ne0 10005 ax-1rid 10006 ax-rnegex 10007 ax-rrecex 10008 ax-cnre 10009 ax-pre-lttri 10010 ax-pre-lttrn 10011 ax-pre-ltadd 10012 ax-pre-mulgt0 10013 ax-pre-sup 10014 ax-addf 10015 ax-mulf 10016

This theorem depends on definitions: df-bi 197 df-or 385 df-an 386 df-3or 1038 df-3an 1039 df-tru 1486 df-fal 1489 df-ex 1705 df-nf 1710 df-sb 1881 df-eu 2474 df-mo 2475 df-clab 2609 df-cleq 2615 df-clel 2618 df-nfc 2753 df-ne 2795 df-nel 2898 df-ral 2917 df-rex 2918 df-reu 2919 df-rmo 2920 df-rab 2921 df-v 3202 df-sbc 3436 df-csb 3534 df-dif 3577 df-un 3579 df-in 3581 df-ss 3588 df-pss 3590 df-nul 3916 df-if 4087 df-pw 4160 df-sn 4178 df-pr 4180 df-tp 4182 df-op 4184 df-uni 4437 df-int 4476 df-iun 4522 df-iin 4523 df-br 4654 df-opab 4713 df-mpt 4730 df-tr 4753 df-id 5024 df-eprel 5029 df-po 5035 df-so 5036 df-fr 5073 df-se 5074 df-we 5075 df-xp 5120 df-rel 5121 df-cnv 5122 df-co 5123 df-dm 5124 df-rn 5125 df-res 5126 df-ima 5127 df-pred 5680 df-ord 5726 df-on 5727 df-lim 5728 df-suc 5729 df-iota 5851 df-fun 5890 df-fn 5891 df-f 5892 df-f1 5893 df-fo 5894 df-f1o 5895 df-fv 5896 df-isom 5897 df-riota 6611 df-ov 6653 df-oprab 6654 df-mpt2 6655 df-of 6897 df-om 7066 df-1st 7168 df-2nd 7169 df-supp 7296 df-wrecs 7407 df-recs 7468 df-rdg 7506 df-1o 7560 df-2o 7561 df-oadd 7564 df-er 7742 df-map 7859 df-pm 7860 df-ixp 7909 df-en 7956 df-dom 7957 df-sdom 7958 df-fin 7959 df-fsupp 8276 df-fi 8317 df-sup 8348 df-inf 8349 df-oi 8415 df-card 8765 df-cda 8990 df-pnf 10076 df-mnf 10077 df-xr 10078 df-ltxr 10079 df-le 10080 df-sub 10268 df-neg 10269 df-div 10685 df-nn 11021 df-2 11079 df-3 11080 df-4 11081 df-5 11082 df-6 11083 df-7 11084 df-8 11085 df-9 11086 df-n0 11293 df-z 11378 df-dec 11494 df-uz 11688 df-q 11789 df-rp 11833 df-xneg 11946 df-xadd 11947 df-xmul 11948 df-ioo 12179 df-ico 12181 df-icc 12182 df-fz 12327 df-fzo 12466 df-fl 12593 df-seq 12802 df-exp 12861 df-hash 13118 df-cj 13839 df-re 13840 df-im 13841 df-sqrt 13975 df-abs 13976 df-clim 14219 df-sum 14417 df-struct 15859 df-ndx 15860 df-slot 15861 df-base 15863 df-sets 15864 df-ress 15865 df-plusg 15954 df-mulr 15955 df-starv 15956 df-sca 15957 df-vsca 15958 df-ip 15959 df-tset 15960 df-ple 15961 df-ds 15964 df-unif 15965 df-hom 15966 df-cco 15967 df-rest 16083 df-topn 16084 df-0g 16102 df-gsum 16103 df-topgen 16104 df-pt 16105 df-prds 16108 df-xrs 16162 df-qtop 16167 df-imas 16168 df-xps 16170 df-mre 16246 df-mrc 16247 df-acs 16249 df-mgm 17242 df-sgrp 17284 df-mnd 17295 df-submnd 17336 df-mulg 17541 df-cntz 17750 df-cmn 18195 df-psmet 19738 df-xmet 19739 df-met 19740 df-bl 19741 df-mopn 19742 df-fbas 19743 df-fg 19744 df-cnfld 19747 df-top 20699 df-topon 20716 df-topsp 20737 df-bases 20750 df-cld 20823 df-ntr 20824 df-cls 20825 df-nei 20902 df-lp 20940 df-perf 20941 df-cn 21031 df-cnp 21032 df-haus 21119 df-cmp 21190 df-tx 21365 df-hmeo 21558 df-fil 21650 df-fm 21742 df-flim 21743 df-flf 21744 df-xms 22125 df-ms 22126 df-tms 22127 df-cncf 22681 df-limc 23630 df-dv 23631

This theorem is referenced by: dvfsumlem3 23791

W3C validator