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 26391

Description: Lemma for dvfsumrlim 26395. (Contributed by Mario Carneiro, 17-May-2016.) Avoid ax-mulf 11317. (Revised by GG, 16-Mar-2025.)

**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 variables 𝑦 𝑧 𝑚 𝑢 𝑣 𝑤 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		dvfsum.s	. . . . . . . . 9 ⊢ 𝑆 = (𝑇(,)+∞)
2		ioossre 13576	. . . . . . . . 9 ⊢ (𝑇(,)+∞) ⊆ ℝ
3	1, 2	eqsstri 3959	. . . . . . . 8 ⊢ 𝑆 ⊆ ℝ
4		dvfsumlem1.2	. . . . . . . 8 ⊢ (𝜑 → 𝑌 ∈ 𝑆)
5	3, 4	sselid 3911	. . . . . . 7 ⊢ (𝜑 → 𝑌 ∈ ℝ)
6		dvfsumlem1.1	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑋 ∈ 𝑆)
7	6, 1	eleqtrdi 2874	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ (𝑇(,)+∞))
8		dvfsum.t	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝑇 ∈ ℝ)
9	8	rexrd 11396	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑇 ∈ ℝ^*)
10		elioopnf 13612	. . . . . . . . . . 11 ⊢ (𝑇 ∈ ℝ^* → (𝑋 ∈ (𝑇(,)+∞) ↔ (𝑋 ∈ ℝ ∧ 𝑇 < 𝑋)))
11	9, 10	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → (𝑋 ∈ (𝑇(,)+∞) ↔ (𝑋 ∈ ℝ ∧ 𝑇 < 𝑋)))
12	7, 11	mpbid 235	. . . . . . . . 9 ⊢ (𝜑 → (𝑋 ∈ ℝ ∧ 𝑇 < 𝑋))
13	12	simpld 500	. . . . . . . 8 ⊢ (𝜑 → 𝑋 ∈ ℝ)
14		reflcl 13974	. . . . . . . 8 ⊢ (𝑋 ∈ ℝ → (⌊‘𝑋) ∈ ℝ)
15	13, 14	syl 18	. . . . . . 7 ⊢ (𝜑 → (⌊‘𝑋) ∈ ℝ)
16	5, 15	resubcld 11781	. . . . . 6 ⊢ (𝜑 → (𝑌 − (⌊‘𝑋)) ∈ ℝ)
17		csbeq1 3854	. . . . . . . 8 ⊢ (𝑦 = 𝑌 → ⦋𝑦 / 𝑥⦌𝐵 = ⦋𝑌 / 𝑥⦌𝐵)
18	17	eleq1d 2849	. . . . . . 7 ⊢ (𝑦 = 𝑌 → (⦋𝑦 / 𝑥⦌𝐵 ∈ ℝ ↔ ⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ))
19	3	a1i 11	. . . . . . . . . 10 ⊢ (𝜑 → 𝑆 ⊆ ℝ)
20		dvfsum.a	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → 𝐴 ∈ ℝ)
21		dvfsum.b1	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → 𝐵 ∈ 𝑉)
22		dvfsum.b3	. . . . . . . . . 10 ⊢ (𝜑 → (ℝ D (𝑥 ∈ 𝑆 ↦ 𝐴)) = (𝑥 ∈ 𝑆 ↦ 𝐵))
23	19, 20, 21, 22	dvmptrecl 26388	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → 𝐵 ∈ ℝ)
24	23	fmpttd 7145	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ 𝑆 ↦ 𝐵):𝑆⟶ℝ)
25		nfcv 2926	. . . . . . . . . 10 ⊢ Ⅎ𝑦𝐵
26		nfcsb1v 3875	. . . . . . . . . 10 ⊢ Ⅎ𝑥⦋𝑦 / 𝑥⦌𝐵
27		csbeq1a 3865	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → 𝐵 = ⦋𝑦 / 𝑥⦌𝐵)
28	25, 26, 27	cbvmpt 5211	. . . . . . . . 9 ⊢ (𝑥 ∈ 𝑆 ↦ 𝐵) = (𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐵)
29	28	fmpt 7140	. . . . . . . 8 ⊢ (∀𝑦 ∈ 𝑆 ⦋𝑦 / 𝑥⦌𝐵 ∈ ℝ ↔ (𝑥 ∈ 𝑆 ↦ 𝐵):𝑆⟶ℝ)
30	24, 29	sylibr 237	. . . . . . 7 ⊢ (𝜑 → ∀𝑦 ∈ 𝑆 ⦋𝑦 / 𝑥⦌𝐵 ∈ ℝ)
31	18, 30, 4	rspcdva 3581	. . . . . 6 ⊢ (𝜑 → ⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ)
32	16, 31	remulcld 11376	. . . . 5 ⊢ (𝜑 → ((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) ∈ ℝ)
33		csbeq1 3854	. . . . . . 7 ⊢ (𝑦 = 𝑌 → ⦋𝑦 / 𝑥⦌𝐴 = ⦋𝑌 / 𝑥⦌𝐴)
34	33	eleq1d 2849	. . . . . 6 ⊢ (𝑦 = 𝑌 → (⦋𝑦 / 𝑥⦌𝐴 ∈ ℝ ↔ ⦋𝑌 / 𝑥⦌𝐴 ∈ ℝ))
35	20	fmpttd 7145	. . . . . . 7 ⊢ (𝜑 → (𝑥 ∈ 𝑆 ↦ 𝐴):𝑆⟶ℝ)
36		nfcv 2926	. . . . . . . . 9 ⊢ Ⅎ𝑦𝐴
37		nfcsb1v 3875	. . . . . . . . 9 ⊢ Ⅎ𝑥⦋𝑦 / 𝑥⦌𝐴
38		csbeq1a 3865	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → 𝐴 = ⦋𝑦 / 𝑥⦌𝐴)
39	36, 37, 38	cbvmpt 5211	. . . . . . . 8 ⊢ (𝑥 ∈ 𝑆 ↦ 𝐴) = (𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐴)
40	39	fmpt 7140	. . . . . . 7 ⊢ (∀𝑦 ∈ 𝑆 ⦋𝑦 / 𝑥⦌𝐴 ∈ ℝ ↔ (𝑥 ∈ 𝑆 ↦ 𝐴):𝑆⟶ℝ)
41	35, 40	sylibr 237	. . . . . 6 ⊢ (𝜑 → ∀𝑦 ∈ 𝑆 ⦋𝑦 / 𝑥⦌𝐴 ∈ ℝ)
42	34, 41, 4	rspcdva 3581	. . . . 5 ⊢ (𝜑 → ⦋𝑌 / 𝑥⦌𝐴 ∈ ℝ)
43	32, 42	resubcld 11781	. . . 4 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) ∈ ℝ)
44	13, 15	resubcld 11781	. . . . . 6 ⊢ (𝜑 → (𝑋 − (⌊‘𝑋)) ∈ ℝ)
45		csbeq1 3854	. . . . . . . 8 ⊢ (𝑦 = 𝑋 → ⦋𝑦 / 𝑥⦌𝐵 = ⦋𝑋 / 𝑥⦌𝐵)
46	45	eleq1d 2849	. . . . . . 7 ⊢ (𝑦 = 𝑋 → (⦋𝑦 / 𝑥⦌𝐵 ∈ ℝ ↔ ⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ))
47	46, 30, 6	rspcdva 3581	. . . . . 6 ⊢ (𝜑 → ⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ)
48	44, 47	remulcld 11376	. . . . 5 ⊢ (𝜑 → ((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) ∈ ℝ)
49		csbeq1 3854	. . . . . . 7 ⊢ (𝑦 = 𝑋 → ⦋𝑦 / 𝑥⦌𝐴 = ⦋𝑋 / 𝑥⦌𝐴)
50	49	eleq1d 2849	. . . . . 6 ⊢ (𝑦 = 𝑋 → (⦋𝑦 / 𝑥⦌𝐴 ∈ ℝ ↔ ⦋𝑋 / 𝑥⦌𝐴 ∈ ℝ))
51	50, 41, 6	rspcdva 3581	. . . . 5 ⊢ (𝜑 → ⦋𝑋 / 𝑥⦌𝐴 ∈ ℝ)
52	48, 51	resubcld 11781	. . . 4 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) ∈ ℝ)
53		fzfid 14154	. . . . 5 ⊢ (𝜑 → (𝑀...(⌊‘𝑋)) ∈ Fin)
54		dvfsum.b2	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑍) → 𝐵 ∈ ℝ)
55	54	ralrimiva 3158	. . . . . 6 ⊢ (𝜑 → ∀𝑥 ∈ 𝑍 𝐵 ∈ ℝ)
56		elfzuz 13690	. . . . . . 7 ⊢ (𝑘 ∈ (𝑀...(⌊‘𝑋)) → 𝑘 ∈ (ℤ_≥‘𝑀))
57		dvfsum.z	. . . . . . 7 ⊢ 𝑍 = (ℤ_≥‘𝑀)
58	56, 57	eleqtrrdi 2875	. . . . . 6 ⊢ (𝑘 ∈ (𝑀...(⌊‘𝑋)) → 𝑘 ∈ 𝑍)
59		dvfsum.c	. . . . . . . 8 ⊢ (𝑥 = 𝑘 → 𝐵 = 𝐶)
60	59	eleq1d 2849	. . . . . . 7 ⊢ (𝑥 = 𝑘 → (𝐵 ∈ ℝ ↔ 𝐶 ∈ ℝ))
61	60	rspccva 3579	. . . . . 6 ⊢ ((∀𝑥 ∈ 𝑍 𝐵 ∈ ℝ ∧ 𝑘 ∈ 𝑍) → 𝐶 ∈ ℝ)
62	55, 58, 61	syl2an 608	. . . . 5 ⊢ ((𝜑 ∧ 𝑘 ∈ (𝑀...(⌊‘𝑋))) → 𝐶 ∈ ℝ)
63	53, 62	fsumrecl 15941	. . . 4 ⊢ (𝜑 → Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶 ∈ ℝ)
64	44, 31	remulcld 11376	. . . . . 6 ⊢ (𝜑 → ((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) ∈ ℝ)
65	64, 51	resubcld 11781	. . . . 5 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) ∈ ℝ)
66	5, 13	resubcld 11781	. . . . . . . . 9 ⊢ (𝜑 → (𝑌 − 𝑋) ∈ ℝ)
67	31, 66	remulcld 11376	. . . . . . . 8 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) ∈ ℝ)
68	31	recnd 11374	. . . . . . . . . 10 ⊢ (𝜑 → ⦋𝑌 / 𝑥⦌𝐵 ∈ ℂ)
69	5	recnd 11374	. . . . . . . . . 10 ⊢ (𝜑 → 𝑌 ∈ ℂ)
70	13	recnd 11374	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ ℂ)
71	68, 69, 70	subdid 11809	. . . . . . . . 9 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) = ((⦋𝑌 / 𝑥⦌𝐵 · 𝑌) − (⦋𝑌 / 𝑥⦌𝐵 · 𝑋)))
72		eqid 2763	. . . . . . . . . . . . 13 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
73	72	mpomulcn 25232	. . . . . . . . . . . . 13 ⊢ (𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣)) ∈ (((TopOpen‘ℂ_fld) ×_t (TopOpen‘ℂ_fld)) Cn (TopOpen‘ℂ_fld))
74		csbeq1 3854	. . . . . . . . . . . . . . . 16 ⊢ (𝑧 = 𝑌 → ⦋𝑧 / 𝑥⦌𝐵 = ⦋𝑌 / 𝑥⦌𝐵)
75	74	eleq1d 2849	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = 𝑌 → (⦋𝑧 / 𝑥⦌𝐵 ∈ ℝ ↔ ⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ))
76		nfcv 2926	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑧𝐵
77		nfcsb1v 3875	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑥⦋𝑧 / 𝑥⦌𝐵
78		csbeq1a 3865	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑧 → 𝐵 = ⦋𝑧 / 𝑥⦌𝐵)
79	76, 77, 78	cbvmpt 5211	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ 𝑆 ↦ 𝐵) = (𝑧 ∈ 𝑆 ↦ ⦋𝑧 / 𝑥⦌𝐵)
80	79	fmpt 7140	. . . . . . . . . . . . . . . 16 ⊢ (∀𝑧 ∈ 𝑆 ⦋𝑧 / 𝑥⦌𝐵 ∈ ℝ ↔ (𝑥 ∈ 𝑆 ↦ 𝐵):𝑆⟶ℝ)
81	24, 80	sylibr 237	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ∀𝑧 ∈ 𝑆 ⦋𝑧 / 𝑥⦌𝐵 ∈ ℝ)
82	75, 81, 4	rspcdva 3581	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ)
83		pnfxr 11400	. . . . . . . . . . . . . . . . . 18 ⊢ +∞ ∈ ℝ^*
84	83	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → +∞ ∈ ℝ^*)
85	12	simprd 501	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝑇 < 𝑋)
86	5	ltpnfd 13288	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → 𝑌 < +∞)
87		iccssioo 13584	. . . . . . . . . . . . . . . . 17 ⊢ (((𝑇 ∈ ℝ^* ∧ +∞ ∈ ℝ^*) ∧ (𝑇 < 𝑋 ∧ 𝑌 < +∞)) → (𝑋[,]𝑌) ⊆ (𝑇(,)+∞))
88	9, 84, 85, 86, 87	syl22anc 852	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑋[,]𝑌) ⊆ (𝑇(,)+∞))
89	88, 2	sstrdi 3925	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑋[,]𝑌) ⊆ ℝ)
90		ax-resscn 11294	. . . . . . . . . . . . . . 15 ⊢ ℝ ⊆ ℂ
91	89, 90	sstrdi 3925	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑋[,]𝑌) ⊆ ℂ)
92	90	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ℝ ⊆ ℂ)
93		cncfmptc 25277	. . . . . . . . . . . . . 14 ⊢ ((⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ ∧ (𝑋[,]𝑌) ⊆ ℂ ∧ ℝ ⊆ ℂ) → (𝑦 ∈ (𝑋[,]𝑌) ↦ ⦋𝑌 / 𝑥⦌𝐵) ∈ ((𝑋[,]𝑌)–cn→ℝ))
94	82, 91, 92, 93	syl3anc 1399	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) ↦ ⦋𝑌 / 𝑥⦌𝐵) ∈ ((𝑋[,]𝑌)–cn→ℝ))
95		cncfmptid 25278	. . . . . . . . . . . . . 14 ⊢ (((𝑋[,]𝑌) ⊆ ℝ ∧ ℝ ⊆ ℂ) → (𝑦 ∈ (𝑋[,]𝑌) ↦ 𝑦) ∈ ((𝑋[,]𝑌)–cn→ℝ))
96	89, 90, 95	sylancl 598	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) ↦ 𝑦) ∈ ((𝑋[,]𝑌)–cn→ℝ))
97		remulcl 11322	. . . . . . . . . . . . . 14 ⊢ ((⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (⦋𝑌 / 𝑥⦌𝐵 · 𝑦) ∈ ℝ)
98		simpl 488	. . . . . . . . . . . . . . . . . . 19 ⊢ ((⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ)
99	98	recnd 11374	. . . . . . . . . . . . . . . . . 18 ⊢ ((⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ⦋𝑌 / 𝑥⦌𝐵 ∈ ℂ)
100		simpr 490	. . . . . . . . . . . . . . . . . . 19 ⊢ ((⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℝ)
101	100	recnd 11374	. . . . . . . . . . . . . . . . . 18 ⊢ ((⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℂ)
102	99, 101	jca 521	. . . . . . . . . . . . . . . . 17 ⊢ ((⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (⦋𝑌 / 𝑥⦌𝐵 ∈ ℂ ∧ 𝑦 ∈ ℂ))
103		ovmpot 7611	. . . . . . . . . . . . . . . . . 18 ⊢ ((⦋𝑌 / 𝑥⦌𝐵 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦))
104	103	eqcomd 2769	. . . . . . . . . . . . . . . . 17 ⊢ ((⦋𝑌 / 𝑥⦌𝐵 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (⦋𝑌 / 𝑥⦌𝐵 · 𝑦) = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))
105	102, 104	syl 18	. . . . . . . . . . . . . . . 16 ⊢ ((⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (⦋𝑌 / 𝑥⦌𝐵 · 𝑦) = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))
106	105	eleq1d 2849	. . . . . . . . . . . . . . 15 ⊢ ((⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ((⦋𝑌 / 𝑥⦌𝐵 · 𝑦) ∈ ℝ ↔ (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) ∈ ℝ))
107	106	biimpd 232	. . . . . . . . . . . . . 14 ⊢ ((⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ((⦋𝑌 / 𝑥⦌𝐵 · 𝑦) ∈ ℝ → (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) ∈ ℝ))
108	97, 107	mpd 16	. . . . . . . . . . . . 13 ⊢ ((⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) ∈ ℝ)
109	72, 73, 94, 96, 90, 108	cncfmpt2ss 25281	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)) ∈ ((𝑋[,]𝑌)–cn→ℝ))
110		df-mpt 5191	. . . . . . . . . . . . . 14 ⊢ (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)) = {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))}
111	110	eleq1i 2855	. . . . . . . . . . . . 13 ⊢ ((𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)) ∈ ((𝑋[,]𝑌)–cn→ℝ) ↔ {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} ∈ ((𝑋[,]𝑌)–cn→ℝ))
112	111	biimpi 219	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)) ∈ ((𝑋[,]𝑌)–cn→ℝ) → {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} ∈ ((𝑋[,]𝑌)–cn→ℝ))
113	109, 112	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} ∈ ((𝑋[,]𝑌)–cn→ℝ))
114		idd 25	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) → 𝑦 ∈ (𝑋[,]𝑌)))
115	114	a1dd 51	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) → (𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) → 𝑦 ∈ (𝑋[,]𝑌))))
116	115	impd 416	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)) → 𝑦 ∈ (𝑋[,]𝑌)))
117		csbeq1 3854	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑚 = 𝑌 → ⦋𝑚 / 𝑥⦌𝐵 = ⦋𝑌 / 𝑥⦌𝐵)
118	117	eleq1d 2849	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑚 = 𝑌 → (⦋𝑚 / 𝑥⦌𝐵 ∈ ℝ ↔ ⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ))
119		nfcv 2926	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ Ⅎ𝑚𝐵
120		nfcsb1v 3875	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ Ⅎ𝑥⦋𝑚 / 𝑥⦌𝐵
121		csbeq1a 3865	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (𝑥 = 𝑚 → 𝐵 = ⦋𝑚 / 𝑥⦌𝐵)
122	119, 120, 121	cbvmpt 5211	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝑥 ∈ 𝑆 ↦ 𝐵) = (𝑚 ∈ 𝑆 ↦ ⦋𝑚 / 𝑥⦌𝐵)
123	122	fmpt 7140	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (∀𝑚 ∈ 𝑆 ⦋𝑚 / 𝑥⦌𝐵 ∈ ℝ ↔ (𝑥 ∈ 𝑆 ↦ 𝐵):𝑆⟶ℝ)
124	24, 123	sylibr 237	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝜑 → ∀𝑚 ∈ 𝑆 ⦋𝑚 / 𝑥⦌𝐵 ∈ ℝ)
125	118, 124, 4	rspcdva 3581	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝜑 → ⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ)
126	125	recnd 11374	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝜑 → ⦋𝑌 / 𝑥⦌𝐵 ∈ ℂ)
127	126	adantr 486	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → ⦋𝑌 / 𝑥⦌𝐵 ∈ ℂ)
128		elicc2 13580	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ ((𝑋 ∈ ℝ ∧ 𝑌 ∈ ℝ) → (𝑦 ∈ (𝑋[,]𝑌) ↔ (𝑦 ∈ ℝ ∧ 𝑋 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌)))
129	13, 5, 128	syl2anc 596	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) ↔ (𝑦 ∈ ℝ ∧ 𝑋 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌)))
130	129	biimpa 482	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → (𝑦 ∈ ℝ ∧ 𝑋 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌))
131	130	simp1d 1160	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑦 ∈ ℝ)
132	131	recnd 11374	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑦 ∈ ℂ)
133	127, 132	jca 521	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → (⦋𝑌 / 𝑥⦌𝐵 ∈ ℂ ∧ 𝑦 ∈ ℂ))
134	133, 103	syl 18	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦))
135	134	eqeq2d 2774	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → (𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) ↔ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦)))
136	135	biimpd 232	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → (𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) → 𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦)))
137	136	ex 418	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) → (𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) → 𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦))))
138	137	impd 416	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)) → 𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦)))
139	116, 138	jcad 522	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)) → (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦))))
140	114	a1dd 51	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) → (𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦) → 𝑦 ∈ (𝑋[,]𝑌))))
141	140	impd 416	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦)) → 𝑦 ∈ (𝑋[,]𝑌)))
142		csbeq1 3854	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (𝑘 = 𝑌 → ⦋𝑘 / 𝑥⦌𝐵 = ⦋𝑌 / 𝑥⦌𝐵)
143	142	eleq1d 2849	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝑘 = 𝑌 → (⦋𝑘 / 𝑥⦌𝐵 ∈ ℝ ↔ ⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ))
144		nfcv 2926	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ Ⅎ𝑘𝐵
145		nfcsb1v 3875	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ Ⅎ𝑥⦋𝑘 / 𝑥⦌𝐵
146		csbeq1a 3865	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (𝑥 = 𝑘 → 𝐵 = ⦋𝑘 / 𝑥⦌𝐵)
147	144, 145, 146	cbvmpt 5211	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (𝑥 ∈ 𝑆 ↦ 𝐵) = (𝑘 ∈ 𝑆 ↦ ⦋𝑘 / 𝑥⦌𝐵)
148	147	fmpt 7140	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (∀𝑘 ∈ 𝑆 ⦋𝑘 / 𝑥⦌𝐵 ∈ ℝ ↔ (𝑥 ∈ 𝑆 ↦ 𝐵):𝑆⟶ℝ)
149	24, 148	sylibr 237	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (𝜑 → ∀𝑘 ∈ 𝑆 ⦋𝑘 / 𝑥⦌𝐵 ∈ ℝ)
150	143, 149, 4	rspcdva 3581	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ (𝜑 → ⦋𝑌 / 𝑥⦌𝐵 ∈ ℝ)
151	150	recnd 11374	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝜑 → ⦋𝑌 / 𝑥⦌𝐵 ∈ ℂ)
152	151	adantr 486	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → ⦋𝑌 / 𝑥⦌𝐵 ∈ ℂ)
153	152, 132	jca 521	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → (⦋𝑌 / 𝑥⦌𝐵 ∈ ℂ ∧ 𝑦 ∈ ℂ))
154	153, 104	syl 18	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → (⦋𝑌 / 𝑥⦌𝐵 · 𝑦) = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))
155	154	eqeq2d 2774	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → (𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦) ↔ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)))
156	155	biimpd 232	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → (𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦) → 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)))
157	156	ex 418	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) → (𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦) → 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))))
158	157	impd 416	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → ((𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦)) → 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)))
159	141, 158	jcad 522	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ((𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦)) → (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))))
160	139, 159	impbid 215	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)) ↔ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦))))
161	160	opabbidv 5175	. . . . . . . . . . . . . 14 ⊢ (𝜑 → {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} = {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦))})
162		df-mpt 5191	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵 · 𝑦)) = {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦))}
163	162	eqcomi 2772	. . . . . . . . . . . . . . . 16 ⊢ {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦))} = (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵 · 𝑦))
164	163	eqeq2i 2776	. . . . . . . . . . . . . . 15 ⊢ ({⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} = {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦))} ↔ {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} = (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵 · 𝑦)))
165	164	biimpi 219	. . . . . . . . . . . . . 14 ⊢ ({⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} = {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵 · 𝑦))} → {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} = (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵 · 𝑦)))
166	161, 165	syl 18	. . . . . . . . . . . . 13 ⊢ (𝜑 → {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} = (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵 · 𝑦)))
167	166	eleq1d 2849	. . . . . . . . . . . 12 ⊢ (𝜑 → ({⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} ∈ ((𝑋[,]𝑌)–cn→ℝ) ↔ (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵 · 𝑦)) ∈ ((𝑋[,]𝑌)–cn→ℝ)))
168	167	biimpd 232	. . . . . . . . . . 11 ⊢ (𝜑 → ({⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑌 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} ∈ ((𝑋[,]𝑌)–cn→ℝ) → (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵 · 𝑦)) ∈ ((𝑋[,]𝑌)–cn→ℝ)))
169	113, 168	mpd 16	. . . . . . . . . 10 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵 · 𝑦)) ∈ ((𝑋[,]𝑌)–cn→ℝ))
170		reelprrecn 11329	. . . . . . . . . . . . 13 ⊢ ℝ ∈ {ℝ, ℂ}
171	170	a1i 11	. . . . . . . . . . . 12 ⊢ (𝜑 → ℝ ∈ {ℝ, ℂ})
172		ioossicc 13602	. . . . . . . . . . . . . . 15 ⊢ (𝑋(,)𝑌) ⊆ (𝑋[,]𝑌)
173	172, 89	sstrid 3924	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑋(,)𝑌) ⊆ ℝ)
174	173	sselda 3913	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋(,)𝑌)) → 𝑦 ∈ ℝ)
175	174	recnd 11374	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋(,)𝑌)) → 𝑦 ∈ ℂ)
176		1cnd 11339	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋(,)𝑌)) → 1 ∈ ℂ)
177		simpr 490	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℝ)
178	177	recnd 11374	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℂ)
179		1cnd 11339	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 1 ∈ ℂ)
180	171	dvmptid 26321	. . . . . . . . . . . . 13 ⊢ (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ 𝑦)) = (𝑦 ∈ ℝ ↦ 1))
181		tgioo4 25168	. . . . . . . . . . . . 13 ⊢ (topGen‘ran (,)) = ((TopOpen‘ℂ_fld) ↾_t ℝ)
182		iooretop 25128	. . . . . . . . . . . . . 14 ⊢ (𝑋(,)𝑌) ∈ (topGen‘ran (,))
183	182	a1i 11	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑋(,)𝑌) ∈ (topGen‘ran (,)))
184	171, 178, 179, 180, 173, 181, 72, 183	dvmptres 26327	. . . . . . . . . . . 12 ⊢ (𝜑 → (ℝ D (𝑦 ∈ (𝑋(,)𝑌) ↦ 𝑦)) = (𝑦 ∈ (𝑋(,)𝑌) ↦ 1))
185	171, 175, 176, 184, 68	dvmptcmul 26328	. . . . . . . . . . 11 ⊢ (𝜑 → (ℝ D (𝑦 ∈ (𝑋(,)𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵 · 𝑦))) = (𝑦 ∈ (𝑋(,)𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵 · 1)))
186	68	mulridd 11363	. . . . . . . . . . . 12 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐵 · 1) = ⦋𝑌 / 𝑥⦌𝐵)
187	186	mpteq2dv 5203	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑦 ∈ (𝑋(,)𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵 · 1)) = (𝑦 ∈ (𝑋(,)𝑌) ↦ ⦋𝑌 / 𝑥⦌𝐵))
188	185, 187	eqtrd 2798	. . . . . . . . . 10 ⊢ (𝜑 → (ℝ D (𝑦 ∈ (𝑋(,)𝑌) ↦ (⦋𝑌 / 𝑥⦌𝐵 · 𝑦))) = (𝑦 ∈ (𝑋(,)𝑌) ↦ ⦋𝑌 / 𝑥⦌𝐵))
189	88, 1	sseqtrrdi 3954	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑋[,]𝑌) ⊆ 𝑆)
190	189	resmptd 6048	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐴) ↾ (𝑋[,]𝑌)) = (𝑦 ∈ (𝑋[,]𝑌) ↦ ⦋𝑦 / 𝑥⦌𝐴))
191	20	recnd 11374	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝑆) → 𝐴 ∈ ℂ)
192	191	fmpttd 7145	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑥 ∈ 𝑆 ↦ 𝐴):𝑆⟶ℂ)
193	22	dmeqd 5897	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → dom (ℝ D (𝑥 ∈ 𝑆 ↦ 𝐴)) = dom (𝑥 ∈ 𝑆 ↦ 𝐵))
194	21	ralrimiva 3158	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ∀𝑥 ∈ 𝑆 𝐵 ∈ 𝑉)
195		dmmptg 6260	. . . . . . . . . . . . . . . . . 18 ⊢ (∀𝑥 ∈ 𝑆 𝐵 ∈ 𝑉 → dom (𝑥 ∈ 𝑆 ↦ 𝐵) = 𝑆)
196	194, 195	syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → dom (𝑥 ∈ 𝑆 ↦ 𝐵) = 𝑆)
197	193, 196	eqtrd 2798	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → dom (ℝ D (𝑥 ∈ 𝑆 ↦ 𝐴)) = 𝑆)
198		dvcn 26285	. . . . . . . . . . . . . . . 16 ⊢ (((ℝ ⊆ ℂ ∧ (𝑥 ∈ 𝑆 ↦ 𝐴):𝑆⟶ℂ ∧ 𝑆 ⊆ ℝ) ∧ dom (ℝ D (𝑥 ∈ 𝑆 ↦ 𝐴)) = 𝑆) → (𝑥 ∈ 𝑆 ↦ 𝐴) ∈ (𝑆–cn→ℂ))
199	92, 192, 19, 197, 198	syl31anc 1401	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑥 ∈ 𝑆 ↦ 𝐴) ∈ (𝑆–cn→ℂ))
200		cncfcdm 25263	. . . . . . . . . . . . . . 15 ⊢ ((ℝ ⊆ ℂ ∧ (𝑥 ∈ 𝑆 ↦ 𝐴) ∈ (𝑆–cn→ℂ)) → ((𝑥 ∈ 𝑆 ↦ 𝐴) ∈ (𝑆–cn→ℝ) ↔ (𝑥 ∈ 𝑆 ↦ 𝐴):𝑆⟶ℝ))
201	90, 199, 200	sylancr 599	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑥 ∈ 𝑆 ↦ 𝐴) ∈ (𝑆–cn→ℝ) ↔ (𝑥 ∈ 𝑆 ↦ 𝐴):𝑆⟶ℝ))
202	35, 201	mpbird 260	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑥 ∈ 𝑆 ↦ 𝐴) ∈ (𝑆–cn→ℝ))
203	39, 202	eqeltrrid 2869	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐴) ∈ (𝑆–cn→ℝ))
204		rescncf 25262	. . . . . . . . . . . 12 ⊢ ((𝑋[,]𝑌) ⊆ 𝑆 → ((𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐴) ∈ (𝑆–cn→ℝ) → ((𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐴) ↾ (𝑋[,]𝑌)) ∈ ((𝑋[,]𝑌)–cn→ℝ)))
205	189, 203, 204	sylc 66	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐴) ↾ (𝑋[,]𝑌)) ∈ ((𝑋[,]𝑌)–cn→ℝ))
206	190, 205	eqeltrrd 2865	. . . . . . . . . 10 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) ↦ ⦋𝑦 / 𝑥⦌𝐴) ∈ ((𝑋[,]𝑌)–cn→ℝ))
207	41	r19.21bi 3258	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝑆) → ⦋𝑦 / 𝑥⦌𝐴 ∈ ℝ)
208	207	recnd 11374	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝑆) → ⦋𝑦 / 𝑥⦌𝐴 ∈ ℂ)
209	30	r19.21bi 3258	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝑆) → ⦋𝑦 / 𝑥⦌𝐵 ∈ ℝ)
210	39	oveq2i 7460	. . . . . . . . . . . 12 ⊢ (ℝ D (𝑥 ∈ 𝑆 ↦ 𝐴)) = (ℝ D (𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐴))
211	22, 210, 28	3eqtr3g 2821	. . . . . . . . . . 11 ⊢ (𝜑 → (ℝ D (𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐴)) = (𝑦 ∈ 𝑆 ↦ ⦋𝑦 / 𝑥⦌𝐵))
212	172, 189	sstrid 3924	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑋(,)𝑌) ⊆ 𝑆)
213	171, 208, 209, 211, 212, 181, 72, 183	dvmptres 26327	. . . . . . . . . 10 ⊢ (𝜑 → (ℝ D (𝑦 ∈ (𝑋(,)𝑌) ↦ ⦋𝑦 / 𝑥⦌𝐴)) = (𝑦 ∈ (𝑋(,)𝑌) ↦ ⦋𝑦 / 𝑥⦌𝐵))
214	172	sseli 3909	. . . . . . . . . . 11 ⊢ (𝑦 ∈ (𝑋(,)𝑌) → 𝑦 ∈ (𝑋[,]𝑌))
215		simpl 488	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝜑)
216	189	sselda 3913	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑦 ∈ 𝑆)
217	4	adantr 486	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑌 ∈ 𝑆)
218		dvfsum.d	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐷 ∈ ℝ)
219	218	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝐷 ∈ ℝ)
220	13	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑋 ∈ ℝ)
221		dvfsumlem1.3	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐷 ≤ 𝑋)
222	221	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝐷 ≤ 𝑋)
223	130	simp2d 1161	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑋 ≤ 𝑦)
224	219, 220, 131, 222, 223	letrd 11504	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝐷 ≤ 𝑦)
225	130	simp3d 1162	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑦 ≤ 𝑌)
226		dvfsumlem1.5	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝑌 ≤ 𝑈)
227	226	adantr 486	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑌 ≤ 𝑈)
228		simp2r 1219	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌 ∧ 𝑌 ≤ 𝑈)) → 𝑌 ∈ 𝑆)
229		eleq1 2852	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑌 → (𝑘 ∈ 𝑆 ↔ 𝑌 ∈ 𝑆))
230	229	anbi2d 642	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑌 → ((𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ↔ (𝑦 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆)))
231		breq2 5110	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑌 → (𝑦 ≤ 𝑘 ↔ 𝑦 ≤ 𝑌))
232		breq1 5109	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑌 → (𝑘 ≤ 𝑈 ↔ 𝑌 ≤ 𝑈))
233	231, 232	3anbi23d 1468	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑌 → ((𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈) ↔ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌 ∧ 𝑌 ≤ 𝑈)))
234	230, 233	3anbi23d 1468	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑌 → ((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) ↔ (𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌 ∧ 𝑌 ≤ 𝑈))))
235		vex 3458	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑘 ∈ V
236	235, 59	csbie 3886	. . . . . . . . . . . . . . . . 17 ⊢ ⦋𝑘 / 𝑥⦌𝐵 = 𝐶
237	236, 142	eqtr3id 2812	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑌 → 𝐶 = ⦋𝑌 / 𝑥⦌𝐵)
238	237	breq1d 5116	. . . . . . . . . . . . . . 15 ⊢ (𝑘 = 𝑌 → (𝐶 ≤ ⦋𝑦 / 𝑥⦌𝐵 ↔ ⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑦 / 𝑥⦌𝐵))
239	234, 238	imbi12d 347	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑌 → (((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑦 / 𝑥⦌𝐵) ↔ ((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌 ∧ 𝑌 ≤ 𝑈)) → ⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑦 / 𝑥⦌𝐵)))
240		nfv 1949	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑥(𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈))
241		nfcv 2926	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑥𝐶
242		nfcv 2926	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑥 ≤
243	241, 242, 26	nfbr 5156	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑥 𝐶 ≤ ⦋𝑦 / 𝑥⦌𝐵
244	240, 243	nfim 1931	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑥((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑦 / 𝑥⦌𝐵)
245		eleq1 2852	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑦 → (𝑥 ∈ 𝑆 ↔ 𝑦 ∈ 𝑆))
246	245	anbi1d 643	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑦 → ((𝑥 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ↔ (𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆)))
247		breq2 5110	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑦 → (𝐷 ≤ 𝑥 ↔ 𝐷 ≤ 𝑦))
248		breq1 5109	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑦 → (𝑥 ≤ 𝑘 ↔ 𝑦 ≤ 𝑘))
249	247, 248	3anbi12d 1466	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑦 → ((𝐷 ≤ 𝑥 ∧ 𝑥 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈) ↔ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)))
250	246, 249	3anbi23d 1468	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑦 → ((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑥 ∧ 𝑥 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) ↔ (𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈))))
251	27	breq2d 5118	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 = 𝑦 → (𝐶 ≤ 𝐵 ↔ 𝐶 ≤ ⦋𝑦 / 𝑥⦌𝐵))
252	250, 251	imbi12d 347	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑦 → (((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑥 ∧ 𝑥 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ 𝐵) ↔ ((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑦 / 𝑥⦌𝐵)))
253		dvfsum.l	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑥 ∧ 𝑥 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ 𝐵)
254	244, 252, 253	chvarfv 2280	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑦 / 𝑥⦌𝐵)
255	239, 254	vtoclg 3521	. . . . . . . . . . . . 13 ⊢ (𝑌 ∈ 𝑆 → ((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌 ∧ 𝑌 ≤ 𝑈)) → ⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑦 / 𝑥⦌𝐵))
256	228, 255	mpcom 39	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝑦 ∈ 𝑆 ∧ 𝑌 ∈ 𝑆) ∧ (𝐷 ≤ 𝑦 ∧ 𝑦 ≤ 𝑌 ∧ 𝑌 ≤ 𝑈)) → ⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑦 / 𝑥⦌𝐵)
257	215, 216, 217, 224, 225, 227, 256	syl123anc 1415	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → ⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑦 / 𝑥⦌𝐵)
258	214, 257	sylan2 605	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋(,)𝑌)) → ⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑦 / 𝑥⦌𝐵)
259	13	rexrd 11396	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑋 ∈ ℝ^*)
260	5	rexrd 11396	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑌 ∈ ℝ^*)
261		dvfsumlem1.4	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑋 ≤ 𝑌)
262		lbicc2 13633	. . . . . . . . . . 11 ⊢ ((𝑋 ∈ ℝ^* ∧ 𝑌 ∈ ℝ^* ∧ 𝑋 ≤ 𝑌) → 𝑋 ∈ (𝑋[,]𝑌))
263	259, 260, 261, 262	syl3anc 1399	. . . . . . . . . 10 ⊢ (𝜑 → 𝑋 ∈ (𝑋[,]𝑌))
264		ubicc2 13634	. . . . . . . . . . 11 ⊢ ((𝑋 ∈ ℝ^* ∧ 𝑌 ∈ ℝ^* ∧ 𝑋 ≤ 𝑌) → 𝑌 ∈ (𝑋[,]𝑌))
265	259, 260, 261, 264	syl3anc 1399	. . . . . . . . . 10 ⊢ (𝜑 → 𝑌 ∈ (𝑋[,]𝑌))
266		oveq2 7457	. . . . . . . . . 10 ⊢ (𝑦 = 𝑋 → (⦋𝑌 / 𝑥⦌𝐵 · 𝑦) = (⦋𝑌 / 𝑥⦌𝐵 · 𝑋))
267		oveq2 7457	. . . . . . . . . 10 ⊢ (𝑦 = 𝑌 → (⦋𝑌 / 𝑥⦌𝐵 · 𝑦) = (⦋𝑌 / 𝑥⦌𝐵 · 𝑌))
268	13, 5, 169, 188, 206, 213, 258, 263, 265, 261, 266, 49, 267, 33	dvle 26371	. . . . . . . . 9 ⊢ (𝜑 → ((⦋𝑌 / 𝑥⦌𝐵 · 𝑌) − (⦋𝑌 / 𝑥⦌𝐵 · 𝑋)) ≤ (⦋𝑌 / 𝑥⦌𝐴 − ⦋𝑋 / 𝑥⦌𝐴))
269	71, 268	eqbrtrd 5131	. . . . . . . 8 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) ≤ (⦋𝑌 / 𝑥⦌𝐴 − ⦋𝑋 / 𝑥⦌𝐴))
270	67, 42, 51, 269	lesubd 11958	. . . . . . 7 ⊢ (𝜑 → ⦋𝑋 / 𝑥⦌𝐴 ≤ (⦋𝑌 / 𝑥⦌𝐴 − (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋))))
271	64	recnd 11374	. . . . . . . . 9 ⊢ (𝜑 → ((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) ∈ ℂ)
272	32	recnd 11374	. . . . . . . . 9 ⊢ (𝜑 → ((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) ∈ ℂ)
273	42	recnd 11374	. . . . . . . . 9 ⊢ (𝜑 → ⦋𝑌 / 𝑥⦌𝐴 ∈ ℂ)
274	271, 272, 273	subsubd 11734	. . . . . . . 8 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴)) = ((((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)) + ⦋𝑌 / 𝑥⦌𝐴))
275	272, 271	negsubdi2d 11722	. . . . . . . . . . 11 ⊢ (𝜑 → -(((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)) = (((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)))
276	15	recnd 11374	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (⌊‘𝑋) ∈ ℂ)
277	69, 70, 276	nnncan2d 11741	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑌 − (⌊‘𝑋)) − (𝑋 − (⌊‘𝑋))) = (𝑌 − 𝑋))
278	277	oveq1d 7464	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − (𝑋 − (⌊‘𝑋))) · ⦋𝑌 / 𝑥⦌𝐵) = ((𝑌 − 𝑋) · ⦋𝑌 / 𝑥⦌𝐵))
279	16	recnd 11374	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑌 − (⌊‘𝑋)) ∈ ℂ)
280	44	recnd 11374	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑋 − (⌊‘𝑋)) ∈ ℂ)
281	279, 280, 68	subdird 11810	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − (𝑋 − (⌊‘𝑋))) · ⦋𝑌 / 𝑥⦌𝐵) = (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)))
282	66	recnd 11374	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑌 − 𝑋) ∈ ℂ)
283	282, 68	mulcomd 11367	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝑌 − 𝑋) · ⦋𝑌 / 𝑥⦌𝐵) = (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)))
284	278, 281, 283	3eqtr3d 2806	. . . . . . . . . . . 12 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)) = (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)))
285	284	negeqd 11588	. . . . . . . . . . 11 ⊢ (𝜑 → -(((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)) = -(⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)))
286	275, 285	eqtr3d 2800	. . . . . . . . . 10 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)) = -(⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)))
287	286	oveq1d 7464	. . . . . . . . 9 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)) + ⦋𝑌 / 𝑥⦌𝐴) = ( -(⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) + ⦋𝑌 / 𝑥⦌𝐴))
288	67	recnd 11374	. . . . . . . . . 10 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) ∈ ℂ)
289	288, 273	negsubdid 11721	. . . . . . . . 9 ⊢ (𝜑 → -((⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) − ⦋𝑌 / 𝑥⦌𝐴) = ( -(⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) + ⦋𝑌 / 𝑥⦌𝐴))
290	287, 289	eqtr4d 2801	. . . . . . . 8 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵)) + ⦋𝑌 / 𝑥⦌𝐴) = -((⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) − ⦋𝑌 / 𝑥⦌𝐴))
291	288, 273	negsubdi2d 11722	. . . . . . . 8 ⊢ (𝜑 → -((⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) − ⦋𝑌 / 𝑥⦌𝐴) = (⦋𝑌 / 𝑥⦌𝐴 − (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋))))
292	274, 290, 291	3eqtrd 2802	. . . . . . 7 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴)) = (⦋𝑌 / 𝑥⦌𝐴 − (⦋𝑌 / 𝑥⦌𝐵 · (𝑌 − 𝑋))))
293	270, 292	breqtrrd 5137	. . . . . 6 ⊢ (𝜑 → ⦋𝑋 / 𝑥⦌𝐴 ≤ (((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴)))
294	51, 64, 43, 293	lesubd 11958	. . . . 5 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) ≤ (((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴))
295		flle 13977	. . . . . . . . 9 ⊢ (𝑋 ∈ ℝ → (⌊‘𝑋) ≤ 𝑋)
296	13, 295	syl 18	. . . . . . . 8 ⊢ (𝜑 → (⌊‘𝑋) ≤ 𝑋)
297	13, 15	subge0d 11944	. . . . . . . 8 ⊢ (𝜑 → (0 ≤ (𝑋 − (⌊‘𝑋)) ↔ (⌊‘𝑋) ≤ 𝑋))
298	296, 297	mpbird 260	. . . . . . 7 ⊢ (𝜑 → 0 ≤ (𝑋 − (⌊‘𝑋)))
299	45	breq2d 5118	. . . . . . . 8 ⊢ (𝑦 = 𝑋 → (⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑦 / 𝑥⦌𝐵 ↔ ⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑋 / 𝑥⦌𝐵))
300	257	ralrimiva 3158	. . . . . . . 8 ⊢ (𝜑 → ∀𝑦 ∈ (𝑋[,]𝑌)⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑦 / 𝑥⦌𝐵)
301	299, 300, 263	rspcdva 3581	. . . . . . 7 ⊢ (𝜑 → ⦋𝑌 / 𝑥⦌𝐵 ≤ ⦋𝑋 / 𝑥⦌𝐵)
302	31, 47, 44, 298, 301	lemul2ad 12295	. . . . . 6 ⊢ (𝜑 → ((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) ≤ ((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵))
303	64, 48, 51, 302	lesub1dd 11970	. . . . 5 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) ≤ (((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴))
304	43, 65, 52, 294, 303	letrd 11504	. . . 4 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) ≤ (((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴))
305	43, 52, 63, 304	leadd1dd 11968	. . 3 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶) ≤ ((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶))
306		dvfsum.m	. . . 4 ⊢ (𝜑 → 𝑀 ∈ ℤ)
307		dvfsum.md	. . . 4 ⊢ (𝜑 → 𝑀 ≤ (𝐷 + 1))
308		dvfsum.u	. . . 4 ⊢ (𝜑 → 𝑈 ∈ ℝ^*)
309		dvfsum.h	. . . 4 ⊢ 𝐻 = (𝑥 ∈ 𝑆 ↦ (((𝑥 − (⌊‘𝑥)) · 𝐵) + (Σ𝑘 ∈ (𝑀...(⌊‘𝑥))𝐶 − 𝐴)))
310		dvfsumlem1.6	. . . 4 ⊢ (𝜑 → 𝑌 ≤ ((⌊‘𝑋) + 1))
311	1, 57, 306, 218, 307, 8, 20, 21, 54, 22, 59, 308, 253, 309, 6, 4, 221, 261, 226, 310	dvfsumlem1 26390	. . 3 ⊢ (𝜑 → (𝐻‘𝑌) = ((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶))
312	13	leidd 11920	. . . 4 ⊢ (𝜑 → 𝑋 ≤ 𝑋)
313	259, 260, 308, 261, 226	xrletrd 13329	. . . 4 ⊢ (𝜑 → 𝑋 ≤ 𝑈)
314		fllep1 13979	. . . . 5 ⊢ (𝑋 ∈ ℝ → 𝑋 ≤ ((⌊‘𝑋) + 1))
315	13, 314	syl 18	. . . 4 ⊢ (𝜑 → 𝑋 ≤ ((⌊‘𝑋) + 1))
316	1, 57, 306, 218, 307, 8, 20, 21, 54, 22, 59, 308, 253, 309, 6, 6, 221, 312, 313, 315	dvfsumlem1 26390	. . 3 ⊢ (𝜑 → (𝐻‘𝑋) = ((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶))
317	305, 311, 316	3brtr4d 5141	. 2 ⊢ (𝜑 → (𝐻‘𝑌) ≤ (𝐻‘𝑋))
318	52, 47	resubcld 11781	. . . . 5 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) − ⦋𝑋 / 𝑥⦌𝐵) ∈ ℝ)
319	43, 31	resubcld 11781	. . . . 5 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) − ⦋𝑌 / 𝑥⦌𝐵) ∈ ℝ)
320		peano2rem 11662	. . . . . . . . . . 11 ⊢ ((𝑋 − (⌊‘𝑋)) ∈ ℝ → ((𝑋 − (⌊‘𝑋)) − 1) ∈ ℝ)
321	44, 320	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑋 − (⌊‘𝑋)) − 1) ∈ ℝ)
322	321, 47	remulcld 11376	. . . . . . . . 9 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) ∈ ℝ)
323	322, 51	resubcld 11781	. . . . . . . 8 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) ∈ ℝ)
324		peano2rem 11662	. . . . . . . . . . 11 ⊢ ((𝑌 − (⌊‘𝑋)) ∈ ℝ → ((𝑌 − (⌊‘𝑋)) − 1) ∈ ℝ)
325	16, 324	syl 18	. . . . . . . . . 10 ⊢ (𝜑 → ((𝑌 − (⌊‘𝑋)) − 1) ∈ ℝ)
326	325, 47	remulcld 11376	. . . . . . . . 9 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) ∈ ℝ)
327	326, 42	resubcld 11781	. . . . . . . 8 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) ∈ ℝ)
328	325, 31	remulcld 11376	. . . . . . . . 9 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) ∈ ℝ)
329	328, 42	resubcld 11781	. . . . . . . 8 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) ∈ ℝ)
330	322	recnd 11374	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) ∈ ℂ)
331	326	recnd 11374	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) ∈ ℂ)
332	330, 331	subcld 11706	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵)) ∈ ℂ)
333	332, 273	addcomd 11549	. . . . . . . . . . . 12 ⊢ (𝜑 → (((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵)) + ⦋𝑌 / 𝑥⦌𝐴) = (⦋𝑌 / 𝑥⦌𝐴 + ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵))))
334	330, 331, 273	subsubd 11734	. . . . . . . . . . . 12 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴)) = (((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵)) + ⦋𝑌 / 𝑥⦌𝐴))
335	273, 331, 330	subsub2d 11735	. . . . . . . . . . . 12 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐴 − ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵))) = (⦋𝑌 / 𝑥⦌𝐴 + ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵))))
336	333, 334, 335	3eqtr4d 2808	. . . . . . . . . . 11 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴)) = (⦋𝑌 / 𝑥⦌𝐴 − ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵))))
337		1cnd 11339	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 1 ∈ ℂ)
338	279, 280, 337	nnncan2d 11741	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) − ((𝑋 − (⌊‘𝑋)) − 1)) = ((𝑌 − (⌊‘𝑋)) − (𝑋 − (⌊‘𝑋))))
339	338, 277	eqtrd 2798	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) − ((𝑋 − (⌊‘𝑋)) − 1)) = (𝑌 − 𝑋))
340	339	oveq1d 7464	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) − 1) − ((𝑋 − (⌊‘𝑋)) − 1)) · ⦋𝑋 / 𝑥⦌𝐵) = ((𝑌 − 𝑋) · ⦋𝑋 / 𝑥⦌𝐵))
341	325	recnd 11374	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑌 − (⌊‘𝑋)) − 1) ∈ ℂ)
342	321	recnd 11374	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((𝑋 − (⌊‘𝑋)) − 1) ∈ ℂ)
343	47	recnd 11374	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ⦋𝑋 / 𝑥⦌𝐵 ∈ ℂ)
344	341, 342, 343	subdird 11810	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) − 1) − ((𝑋 − (⌊‘𝑋)) − 1)) · ⦋𝑋 / 𝑥⦌𝐵) = ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵)))
345	282, 343	mulcomd 11367	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝑌 − 𝑋) · ⦋𝑋 / 𝑥⦌𝐵) = (⦋𝑋 / 𝑥⦌𝐵 · (𝑌 − 𝑋)))
346	340, 344, 345	3eqtr3d 2806	. . . . . . . . . . . 12 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵)) = (⦋𝑋 / 𝑥⦌𝐵 · (𝑌 − 𝑋)))
347	346	oveq2d 7465	. . . . . . . . . . 11 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐴 − ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵))) = (⦋𝑌 / 𝑥⦌𝐴 − (⦋𝑋 / 𝑥⦌𝐵 · (𝑌 − 𝑋))))
348	336, 347	eqtrd 2798	. . . . . . . . . 10 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴)) = (⦋𝑌 / 𝑥⦌𝐴 − (⦋𝑋 / 𝑥⦌𝐵 · (𝑌 − 𝑋))))
349	47, 66	remulcld 11376	. . . . . . . . . . 11 ⊢ (𝜑 → (⦋𝑋 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) ∈ ℝ)
350		cncfmptc 25277	. . . . . . . . . . . . . . . . 17 ⊢ ((⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ ∧ (𝑋[,]𝑌) ⊆ ℂ ∧ ℝ ⊆ ℂ) → (𝑦 ∈ (𝑋[,]𝑌) ↦ ⦋𝑋 / 𝑥⦌𝐵) ∈ ((𝑋[,]𝑌)–cn→ℝ))
351	47, 91, 92, 350	syl3anc 1399	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) ↦ ⦋𝑋 / 𝑥⦌𝐵) ∈ ((𝑋[,]𝑌)–cn→ℝ))
352		remulcl 11322	. . . . . . . . . . . . . . . . 17 ⊢ ((⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (⦋𝑋 / 𝑥⦌𝐵 · 𝑦) ∈ ℝ)
353		simpl 488	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ)
354	353	recnd 11374	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ⦋𝑋 / 𝑥⦌𝐵 ∈ ℂ)
355		simpr 490	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℝ)
356	355	recnd 11374	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℂ)
357	354, 356	jca 521	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (⦋𝑋 / 𝑥⦌𝐵 ∈ ℂ ∧ 𝑦 ∈ ℂ))
358		ovmpot 7611	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((⦋𝑋 / 𝑥⦌𝐵 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦))
359	358	eqcomd 2769	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((⦋𝑋 / 𝑥⦌𝐵 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (⦋𝑋 / 𝑥⦌𝐵 · 𝑦) = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))
360	357, 359	syl 18	. . . . . . . . . . . . . . . . . . 19 ⊢ ((⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (⦋𝑋 / 𝑥⦌𝐵 · 𝑦) = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))
361	360	eleq1d 2849	. . . . . . . . . . . . . . . . . 18 ⊢ ((⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ((⦋𝑋 / 𝑥⦌𝐵 · 𝑦) ∈ ℝ ↔ (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) ∈ ℝ))
362	361	biimpd 232	. . . . . . . . . . . . . . . . 17 ⊢ ((⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → ((⦋𝑋 / 𝑥⦌𝐵 · 𝑦) ∈ ℝ → (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) ∈ ℝ))
363	352, 362	mpd 16	. . . . . . . . . . . . . . . 16 ⊢ ((⦋𝑋 / 𝑥⦌𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) ∈ ℝ)
364	72, 73, 351, 96, 90, 363	cncfmpt2ss 25281	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)) ∈ ((𝑋[,]𝑌)–cn→ℝ))
365		df-mpt 5191	. . . . . . . . . . . . . . . . 17 ⊢ (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)) = {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))}
366	365	eleq1i 2855	. . . . . . . . . . . . . . . 16 ⊢ ((𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)) ∈ ((𝑋[,]𝑌)–cn→ℝ) ↔ {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} ∈ ((𝑋[,]𝑌)–cn→ℝ))
367	366	biimpi 219	. . . . . . . . . . . . . . 15 ⊢ ((𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)) ∈ ((𝑋[,]𝑌)–cn→ℝ) → {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} ∈ ((𝑋[,]𝑌)–cn→ℝ))
368	364, 367	syl 18	. . . . . . . . . . . . . 14 ⊢ (𝜑 → {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} ∈ ((𝑋[,]𝑌)–cn→ℝ))
369	114	a1dd 51	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) → (𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) → 𝑦 ∈ (𝑋[,]𝑌))))
370	369	impd 416	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → ((𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)) → 𝑦 ∈ (𝑋[,]𝑌)))
371	343	adantr 486	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → ⦋𝑋 / 𝑥⦌𝐵 ∈ ℂ)
372	371, 132	jca 521	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → (⦋𝑋 / 𝑥⦌𝐵 ∈ ℂ ∧ 𝑦 ∈ ℂ))
373	372, 358	syl 18	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦))
374	373	eqeq2d 2774	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → (𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) ↔ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦)))
375	374	biimpd 232	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → (𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) → 𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦)))
376	375	ex 418	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) → (𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦) → 𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦))))
377	376	impd 416	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → ((𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)) → 𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦)))
378	370, 377	jcad 522	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → ((𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)) → (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦))))
379	114	a1dd 51	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) → (𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦) → 𝑦 ∈ (𝑋[,]𝑌))))
380	379	impd 416	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → ((𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦)) → 𝑦 ∈ (𝑋[,]𝑌)))
381	372, 359	syl 18	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → (⦋𝑋 / 𝑥⦌𝐵 · 𝑦) = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))
382	381	eqeq2d 2774	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → (𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦) ↔ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)))
383	382	biimpd 232	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → (𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦) → 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)))
384	383	ex 418	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) → (𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦) → 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))))
385	384	impd 416	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → ((𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦)) → 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)))
386	380, 385	jcad 522	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → ((𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦)) → (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))))
387	378, 386	impbid 215	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ((𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦)) ↔ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦))))
388	387	opabbidv 5175	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} = {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦))})
389		df-mpt 5191	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵 · 𝑦)) = {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦))}
390	389	eqcomi 2772	. . . . . . . . . . . . . . . . . . 19 ⊢ {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦))} = (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵 · 𝑦))
391	390	eqeq2i 2776	. . . . . . . . . . . . . . . . . 18 ⊢ ({⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} = {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦))} ↔ {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} = (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵 · 𝑦)))
392	391	biimpi 219	. . . . . . . . . . . . . . . . 17 ⊢ ({⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} = {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵 · 𝑦))} → {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} = (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵 · 𝑦)))
393	388, 392	syl 18	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → {⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} = (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵 · 𝑦)))
394	393	eleq1d 2849	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ({⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} ∈ ((𝑋[,]𝑌)–cn→ℝ) ↔ (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵 · 𝑦)) ∈ ((𝑋[,]𝑌)–cn→ℝ)))
395	394	biimpd 232	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ({⟨𝑦, 𝑤⟩ ∣ (𝑦 ∈ (𝑋[,]𝑌) ∧ 𝑤 = (⦋𝑋 / 𝑥⦌𝐵(𝑢 ∈ ℂ, 𝑣 ∈ ℂ ↦ (𝑢 · 𝑣))𝑦))} ∈ ((𝑋[,]𝑌)–cn→ℝ) → (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵 · 𝑦)) ∈ ((𝑋[,]𝑌)–cn→ℝ)))
396	368, 395	mpd 16	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑦 ∈ (𝑋[,]𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵 · 𝑦)) ∈ ((𝑋[,]𝑌)–cn→ℝ))
397	171, 175, 176, 184, 343	dvmptcmul 26328	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (ℝ D (𝑦 ∈ (𝑋(,)𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵 · 𝑦))) = (𝑦 ∈ (𝑋(,)𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵 · 1)))
398	343	mulridd 11363	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (⦋𝑋 / 𝑥⦌𝐵 · 1) = ⦋𝑋 / 𝑥⦌𝐵)
399	398	mpteq2dv 5203	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑦 ∈ (𝑋(,)𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵 · 1)) = (𝑦 ∈ (𝑋(,)𝑌) ↦ ⦋𝑋 / 𝑥⦌𝐵))
400	397, 399	eqtrd 2798	. . . . . . . . . . . . 13 ⊢ (𝜑 → (ℝ D (𝑦 ∈ (𝑋(,)𝑌) ↦ (⦋𝑋 / 𝑥⦌𝐵 · 𝑦))) = (𝑦 ∈ (𝑋(,)𝑌) ↦ ⦋𝑋 / 𝑥⦌𝐵))
401	6	adantr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑋 ∈ 𝑆)
402	131	rexrd 11396	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑦 ∈ ℝ^*)
403	260	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑌 ∈ ℝ^*)
404	308	adantr 486	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑈 ∈ ℝ^*)
405	402, 403, 404, 225, 227	xrletrd 13329	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → 𝑦 ≤ 𝑈)
406		vex 3458	. . . . . . . . . . . . . . . 16 ⊢ 𝑦 ∈ V
407		eleq1 2852	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = 𝑦 → (𝑘 ∈ 𝑆 ↔ 𝑦 ∈ 𝑆))
408	407	anbi2d 642	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 𝑦 → ((𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ↔ (𝑋 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆)))
409		breq2 5110	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = 𝑦 → (𝑋 ≤ 𝑘 ↔ 𝑋 ≤ 𝑦))
410		breq1 5109	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = 𝑦 → (𝑘 ≤ 𝑈 ↔ 𝑦 ≤ 𝑈))
411	409, 410	3anbi23d 1468	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 𝑦 → ((𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈) ↔ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑦 ∧ 𝑦 ≤ 𝑈)))
412	408, 411	3anbi23d 1468	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑦 → ((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) ↔ (𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑦 ∧ 𝑦 ≤ 𝑈))))
413		csbeq1 3854	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 = 𝑦 → ⦋𝑘 / 𝑥⦌𝐵 = ⦋𝑦 / 𝑥⦌𝐵)
414	236, 413	eqtr3id 2812	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 = 𝑦 → 𝐶 = ⦋𝑦 / 𝑥⦌𝐵)
415	414	breq1d 5116	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 = 𝑦 → (𝐶 ≤ ⦋𝑋 / 𝑥⦌𝐵 ↔ ⦋𝑦 / 𝑥⦌𝐵 ≤ ⦋𝑋 / 𝑥⦌𝐵))
416	412, 415	imbi12d 347	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 = 𝑦 → (((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑋 / 𝑥⦌𝐵) ↔ ((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑦 ∧ 𝑦 ≤ 𝑈)) → ⦋𝑦 / 𝑥⦌𝐵 ≤ ⦋𝑋 / 𝑥⦌𝐵)))
417		simp2l 1218	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝑋 ∈ 𝑆)
418		nfv 1949	. . . . . . . . . . . . . . . . . . 19 ⊢ Ⅎ𝑥(𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈))
419		nfcsb1v 3875	. . . . . . . . . . . . . . . . . . . 20 ⊢ Ⅎ𝑥⦋𝑋 / 𝑥⦌𝐵
420	241, 242, 419	nfbr 5156	. . . . . . . . . . . . . . . . . . 19 ⊢ Ⅎ𝑥 𝐶 ≤ ⦋𝑋 / 𝑥⦌𝐵
421	418, 420	nfim 1931	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑥((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑋 / 𝑥⦌𝐵)
422		eleq1 2852	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = 𝑋 → (𝑥 ∈ 𝑆 ↔ 𝑋 ∈ 𝑆))
423	422	anbi1d 643	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = 𝑋 → ((𝑥 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ↔ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆)))
424		breq2 5110	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = 𝑋 → (𝐷 ≤ 𝑥 ↔ 𝐷 ≤ 𝑋))
425		breq1 5109	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = 𝑋 → (𝑥 ≤ 𝑘 ↔ 𝑋 ≤ 𝑘))
426	424, 425	3anbi12d 1466	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = 𝑋 → ((𝐷 ≤ 𝑥 ∧ 𝑥 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈) ↔ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)))
427	423, 426	3anbi23d 1468	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = 𝑋 → ((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑥 ∧ 𝑥 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) ↔ (𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈))))
428		csbeq1a 3865	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = 𝑋 → 𝐵 = ⦋𝑋 / 𝑥⦌𝐵)
429	428	breq2d 5118	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = 𝑋 → (𝐶 ≤ 𝐵 ↔ 𝐶 ≤ ⦋𝑋 / 𝑥⦌𝐵))
430	427, 429	imbi12d 347	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑋 → (((𝜑 ∧ (𝑥 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑥 ∧ 𝑥 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ 𝐵) ↔ ((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑋 / 𝑥⦌𝐵)))
431	421, 430, 253	vtoclg1f 3534	. . . . . . . . . . . . . . . . 17 ⊢ (𝑋 ∈ 𝑆 → ((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑋 / 𝑥⦌𝐵))
432	417, 431	mpcom 39	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑘 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑘 ∧ 𝑘 ≤ 𝑈)) → 𝐶 ≤ ⦋𝑋 / 𝑥⦌𝐵)
433	406, 416, 432	vtocl 3524	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑋 ∈ 𝑆 ∧ 𝑦 ∈ 𝑆) ∧ (𝐷 ≤ 𝑋 ∧ 𝑋 ≤ 𝑦 ∧ 𝑦 ≤ 𝑈)) → ⦋𝑦 / 𝑥⦌𝐵 ≤ ⦋𝑋 / 𝑥⦌𝐵)
434	215, 401, 216, 222, 223, 405, 433	syl123anc 1415	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋[,]𝑌)) → ⦋𝑦 / 𝑥⦌𝐵 ≤ ⦋𝑋 / 𝑥⦌𝐵)
435	214, 434	sylan2 605	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑦 ∈ (𝑋(,)𝑌)) → ⦋𝑦 / 𝑥⦌𝐵 ≤ ⦋𝑋 / 𝑥⦌𝐵)
436		oveq2 7457	. . . . . . . . . . . . 13 ⊢ (𝑦 = 𝑋 → (⦋𝑋 / 𝑥⦌𝐵 · 𝑦) = (⦋𝑋 / 𝑥⦌𝐵 · 𝑋))
437		oveq2 7457	. . . . . . . . . . . . 13 ⊢ (𝑦 = 𝑌 → (⦋𝑋 / 𝑥⦌𝐵 · 𝑦) = (⦋𝑋 / 𝑥⦌𝐵 · 𝑌))
438	13, 5, 206, 213, 396, 400, 435, 263, 265, 261, 49, 436, 33, 437	dvle 26371	. . . . . . . . . . . 12 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐴 − ⦋𝑋 / 𝑥⦌𝐴) ≤ ((⦋𝑋 / 𝑥⦌𝐵 · 𝑌) − (⦋𝑋 / 𝑥⦌𝐵 · 𝑋)))
439	343, 69, 70	subdid 11809	. . . . . . . . . . . 12 ⊢ (𝜑 → (⦋𝑋 / 𝑥⦌𝐵 · (𝑌 − 𝑋)) = ((⦋𝑋 / 𝑥⦌𝐵 · 𝑌) − (⦋𝑋 / 𝑥⦌𝐵 · 𝑋)))
440	438, 439	breqtrrd 5137	. . . . . . . . . . 11 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐴 − ⦋𝑋 / 𝑥⦌𝐴) ≤ (⦋𝑋 / 𝑥⦌𝐵 · (𝑌 − 𝑋)))
441	42, 51, 349, 440	subled 11957	. . . . . . . . . 10 ⊢ (𝜑 → (⦋𝑌 / 𝑥⦌𝐴 − (⦋𝑋 / 𝑥⦌𝐵 · (𝑌 − 𝑋))) ≤ ⦋𝑋 / 𝑥⦌𝐴)
442	348, 441	eqbrtrd 5131	. . . . . . . . 9 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴)) ≤ ⦋𝑋 / 𝑥⦌𝐴)
443	322, 327, 51, 442	subled 11957	. . . . . . . 8 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) ≤ ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴))
444	325	renegcld 11780	. . . . . . . . . . . 12 ⊢ (𝜑 → -((𝑌 − (⌊‘𝑋)) − 1) ∈ ℝ)
445		1red 11346	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 1 ∈ ℝ)
446	5, 15, 445	lesubadd2d 11953	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ((𝑌 − (⌊‘𝑋)) ≤ 1 ↔ 𝑌 ≤ ((⌊‘𝑋) + 1)))
447	310, 446	mpbird 260	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑌 − (⌊‘𝑋)) ≤ 1)
448	16, 445	suble0d 11945	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) ≤ 0 ↔ (𝑌 − (⌊‘𝑋)) ≤ 1))
449	447, 448	mpbird 260	. . . . . . . . . . . . 13 ⊢ (𝜑 → ((𝑌 − (⌊‘𝑋)) − 1) ≤ 0)
450	325	le0neg1d 11925	. . . . . . . . . . . . 13 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) ≤ 0 ↔ 0 ≤ -((𝑌 − (⌊‘𝑋)) − 1)))
451	449, 450	mpbid 235	. . . . . . . . . . . 12 ⊢ (𝜑 → 0 ≤ -((𝑌 − (⌊‘𝑋)) − 1))
452	31, 47, 444, 451, 301	lemul2ad 12295	. . . . . . . . . . 11 ⊢ (𝜑 → ( -((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) ≤ ( -((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵))
453	341, 68	mulneg1d 11806	. . . . . . . . . . 11 ⊢ (𝜑 → ( -((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) = -(((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵))
454	341, 343	mulneg1d 11806	. . . . . . . . . . 11 ⊢ (𝜑 → ( -((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) = -(((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵))
455	452, 453, 454	3brtr3d 5140	. . . . . . . . . 10 ⊢ (𝜑 → -(((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) ≤ -(((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵))
456	326, 328	lenegd 11933	. . . . . . . . . 10 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) ≤ (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) ↔ -(((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) ≤ -(((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵)))
457	455, 456	mpbird 260	. . . . . . . . 9 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) ≤ (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵))
458	326, 328, 42, 457	lesub1dd 11970	. . . . . . . 8 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) ≤ ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴))
459	323, 327, 329, 443, 458	letrd 11504	. . . . . . 7 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) ≤ ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴))
460	280, 337, 343	subdird 11810	. . . . . . . . 9 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) = (((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − (1 · ⦋𝑋 / 𝑥⦌𝐵)))
461	343	mullidd 11364	. . . . . . . . . 10 ⊢ (𝜑 → (1 · ⦋𝑋 / 𝑥⦌𝐵) = ⦋𝑋 / 𝑥⦌𝐵)
462	461	oveq2d 7465	. . . . . . . . 9 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − (1 · ⦋𝑋 / 𝑥⦌𝐵)) = (((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐵))
463	460, 462	eqtrd 2798	. . . . . . . 8 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) = (((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐵))
464	463	oveq1d 7464	. . . . . . 7 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) − 1) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) = ((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴))
465	279, 337, 68	subdird 11810	. . . . . . . . 9 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) = (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − (1 · ⦋𝑌 / 𝑥⦌𝐵)))
466	68	mullidd 11364	. . . . . . . . . 10 ⊢ (𝜑 → (1 · ⦋𝑌 / 𝑥⦌𝐵) = ⦋𝑌 / 𝑥⦌𝐵)
467	466	oveq2d 7465	. . . . . . . . 9 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − (1 · ⦋𝑌 / 𝑥⦌𝐵)) = (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐵))
468	465, 467	eqtrd 2798	. . . . . . . 8 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) = (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐵))
469	468	oveq1d 7464	. . . . . . 7 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) − 1) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) = ((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴))
470	459, 464, 469	3brtr3d 5140	. . . . . 6 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) ≤ ((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴))
471	48	recnd 11374	. . . . . . 7 ⊢ (𝜑 → ((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) ∈ ℂ)
472	51	recnd 11374	. . . . . . 7 ⊢ (𝜑 → ⦋𝑋 / 𝑥⦌𝐴 ∈ ℂ)
473	471, 472, 343	sub32d 11738	. . . . . 6 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) − ⦋𝑋 / 𝑥⦌𝐵) = ((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴))
474	272, 273, 68	sub32d 11738	. . . . . 6 ⊢ (𝜑 → ((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) − ⦋𝑌 / 𝑥⦌𝐵) = ((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴))
475	470, 473, 474	3brtr4d 5141	. . . . 5 ⊢ (𝜑 → ((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) − ⦋𝑋 / 𝑥⦌𝐵) ≤ ((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) − ⦋𝑌 / 𝑥⦌𝐵))
476	318, 319, 63, 475	leadd1dd 11968	. . . 4 ⊢ (𝜑 → (((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) − ⦋𝑋 / 𝑥⦌𝐵) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶) ≤ (((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) − ⦋𝑌 / 𝑥⦌𝐵) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶))
477	52	recnd 11374	. . . . 5 ⊢ (𝜑 → (((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) ∈ ℂ)
478	63	recnd 11374	. . . . 5 ⊢ (𝜑 → Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶 ∈ ℂ)
479	477, 478, 343	addsubd 11727	. . . 4 ⊢ (𝜑 → (((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶) − ⦋𝑋 / 𝑥⦌𝐵) = (((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) − ⦋𝑋 / 𝑥⦌𝐵) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶))
480	43	recnd 11374	. . . . 5 ⊢ (𝜑 → (((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) ∈ ℂ)
481	480, 478, 68	addsubd 11727	. . . 4 ⊢ (𝜑 → (((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶) − ⦋𝑌 / 𝑥⦌𝐵) = (((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) − ⦋𝑌 / 𝑥⦌𝐵) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶))
482	476, 479, 481	3brtr4d 5141	. . 3 ⊢ (𝜑 → (((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶) − ⦋𝑋 / 𝑥⦌𝐵) ≤ (((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶) − ⦋𝑌 / 𝑥⦌𝐵))
483	316	oveq1d 7464	. . 3 ⊢ (𝜑 → ((𝐻‘𝑋) − ⦋𝑋 / 𝑥⦌𝐵) = (((((𝑋 − (⌊‘𝑋)) · ⦋𝑋 / 𝑥⦌𝐵) − ⦋𝑋 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶) − ⦋𝑋 / 𝑥⦌𝐵))
484	311	oveq1d 7464	. . 3 ⊢ (𝜑 → ((𝐻‘𝑌) − ⦋𝑌 / 𝑥⦌𝐵) = (((((𝑌 − (⌊‘𝑋)) · ⦋𝑌 / 𝑥⦌𝐵) − ⦋𝑌 / 𝑥⦌𝐴) + Σ𝑘 ∈ (𝑀...(⌊‘𝑋))𝐶) − ⦋𝑌 / 𝑥⦌𝐵))
485	482, 483, 484	3brtr4d 5141	. 2 ⊢ (𝜑 → ((𝐻‘𝑋) − ⦋𝑋 / 𝑥⦌𝐵) ≤ ((𝐻‘𝑌) − ⦋𝑌 / 𝑥⦌𝐵))
486	317, 485	jca 521	1 ⊢ (𝜑 → ((𝐻‘𝑌) ≤ (𝐻‘𝑋) ∧ ((𝐻‘𝑋) − ⦋𝑋 / 𝑥⦌𝐵) ≤ ((𝐻‘𝑌) − ⦋𝑌 / 𝑥⦌𝐵)))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 401 ∧ w3a 1103 = wceq 1570 ∈ wcel 2147 ∀wral 3080 ⦋csb 3851 ⊆ wss 3900 {cpr 4590 class class class wbr 5106 {copab 5171 ↦ cmpt 5190 dom cdm 5656 ran crn 5657 ↾ cres 5658 ⟶wf 6560 ‘cfv 6564 (class class class)co 7449 ∈ cmpo 7451 ℂcc 11235 ℝcr 11236 0cc0 11237 1c1 11238 + caddc 11240 · cmul 11242 +∞cpnf 11377 ℝ^*cxr 11379 < clt 11380 ≤ cle 11381 − cmin 11578 -cneg 11579 ℤcz 12731 ℤ_≥cuz 13003 (,)cioo 13514 [,]cicc 13517 ...cfz 13677 ⌊cfl 13968 Σcsu 15894 TopOpenctopn 17633 topGenctg 17649 ℂ_fldccnfld 21720 –cn→ccncf 25241 D cdv 26227

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1945 ax-6 2002 ax-7 2043 ax-8 2149 ax-9 2157 ax-10 2180 ax-11 2197 ax-12 2216 ax-ext 2735 ax-rep 5236 ax-sep 5253 ax-nul 5264 ax-pow 5332 ax-pr 5396 ax-un 7781 ax-inf2 9677 ax-cnex 11293 ax-resscn 11294 ax-1cn 11295 ax-icn 11296 ax-addcl 11297 ax-addrcl 11298 ax-mulcl 11299 ax-mulrcl 11300 ax-mulcom 11301 ax-addass 11302 ax-mulass 11303 ax-distr 11304 ax-i2m1 11305 ax-1ne0 11306 ax-1rid 11307 ax-rnegex 11308 ax-rrecex 11309 ax-cnre 11310 ax-pre-lttri 11311 ax-pre-lttrn 11312 ax-pre-ltadd 11313 ax-pre-mulgt0 11314 ax-pre-sup 11315 ax-addf 11316

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2102 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2839 df-nfc 2913 df-ne 2960 df-nel 3066 df-ral 3081 df-rex 3091 df-rmo 3369 df-reu 3370 df-rab 3417 df-v 3456 df-sbc 3743 df-csb 3852 df-ss 3901 df-pss 4017 df-dif 4050 df-in 4094 df-un 4154 df-nul 4282 df-if 4486 df-pw 4562 df-sn 4589 df-pr 4591 df-tp 4593 df-op 4839 df-uni 4871 df-int 4911 df-iun 4956 df-iin 4957 df-br 5107 df-opab 5172 df-mpt 5191 df-tr 5217 df-id 5551 df-eprel 5556 df-po 5564 df-so 5565 df-fr 5609 df-se 5610 df-we 5611 df-xp 5662 df-rel 5663 df-cnv 5664 df-co 5665 df-dm 5666 df-rn 5667 df-res 5668 df-ima 5669 df-pred 6328 df-ord 6389 df-on 6390 df-lim 6391 df-suc 6392 df-iota 6518 df-fun 6566 df-fn 6567 df-f 6568 df-f1 6569 df-fo 6570 df-f1o 6571 df-fv 6572 df-isom 6573 df-riota 7406 df-ov 7452 df-oprab 7453 df-mpo 7454 df-of 7723 df-om 7910 df-1st 8033 df-2nd 8034 df-supp 8213 df-frecs 8335 df-wrecs 8366 df-recs 8415 df-rdg 8454 df-1o 8512 df-2o 8513 df-er 8753 df-map 8885 df-pm 8886 df-ixp 8962 df-en 9010 df-dom 9011 df-sdom 9012 df-fin 9013 df-fsupp 9390 df-fi 9438 df-sup 9469 df-inf 9470 df-oi 9539 df-card 10055 df-pnf 11382 df-mnf 11383 df-xr 11384 df-ltxr 11385 df-le 11386 df-sub 11580 df-neg 11581 df-div 12012 df-nn 12374 df-2 12443 df-3 12444 df-4 12445 df-5 12446 df-6 12447 df-7 12448 df-8 12449 df-9 12450 df-n0 12645 df-z 12732 df-dec 12853 df-uz 13004 df-q 13114 df-rp 13159 df-xneg 13279 df-xadd 13280 df-xmul 13281 df-ioo 13518 df-ico 13520 df-icc 13521 df-fz 13678 df-fzo 13827 df-fl 13970 df-seq 14183 df-exp 14243 df-hash 14514 df-cj 15307 df-re 15308 df-im 15309 df-sqrt 15443 df-abs 15444 df-clim 15696 df-sum 15895 df-struct 17366 df-sets 17383 df-slot 17401 df-ndx 17413 df-base 17429 df-ress 17450 df-plusg 17482 df-mulr 17483 df-starv 17484 df-sca 17485 df-vsca 17486 df-ip 17487 df-tset 17488 df-ple 17489 df-ds 17491 df-unif 17492 df-hom 17493 df-cco 17494 df-rest 17634 df-topn 17635 df-0g 17653 df-gsum 17654 df-topgen 17655 df-pt 17656 df-prds 17659 df-xrs 17715 df-qtop 17720 df-imas 17721 df-xps 17723 df-mre 17797 df-mrc 17798 df-acs 17800 df-mgm 18857 df-sgrp 18949 df-mnd 18965 df-submnd 19020 df-mulg 19319 df-cntz 19573 df-cmn 20038 df-psmet 21712 df-xmet 21713 df-met 21714 df-bl 21715 df-mopn 21716 df-fbas 21717 df-fg 21718 df-cnfld 21721 df-top 23256 df-topon 23273 df-topsp 23295 df-bases 23308 df-cld 23381 df-ntr 23382 df-cls 23383 df-nei 23460 df-lp 23498 df-perf 23499 df-cn 23589 df-cnp 23590 df-haus 23677 df-cmp 23749 df-tx 23925 df-hmeo 24118 df-fil 24209 df-fm 24301 df-flim 24302 df-flf 24303 df-xms 24683 df-ms 24684 df-tms 24685 df-cncf 25243 df-limc 26230 df-dv 26231

This theorem is used by: dvfsumlem3 26392

W3C validator