fourierdlem39 - Mathbox for Glauco Siliprandi

	Mathbox for Glauco Siliprandi		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > fourierdlem39		Structured version Visualization version GIF version

Theorem fourierdlem39 46390

Description: Integration by parts of ∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) d𝑥 (Contributed by Glauco Siliprandi, 11-Dec-2019.)

**Hypotheses**
Ref	Expression
fourierdlem39.a	⊢ (𝜑 → 𝐴 ∈ ℝ)
fourierdlem39.b	⊢ (𝜑 → 𝐵 ∈ ℝ)
fourierdlem39.aleb	⊢ (𝜑 → 𝐴 ≤ 𝐵)
fourierdlem39.f	⊢ (𝜑 → 𝐹 ∈ ((𝐴[,]𝐵)–cn→ℂ))
fourierdlem39.g	⊢ 𝐺 = (ℝ D 𝐹)
fourierdlem39.gcn	⊢ (𝜑 → 𝐺 ∈ ((𝐴(,)𝐵)–cn→ℂ))
fourierdlem39.gbd	⊢ (𝜑 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦)
fourierdlem39.r	⊢ (𝜑 → 𝑅 ∈ ℝ⁺)

**Assertion**
Ref	Expression
fourierdlem39	⊢ (𝜑 → ∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) d𝑥 = ((((𝐹‘𝐵) · -((cos‘(𝑅 · 𝐵)) / 𝑅)) − ((𝐹‘𝐴) · -((cos‘(𝑅 · 𝐴)) / 𝑅))) − ∫(𝐴(,)𝐵)((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) d𝑥))

Distinct variable groups: 𝑥,𝐴,𝑦 𝑥,𝐵,𝑦 𝑥,𝐹,𝑦 𝑥,𝐺,𝑦 𝑥,𝑅,𝑦 𝜑,𝑥,𝑦

Proof of Theorem fourierdlem39 Dummy variables 𝑤 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		fourierdlem39.a	. 2 ⊢ (𝜑 → 𝐴 ∈ ℝ)
2		fourierdlem39.b	. 2 ⊢ (𝜑 → 𝐵 ∈ ℝ)
3		fourierdlem39.aleb	. 2 ⊢ (𝜑 → 𝐴 ≤ 𝐵)
4		fourierdlem39.f	. . . . . 6 ⊢ (𝜑 → 𝐹 ∈ ((𝐴[,]𝐵)–cn→ℂ))
5		cncff 24842	. . . . . 6 ⊢ (𝐹 ∈ ((𝐴[,]𝐵)–cn→ℂ) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
6	4, 5	syl 17	. . . . 5 ⊢ (𝜑 → 𝐹:(𝐴[,]𝐵)⟶ℂ)
7	6	feqmptd 6902	. . . 4 ⊢ (𝜑 → 𝐹 = (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥)))
8	7	eqcomd 2742	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥)) = 𝐹)
9	8, 4	eqeltrd 2836	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
10		coscn 26411	. . . . . 6 ⊢ cos ∈ (ℂ–cn→ℂ)
11	10	a1i 11	. . . . 5 ⊢ (𝜑 → cos ∈ (ℂ–cn→ℂ))
12	1, 2	iccssred 13350	. . . . . . . 8 ⊢ (𝜑 → (𝐴[,]𝐵) ⊆ ℝ)
13		ax-resscn 11083	. . . . . . . 8 ⊢ ℝ ⊆ ℂ
14	12, 13	sstrdi 3946	. . . . . . 7 ⊢ (𝜑 → (𝐴[,]𝐵) ⊆ ℂ)
15		fourierdlem39.r	. . . . . . . . 9 ⊢ (𝜑 → 𝑅 ∈ ℝ⁺)
16	15	rpred 12949	. . . . . . . 8 ⊢ (𝜑 → 𝑅 ∈ ℝ)
17	16	recnd 11160	. . . . . . 7 ⊢ (𝜑 → 𝑅 ∈ ℂ)
18		ssid 3956	. . . . . . . 8 ⊢ ℂ ⊆ ℂ
19	18	a1i 11	. . . . . . 7 ⊢ (𝜑 → ℂ ⊆ ℂ)
20	14, 17, 19	constcncfg 46116	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ 𝑅) ∈ ((𝐴[,]𝐵)–cn→ℂ))
21	14, 19	idcncfg 46117	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ 𝑥) ∈ ((𝐴[,]𝐵)–cn→ℂ))
22	20, 21	mulcncf 25402	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝑅 · 𝑥)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
23	11, 22	cncfmpt1f 24863	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ (cos‘(𝑅 · 𝑥))) ∈ ((𝐴[,]𝐵)–cn→ℂ))
24	15	rpcnne0d 12958	. . . . . 6 ⊢ (𝜑 → (𝑅 ∈ ℂ ∧ 𝑅 ≠ 0))
25		eldifsn 4742	. . . . . 6 ⊢ (𝑅 ∈ (ℂ ∖ {0}) ↔ (𝑅 ∈ ℂ ∧ 𝑅 ≠ 0))
26	24, 25	sylibr 234	. . . . 5 ⊢ (𝜑 → 𝑅 ∈ (ℂ ∖ {0}))
27		difssd 4089	. . . . 5 ⊢ (𝜑 → (ℂ ∖ {0}) ⊆ ℂ)
28	14, 26, 27	constcncfg 46116	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ 𝑅) ∈ ((𝐴[,]𝐵)–cn→(ℂ ∖ {0})))
29	23, 28	divcncf 25404	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ ((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
30	29	negcncfg 46125	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
31		fourierdlem39.gcn	. . . . . 6 ⊢ (𝜑 → 𝐺 ∈ ((𝐴(,)𝐵)–cn→ℂ))
32		cncff 24842	. . . . . 6 ⊢ (𝐺 ∈ ((𝐴(,)𝐵)–cn→ℂ) → 𝐺:(𝐴(,)𝐵)⟶ℂ)
33	31, 32	syl 17	. . . . 5 ⊢ (𝜑 → 𝐺:(𝐴(,)𝐵)⟶ℂ)
34	33	feqmptd 6902	. . . 4 ⊢ (𝜑 → 𝐺 = (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐺‘𝑥)))
35	34	eqcomd 2742	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐺‘𝑥)) = 𝐺)
36	35, 31	eqeltrd 2836	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐺‘𝑥)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
37		sincn 26410	. . . 4 ⊢ sin ∈ (ℂ–cn→ℂ)
38	37	a1i 11	. . 3 ⊢ (𝜑 → sin ∈ (ℂ–cn→ℂ))
39		ioosscn 13324	. . . . . 6 ⊢ (𝐴(,)𝐵) ⊆ ℂ
40	39	a1i 11	. . . . 5 ⊢ (𝜑 → (𝐴(,)𝐵) ⊆ ℂ)
41	40, 17, 19	constcncfg 46116	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ 𝑅) ∈ ((𝐴(,)𝐵)–cn→ℂ))
42	40, 19	idcncfg 46117	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ 𝑥) ∈ ((𝐴(,)𝐵)–cn→ℂ))
43	41, 42	mulcncf 25402	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝑅 · 𝑥)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
44	38, 43	cncfmpt1f 24863	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (sin‘(𝑅 · 𝑥))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
45		ioombl 25522	. . . 4 ⊢ (𝐴(,)𝐵) ∈ dom vol
46	45	a1i 11	. . 3 ⊢ (𝜑 → (𝐴(,)𝐵) ∈ dom vol)
47		volioo 25526	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → (vol‘(𝐴(,)𝐵)) = (𝐵 − 𝐴))
48	1, 2, 3, 47	syl3anc 1373	. . . 4 ⊢ (𝜑 → (vol‘(𝐴(,)𝐵)) = (𝐵 − 𝐴))
49	2, 1	resubcld 11565	. . . 4 ⊢ (𝜑 → (𝐵 − 𝐴) ∈ ℝ)
50	48, 49	eqeltrd 2836	. . 3 ⊢ (𝜑 → (vol‘(𝐴(,)𝐵)) ∈ ℝ)
51		eqid 2736	. . . . 5 ⊢ (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥)) = (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥))
52		ioossicc 13349	. . . . . 6 ⊢ (𝐴(,)𝐵) ⊆ (𝐴[,]𝐵)
53	52	a1i 11	. . . . 5 ⊢ (𝜑 → (𝐴(,)𝐵) ⊆ (𝐴[,]𝐵))
54	6	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
55	53	sselda 3933	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑥 ∈ (𝐴[,]𝐵))
56	54, 55	ffvelcdmd 7030	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (𝐹‘𝑥) ∈ ℂ)
57	51, 9, 53, 19, 56	cncfmptssg 46115	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐹‘𝑥)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
58	57, 44	mulcncf 25402	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
59		cniccbdd 25418	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐹 ∈ ((𝐴[,]𝐵)–cn→ℂ)) → ∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
60	1, 2, 4, 59	syl3anc 1373	. . . . 5 ⊢ (𝜑 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
61		nfra1 3260	. . . . . . . 8 ⊢ Ⅎ𝑧∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦
62	52	sseli 3929	. . . . . . . . . 10 ⊢ (𝑧 ∈ (𝐴(,)𝐵) → 𝑧 ∈ (𝐴[,]𝐵))
63		rspa 3225	. . . . . . . . . 10 ⊢ ((∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 ∧ 𝑧 ∈ (𝐴[,]𝐵)) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
64	62, 63	sylan2 593	. . . . . . . . 9 ⊢ ((∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
65	64	ex 412	. . . . . . . 8 ⊢ (∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → (𝑧 ∈ (𝐴(,)𝐵) → (abs‘(𝐹‘𝑧)) ≤ 𝑦))
66	61, 65	ralrimi 3234	. . . . . . 7 ⊢ (∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
67	66	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦))
68	67	reximdva 3149	. . . . 5 ⊢ (𝜑 → (∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦))
69	60, 68	mpd 15	. . . 4 ⊢ (𝜑 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
70		nfv 1915	. . . . . . . 8 ⊢ Ⅎ𝑧(𝜑 ∧ 𝑦 ∈ ℝ)
71		nfra1 3260	. . . . . . . 8 ⊢ Ⅎ𝑧∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦
72	70, 71	nfan 1900	. . . . . . 7 ⊢ Ⅎ𝑧((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
73		simpll 766	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → (𝜑 ∧ 𝑦 ∈ ℝ))
74		simpr 484	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))))
75	16	adantr 480	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℝ)
76		elioore 13291	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ (𝐴(,)𝐵) → 𝑥 ∈ ℝ)
77	76	adantl 481	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑥 ∈ ℝ)
78	75, 77	remulcld 11162	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑥) ∈ ℝ)
79	78	resincld 16068	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (sin‘(𝑅 · 𝑥)) ∈ ℝ)
80	79	recnd 11160	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (sin‘(𝑅 · 𝑥)) ∈ ℂ)
81	56, 80	mulcld 11152	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) ∈ ℂ)
82	81	ralrimiva 3128	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∀𝑥 ∈ (𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) ∈ ℂ)
83		dmmptg 6200	. . . . . . . . . . . . 13 ⊢ (∀𝑥 ∈ (𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) ∈ ℂ → dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) = (𝐴(,)𝐵))
84	82, 83	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) = (𝐴(,)𝐵))
85	84	adantr 480	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) = (𝐴(,)𝐵))
86	74, 85	eleqtrd 2838	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → 𝑧 ∈ (𝐴(,)𝐵))
87	86	ad4ant14 752	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → 𝑧 ∈ (𝐴(,)𝐵))
88		simplr 768	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
89	86	adantlr 715	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → 𝑧 ∈ (𝐴(,)𝐵))
90		rspa 3225	. . . . . . . . . . 11 ⊢ ((∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
91	88, 89, 90	syl2anc 584	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
92	91	adantllr 719	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
93		eqidd 2737	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))))
94		fveq2 6834	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑧 → (𝐹‘𝑥) = (𝐹‘𝑧))
95		oveq2 7366	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = 𝑧 → (𝑅 · 𝑥) = (𝑅 · 𝑧))
96	95	fveq2d 6838	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑧 → (sin‘(𝑅 · 𝑥)) = (sin‘(𝑅 · 𝑧)))
97	94, 96	oveq12d 7376	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑧 → ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) = ((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧))))
98	97	adantl 481	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ 𝑥 = 𝑧) → ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) = ((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧))))
99		simpr 484	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ (𝐴(,)𝐵))
100	6	adantr 480	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
101	52, 99	sselid 3931	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ (𝐴[,]𝐵))
102	100, 101	ffvelcdmd 7030	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝐹‘𝑧) ∈ ℂ)
103	17	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℂ)
104	39, 99	sselid 3931	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ ℂ)
105	103, 104	mulcld 11152	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑧) ∈ ℂ)
106	105	sincld 16055	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (sin‘(𝑅 · 𝑧)) ∈ ℂ)
107	102, 106	mulcld 11152	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧))) ∈ ℂ)
108	93, 98, 99, 107	fvmptd 6948	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧) = ((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧))))
109	108	fveq2d 6838	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) = (abs‘((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧)))))
110	102, 106	absmuld 15380	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧)))) = ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))))
111	109, 110	eqtrd 2771	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) = ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))))
112	111	adantlr 715	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) = ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))))
113	112	adantr 480	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) = ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))))
114		simplll 774	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝜑)
115		simplr 768	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑧 ∈ (𝐴(,)𝐵))
116	114, 115, 102	syl2anc 584	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝐹‘𝑧) ∈ ℂ)
117	116	abscld 15362	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘(𝐹‘𝑧)) ∈ ℝ)
118	17	ad3antrrr 730	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑅 ∈ ℂ)
119	39, 115	sselid 3931	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑧 ∈ ℂ)
120	118, 119	mulcld 11152	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝑅 · 𝑧) ∈ ℂ)
121	120	sincld 16055	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (sin‘(𝑅 · 𝑧)) ∈ ℂ)
122	121	abscld 15362	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘(sin‘(𝑅 · 𝑧))) ∈ ℝ)
123	117, 122	remulcld 11162	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ∈ ℝ)
124		1red 11133	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 1 ∈ ℝ)
125	117, 124	remulcld 11162	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · 1) ∈ ℝ)
126		simpllr 775	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑦 ∈ ℝ)
127	126, 124	remulcld 11162	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝑦 · 1) ∈ ℝ)
128	106	abscld 15362	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(sin‘(𝑅 · 𝑧))) ∈ ℝ)
129		1red 11133	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 1 ∈ ℝ)
130	102	abscld 15362	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐹‘𝑧)) ∈ ℝ)
131	102	absge0d 15370	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 0 ≤ (abs‘(𝐹‘𝑧)))
132	16	adantr 480	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℝ)
133		elioore 13291	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑧 ∈ (𝐴(,)𝐵) → 𝑧 ∈ ℝ)
134	133	adantl 481	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ ℝ)
135	132, 134	remulcld 11162	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑧) ∈ ℝ)
136		abssinbd 45543	. . . . . . . . . . . . . . . 16 ⊢ ((𝑅 · 𝑧) ∈ ℝ → (abs‘(sin‘(𝑅 · 𝑧))) ≤ 1)
137	135, 136	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(sin‘(𝑅 · 𝑧))) ≤ 1)
138	128, 129, 130, 131, 137	lemul2ad 12082	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ≤ ((abs‘(𝐹‘𝑧)) · 1))
139	138	adantlr 715	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ≤ ((abs‘(𝐹‘𝑧)) · 1))
140	139	adantr 480	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ≤ ((abs‘(𝐹‘𝑧)) · 1))
141		0le1 11660	. . . . . . . . . . . . . 14 ⊢ 0 ≤ 1
142	141	a1i 11	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 0 ≤ 1)
143		simpr 484	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
144	117, 126, 124, 142, 143	lemul1ad 12081	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · 1) ≤ (𝑦 · 1))
145	123, 125, 127, 140, 144	letrd 11290	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ≤ (𝑦 · 1))
146	113, 145	eqbrtrd 5120	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ (𝑦 · 1))
147	126	recnd 11160	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑦 ∈ ℂ)
148	147	mulridd 11149	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝑦 · 1) = 𝑦)
149	146, 148	breqtrd 5124	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦)
150	73, 87, 92, 149	syl21anc 837	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦)
151	150	ex 412	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦))
152	72, 151	ralrimi 3234	. . . . . 6 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) → ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦)
153	152	ex 412	. . . . 5 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦))
154	153	reximdva 3149	. . . 4 ⊢ (𝜑 → (∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦))
155	69, 154	mpd 15	. . 3 ⊢ (𝜑 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦)
156	46, 50, 58, 155	cnbdibl 46206	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) ∈ 𝐿¹)
157	11, 43	cncfmpt1f 24863	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (cos‘(𝑅 · 𝑥))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
158	40, 26, 27	constcncfg 46116	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ 𝑅) ∈ ((𝐴(,)𝐵)–cn→(ℂ ∖ {0})))
159	157, 158	divcncf 25404	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
160	159	negcncfg 46125	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
161	36, 160	mulcncf 25402	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
162		simpr 484	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℝ)
163	16	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑅 ∈ ℝ)
164	15	rpne0d 12954	. . . . . . . 8 ⊢ (𝜑 → 𝑅 ≠ 0)
165	164	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑅 ≠ 0)
166	162, 163, 165	redivcld 11969	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (𝑦 / 𝑅) ∈ ℝ)
167	166	adantr 480	. . . . 5 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) → (𝑦 / 𝑅) ∈ ℝ)
168		simpr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))))
169	33	ffvelcdmda 7029	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (𝐺‘𝑥) ∈ ℂ)
170	17	adantr 480	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℂ)
171	76	recnd 11160	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 ∈ (𝐴(,)𝐵) → 𝑥 ∈ ℂ)
172	171	adantl 481	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑥 ∈ ℂ)
173	170, 172	mulcld 11152	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑥) ∈ ℂ)
174	173	coscld 16056	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (cos‘(𝑅 · 𝑥)) ∈ ℂ)
175	164	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑅 ≠ 0)
176	174, 170, 175	divcld 11917	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((cos‘(𝑅 · 𝑥)) / 𝑅) ∈ ℂ)
177	176	negcld 11479	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → -((cos‘(𝑅 · 𝑥)) / 𝑅) ∈ ℂ)
178	169, 177	mulcld 11152	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ℂ)
179	178	ralrimiva 3128	. . . . . . . . . . 11 ⊢ (𝜑 → ∀𝑥 ∈ (𝐴(,)𝐵)((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ℂ)
180	179	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → ∀𝑥 ∈ (𝐴(,)𝐵)((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ℂ)
181		dmmptg 6200	. . . . . . . . . 10 ⊢ (∀𝑥 ∈ (𝐴(,)𝐵)((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ℂ → dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝐴(,)𝐵))
182	180, 181	syl 17	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝐴(,)𝐵))
183	168, 182	eleqtrd 2838	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → 𝑧 ∈ (𝐴(,)𝐵))
184	183	ad4ant14 752	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → 𝑧 ∈ (𝐴(,)𝐵))
185		eqidd 2737	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))))
186		fveq2 6834	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑧 → (𝐺‘𝑥) = (𝐺‘𝑧))
187	95	fveq2d 6838	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑧 → (cos‘(𝑅 · 𝑥)) = (cos‘(𝑅 · 𝑧)))
188	187	oveq1d 7373	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑧 → ((cos‘(𝑅 · 𝑥)) / 𝑅) = ((cos‘(𝑅 · 𝑧)) / 𝑅))
189	188	negeqd 11374	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑧 → -((cos‘(𝑅 · 𝑥)) / 𝑅) = -((cos‘(𝑅 · 𝑧)) / 𝑅))
190	186, 189	oveq12d 7376	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑧 → ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅)))
191	190	adantl 481	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ 𝑥 = 𝑧) → ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅)))
192	33	ffvelcdmda 7029	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝐺‘𝑧) ∈ ℂ)
193	105	coscld 16056	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (cos‘(𝑅 · 𝑧)) ∈ ℂ)
194	164	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ≠ 0)
195	193, 103, 194	divcld 11917	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((cos‘(𝑅 · 𝑧)) / 𝑅) ∈ ℂ)
196	195	negcld 11479	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → -((cos‘(𝑅 · 𝑧)) / 𝑅) ∈ ℂ)
197	192, 196	mulcld 11152	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅)) ∈ ℂ)
198	185, 191, 99, 197	fvmptd 6948	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧) = ((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅)))
199	198	fveq2d 6838	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) = (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))))
200	199	ad4ant14 752	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) = (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))))
201	33	ad2antrr 726	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) → 𝐺:(𝐴(,)𝐵)⟶ℂ)
202	201	ffvelcdmda 7029	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝐺‘𝑧) ∈ ℂ)
203	202	abscld 15362	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐺‘𝑧)) ∈ ℝ)
204		simpllr 775	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑦 ∈ ℝ)
205	17	ad3antrrr 730	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℂ)
206	104	ad4ant14 752	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ ℂ)
207	205, 206	mulcld 11152	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑧) ∈ ℂ)
208	207	coscld 16056	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (cos‘(𝑅 · 𝑧)) ∈ ℂ)
209	164	ad3antrrr 730	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ≠ 0)
210	208, 205, 209	divcld 11917	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((cos‘(𝑅 · 𝑧)) / 𝑅) ∈ ℂ)
211	210	negcld 11479	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → -((cos‘(𝑅 · 𝑧)) / 𝑅) ∈ ℂ)
212	211	abscld 15362	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) ∈ ℝ)
213	15	rprecred 12960	. . . . . . . . . . 11 ⊢ (𝜑 → (1 / 𝑅) ∈ ℝ)
214	213	ad3antrrr 730	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (1 / 𝑅) ∈ ℝ)
215	202	absge0d 15370	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 0 ≤ (abs‘(𝐺‘𝑧)))
216	211	absge0d 15370	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 0 ≤ (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)))
217	186	fveq2d 6838	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑧 → (abs‘(𝐺‘𝑥)) = (abs‘(𝐺‘𝑧)))
218	217	breq1d 5108	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑧 → ((abs‘(𝐺‘𝑥)) ≤ 𝑦 ↔ (abs‘(𝐺‘𝑧)) ≤ 𝑦))
219	218	rspccva 3575	. . . . . . . . . . 11 ⊢ ((∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐺‘𝑧)) ≤ 𝑦)
220	219	adantll 714	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐺‘𝑧)) ≤ 𝑦)
221	195	absnegd 15375	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) = (abs‘((cos‘(𝑅 · 𝑧)) / 𝑅)))
222	193, 103, 194	absdivd 15381	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((cos‘(𝑅 · 𝑧)) / 𝑅)) = ((abs‘(cos‘(𝑅 · 𝑧))) / (abs‘𝑅)))
223	15	rpge0d 12953	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 0 ≤ 𝑅)
224	16, 223	absidd 15346	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (abs‘𝑅) = 𝑅)
225	224	oveq2d 7374	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((abs‘(cos‘(𝑅 · 𝑧))) / (abs‘𝑅)) = ((abs‘(cos‘(𝑅 · 𝑧))) / 𝑅))
226	225	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(cos‘(𝑅 · 𝑧))) / (abs‘𝑅)) = ((abs‘(cos‘(𝑅 · 𝑧))) / 𝑅))
227	221, 222, 226	3eqtrd 2775	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) = ((abs‘(cos‘(𝑅 · 𝑧))) / 𝑅))
228	193	abscld 15362	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(cos‘(𝑅 · 𝑧))) ∈ ℝ)
229	15	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℝ⁺)
230		abscosbd 45527	. . . . . . . . . . . . . 14 ⊢ ((𝑅 · 𝑧) ∈ ℝ → (abs‘(cos‘(𝑅 · 𝑧))) ≤ 1)
231	135, 230	syl 17	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(cos‘(𝑅 · 𝑧))) ≤ 1)
232	228, 129, 229, 231	lediv1dd 13007	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(cos‘(𝑅 · 𝑧))) / 𝑅) ≤ (1 / 𝑅))
233	227, 232	eqbrtrd 5120	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) ≤ (1 / 𝑅))
234	233	ad4ant14 752	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) ≤ (1 / 𝑅))
235	203, 204, 212, 214, 215, 216, 220, 234	lemul12ad 12084	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(𝐺‘𝑧)) · (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅))) ≤ (𝑦 · (1 / 𝑅)))
236	192, 196	absmuld 15380	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))) = ((abs‘(𝐺‘𝑧)) · (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅))))
237	236	ad4ant14 752	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))) = ((abs‘(𝐺‘𝑧)) · (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅))))
238	204	recnd 11160	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑦 ∈ ℂ)
239	238, 205, 209	divrecd 11920	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑦 / 𝑅) = (𝑦 · (1 / 𝑅)))
240	235, 237, 239	3brtr4d 5130	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))) ≤ (𝑦 / 𝑅))
241	200, 240	eqbrtrd 5120	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅))
242	184, 241	syldan 591	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅))
243	242	ralrimiva 3128	. . . . 5 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) → ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅))
244		breq2 5102	. . . . . . 7 ⊢ (𝑤 = (𝑦 / 𝑅) → ((abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤 ↔ (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅)))
245	244	ralbidv 3159	. . . . . 6 ⊢ (𝑤 = (𝑦 / 𝑅) → (∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤 ↔ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅)))
246	245	rspcev 3576	. . . . 5 ⊢ (((𝑦 / 𝑅) ∈ ℝ ∧ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅)) → ∃𝑤 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤)
247	167, 243, 246	syl2anc 584	. . . 4 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) → ∃𝑤 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤)
248		fourierdlem39.gbd	. . . 4 ⊢ (𝜑 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦)
249	247, 248	r19.29a 3144	. . 3 ⊢ (𝜑 → ∃𝑤 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤)
250	46, 50, 161, 249	cnbdibl 46206	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) ∈ 𝐿¹)
251	8	oveq2d 7374	. . 3 ⊢ (𝜑 → (ℝ D (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥))) = (ℝ D 𝐹))
252		fourierdlem39.g	. . . . 5 ⊢ 𝐺 = (ℝ D 𝐹)
253	252	eqcomi 2745	. . . 4 ⊢ (ℝ D 𝐹) = 𝐺
254	253	a1i 11	. . 3 ⊢ (𝜑 → (ℝ D 𝐹) = 𝐺)
255	251, 254, 34	3eqtrd 2775	. 2 ⊢ (𝜑 → (ℝ D (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐺‘𝑥)))
256		reelprrecn 11118	. . . . 5 ⊢ ℝ ∈ {ℝ, ℂ}
257	256	a1i 11	. . . 4 ⊢ (𝜑 → ℝ ∈ {ℝ, ℂ})
258	17	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑅 ∈ ℂ)
259		recn 11116	. . . . . . . . 9 ⊢ (𝑥 ∈ ℝ → 𝑥 ∈ ℂ)
260	259	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℂ)
261	258, 260	mulcld 11152	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑅 · 𝑥) ∈ ℂ)
262	261	coscld 16056	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (cos‘(𝑅 · 𝑥)) ∈ ℂ)
263	164	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑅 ≠ 0)
264	262, 258, 263	divcld 11917	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ((cos‘(𝑅 · 𝑥)) / 𝑅) ∈ ℂ)
265	264	negcld 11479	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → -((cos‘(𝑅 · 𝑥)) / 𝑅) ∈ ℂ)
266	16	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑅 ∈ ℝ)
267		simpr 484	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
268	266, 267	remulcld 11162	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑅 · 𝑥) ∈ ℝ)
269	268	resincld 16068	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (sin‘(𝑅 · 𝑥)) ∈ ℝ)
270	269	renegcld 11564	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → -(sin‘(𝑅 · 𝑥)) ∈ ℝ)
271	270, 266	remulcld 11162	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (-(sin‘(𝑅 · 𝑥)) · 𝑅) ∈ ℝ)
272	271, 266, 263	redivcld 11969	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) ∈ ℝ)
273	272	renegcld 11564	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) ∈ ℝ)
274		recoscl 16066	. . . . . . . . 9 ⊢ (𝑦 ∈ ℝ → (cos‘𝑦) ∈ ℝ)
275	274	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (cos‘𝑦) ∈ ℝ)
276	275	recnd 11160	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (cos‘𝑦) ∈ ℂ)
277		resincl 16065	. . . . . . . . 9 ⊢ (𝑦 ∈ ℝ → (sin‘𝑦) ∈ ℝ)
278	277	renegcld 11564	. . . . . . . 8 ⊢ (𝑦 ∈ ℝ → -(sin‘𝑦) ∈ ℝ)
279	278	adantl 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → -(sin‘𝑦) ∈ ℝ)
280		1red 11133	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 1 ∈ ℝ)
281	257	dvmptid 25917	. . . . . . . . 9 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ 𝑥)) = (𝑥 ∈ ℝ ↦ 1))
282	257, 260, 280, 281, 17	dvmptcmul 25924	. . . . . . . 8 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ (𝑅 · 𝑥))) = (𝑥 ∈ ℝ ↦ (𝑅 · 1)))
283	258	mulridd 11149	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑅 · 1) = 𝑅)
284	283	mpteq2dva 5191	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ (𝑅 · 1)) = (𝑥 ∈ ℝ ↦ 𝑅))
285	282, 284	eqtrd 2771	. . . . . . 7 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ (𝑅 · 𝑥))) = (𝑥 ∈ ℝ ↦ 𝑅))
286		dvcosre 46156	. . . . . . . 8 ⊢ (ℝ D (𝑦 ∈ ℝ ↦ (cos‘𝑦))) = (𝑦 ∈ ℝ ↦ -(sin‘𝑦))
287	286	a1i 11	. . . . . . 7 ⊢ (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ (cos‘𝑦))) = (𝑦 ∈ ℝ ↦ -(sin‘𝑦)))
288		fveq2 6834	. . . . . . 7 ⊢ (𝑦 = (𝑅 · 𝑥) → (cos‘𝑦) = (cos‘(𝑅 · 𝑥)))
289		fveq2 6834	. . . . . . . 8 ⊢ (𝑦 = (𝑅 · 𝑥) → (sin‘𝑦) = (sin‘(𝑅 · 𝑥)))
290	289	negeqd 11374	. . . . . . 7 ⊢ (𝑦 = (𝑅 · 𝑥) → -(sin‘𝑦) = -(sin‘(𝑅 · 𝑥)))
291	257, 257, 268, 266, 276, 279, 285, 287, 288, 290	dvmptco 25932	. . . . . 6 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ (cos‘(𝑅 · 𝑥)))) = (𝑥 ∈ ℝ ↦ (-(sin‘(𝑅 · 𝑥)) · 𝑅)))
292	257, 262, 271, 291, 17, 164	dvmptdivc 25925	. . . . 5 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ ((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ ℝ ↦ ((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅)))
293	257, 264, 272, 292	dvmptneg 25926	. . . 4 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ ℝ ↦ -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅)))
294		tgioo4 24749	. . . 4 ⊢ (topGen‘ran (,)) = ((TopOpen‘ℂ_fld) ↾_t ℝ)
295		eqid 2736	. . . 4 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
296		iccntr 24766	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ((int‘(topGen‘ran (,)))‘(𝐴[,]𝐵)) = (𝐴(,)𝐵))
297	1, 2, 296	syl2anc 584	. . . 4 ⊢ (𝜑 → ((int‘(topGen‘ran (,)))‘(𝐴[,]𝐵)) = (𝐴(,)𝐵))
298	257, 265, 273, 293, 12, 294, 295, 297	dvmptres2 25922	. . 3 ⊢ (𝜑 → (ℝ D (𝑥 ∈ (𝐴[,]𝐵) ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅)))
299	80, 170	mulneg1d 11590	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (-(sin‘(𝑅 · 𝑥)) · 𝑅) = -((sin‘(𝑅 · 𝑥)) · 𝑅))
300	299	oveq1d 7373	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (-((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
301	80, 170	mulcld 11152	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((sin‘(𝑅 · 𝑥)) · 𝑅) ∈ ℂ)
302	301, 170, 175	divnegd 11930	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → -(((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (-((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
303	300, 302	eqtr4d 2774	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = -(((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
304	303	negeqd 11374	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = --(((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
305	301, 170, 175	divcld 11917	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) ∈ ℂ)
306	305	negnegd 11483	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → --(((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
307	80, 170, 175	divcan4d 11923	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (sin‘(𝑅 · 𝑥)))
308	304, 306, 307	3eqtrd 2775	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (sin‘(𝑅 · 𝑥)))
309	308	mpteq2dva 5191	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅)) = (𝑥 ∈ (𝐴(,)𝐵) ↦ (sin‘(𝑅 · 𝑥))))
310	298, 309	eqtrd 2771	. 2 ⊢ (𝜑 → (ℝ D (𝑥 ∈ (𝐴[,]𝐵) ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ (sin‘(𝑅 · 𝑥))))
311		fveq2 6834	. . . 4 ⊢ (𝑥 = 𝐴 → (𝐹‘𝑥) = (𝐹‘𝐴))
312		oveq2 7366	. . . . . . 7 ⊢ (𝑥 = 𝐴 → (𝑅 · 𝑥) = (𝑅 · 𝐴))
313	312	fveq2d 6838	. . . . . 6 ⊢ (𝑥 = 𝐴 → (cos‘(𝑅 · 𝑥)) = (cos‘(𝑅 · 𝐴)))
314	313	oveq1d 7373	. . . . 5 ⊢ (𝑥 = 𝐴 → ((cos‘(𝑅 · 𝑥)) / 𝑅) = ((cos‘(𝑅 · 𝐴)) / 𝑅))
315	314	negeqd 11374	. . . 4 ⊢ (𝑥 = 𝐴 → -((cos‘(𝑅 · 𝑥)) / 𝑅) = -((cos‘(𝑅 · 𝐴)) / 𝑅))
316	311, 315	oveq12d 7376	. . 3 ⊢ (𝑥 = 𝐴 → ((𝐹‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐹‘𝐴) · -((cos‘(𝑅 · 𝐴)) / 𝑅)))
317	316	adantl 481	. 2 ⊢ ((𝜑 ∧ 𝑥 = 𝐴) → ((𝐹‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐹‘𝐴) · -((cos‘(𝑅 · 𝐴)) / 𝑅)))
318		fveq2 6834	. . . 4 ⊢ (𝑥 = 𝐵 → (𝐹‘𝑥) = (𝐹‘𝐵))
319		oveq2 7366	. . . . . . 7 ⊢ (𝑥 = 𝐵 → (𝑅 · 𝑥) = (𝑅 · 𝐵))
320	319	fveq2d 6838	. . . . . 6 ⊢ (𝑥 = 𝐵 → (cos‘(𝑅 · 𝑥)) = (cos‘(𝑅 · 𝐵)))
321	320	oveq1d 7373	. . . . 5 ⊢ (𝑥 = 𝐵 → ((cos‘(𝑅 · 𝑥)) / 𝑅) = ((cos‘(𝑅 · 𝐵)) / 𝑅))
322	321	negeqd 11374	. . . 4 ⊢ (𝑥 = 𝐵 → -((cos‘(𝑅 · 𝑥)) / 𝑅) = -((cos‘(𝑅 · 𝐵)) / 𝑅))
323	318, 322	oveq12d 7376	. . 3 ⊢ (𝑥 = 𝐵 → ((𝐹‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐹‘𝐵) · -((cos‘(𝑅 · 𝐵)) / 𝑅)))
324	323	adantl 481	. 2 ⊢ ((𝜑 ∧ 𝑥 = 𝐵) → ((𝐹‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐹‘𝐵) · -((cos‘(𝑅 · 𝐵)) / 𝑅)))
325	1, 2, 3, 9, 30, 36, 44, 156, 250, 255, 310, 317, 324	itgparts 26010	1 ⊢ (𝜑 → ∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) d𝑥 = ((((𝐹‘𝐵) · -((cos‘(𝑅 · 𝐵)) / 𝑅)) − ((𝐹‘𝐴) · -((cos‘(𝑅 · 𝐴)) / 𝑅))) − ∫(𝐴(,)𝐵)((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) d𝑥))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1541 ∈ wcel 2113 ≠ wne 2932 ∀wral 3051 ∃wrex 3060 ∖ cdif 3898 ⊆ wss 3901 {csn 4580 {cpr 4582 class class class wbr 5098 ↦ cmpt 5179 dom cdm 5624 ran crn 5625 ⟶wf 6488 ‘cfv 6492 (class class class)co 7358 ℂcc 11024 ℝcr 11025 0cc0 11026 1c1 11027 · cmul 11031 ≤ cle 11167 − cmin 11364 -cneg 11365 / cdiv 11794 ℝ⁺crp 12905 (,)cioo 13261 [,]cicc 13264 abscabs 15157 sincsin 15986 cosccos 15987 TopOpenctopn 17341 topGenctg 17357 ℂ_fldccnfld 21309 intcnt 22961 –cn→ccncf 24825 volcvol 25420 ∫citg 25575 D cdv 25820

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1968 ax-7 2009 ax-8 2115 ax-9 2123 ax-10 2146 ax-11 2162 ax-12 2184 ax-ext 2708 ax-rep 5224 ax-sep 5241 ax-nul 5251 ax-pow 5310 ax-pr 5377 ax-un 7680 ax-inf2 9550 ax-cc 10345 ax-cnex 11082 ax-resscn 11083 ax-1cn 11084 ax-icn 11085 ax-addcl 11086 ax-addrcl 11087 ax-mulcl 11088 ax-mulrcl 11089 ax-mulcom 11090 ax-addass 11091 ax-mulass 11092 ax-distr 11093 ax-i2m1 11094 ax-1ne0 11095 ax-1rid 11096 ax-rnegex 11097 ax-rrecex 11098 ax-cnre 11099 ax-pre-lttri 11100 ax-pre-lttrn 11101 ax-pre-ltadd 11102 ax-pre-mulgt0 11103 ax-pre-sup 11104 ax-addf 11105

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1544 df-fal 1554 df-ex 1781 df-nf 1785 df-sb 2068 df-mo 2539 df-eu 2569 df-clab 2715 df-cleq 2728 df-clel 2811 df-nfc 2885 df-ne 2933 df-nel 3037 df-ral 3052 df-rex 3061 df-rmo 3350 df-reu 3351 df-rab 3400 df-v 3442 df-sbc 3741 df-csb 3850 df-dif 3904 df-un 3906 df-in 3908 df-ss 3918 df-pss 3921 df-symdif 4205 df-nul 4286 df-if 4480 df-pw 4556 df-sn 4581 df-pr 4583 df-tp 4585 df-op 4587 df-uni 4864 df-int 4903 df-iun 4948 df-iin 4949 df-disj 5066 df-br 5099 df-opab 5161 df-mpt 5180 df-tr 5206 df-id 5519 df-eprel 5524 df-po 5532 df-so 5533 df-fr 5577 df-se 5578 df-we 5579 df-xp 5630 df-rel 5631 df-cnv 5632 df-co 5633 df-dm 5634 df-rn 5635 df-res 5636 df-ima 5637 df-pred 6259 df-ord 6320 df-on 6321 df-lim 6322 df-suc 6323 df-iota 6448 df-fun 6494 df-fn 6495 df-f 6496 df-f1 6497 df-fo 6498 df-f1o 6499 df-fv 6500 df-isom 6501 df-riota 7315 df-ov 7361 df-oprab 7362 df-mpo 7363 df-of 7622 df-ofr 7623 df-om 7809 df-1st 7933 df-2nd 7934 df-supp 8103 df-frecs 8223 df-wrecs 8254 df-recs 8303 df-rdg 8341 df-1o 8397 df-2o 8398 df-oadd 8401 df-omul 8402 df-er 8635 df-map 8765 df-pm 8766 df-ixp 8836 df-en 8884 df-dom 8885 df-sdom 8886 df-fin 8887 df-fsupp 9265 df-fi 9314 df-sup 9345 df-inf 9346 df-oi 9415 df-dju 9813 df-card 9851 df-acn 9854 df-pnf 11168 df-mnf 11169 df-xr 11170 df-ltxr 11171 df-le 11172 df-sub 11366 df-neg 11367 df-div 11795 df-nn 12146 df-2 12208 df-3 12209 df-4 12210 df-5 12211 df-6 12212 df-7 12213 df-8 12214 df-9 12215 df-n0 12402 df-z 12489 df-dec 12608 df-uz 12752 df-q 12862 df-rp 12906 df-xneg 13026 df-xadd 13027 df-xmul 13028 df-ioo 13265 df-ioc 13266 df-ico 13267 df-icc 13268 df-fz 13424 df-fzo 13571 df-fl 13712 df-mod 13790 df-seq 13925 df-exp 13985 df-fac 14197 df-bc 14226 df-hash 14254 df-shft 14990 df-cj 15022 df-re 15023 df-im 15024 df-sqrt 15158 df-abs 15159 df-limsup 15394 df-clim 15411 df-rlim 15412 df-sum 15610 df-ef 15990 df-sin 15992 df-cos 15993 df-struct 17074 df-sets 17091 df-slot 17109 df-ndx 17121 df-base 17137 df-ress 17158 df-plusg 17190 df-mulr 17191 df-starv 17192 df-sca 17193 df-vsca 17194 df-ip 17195 df-tset 17196 df-ple 17197 df-ds 17199 df-unif 17200 df-hom 17201 df-cco 17202 df-rest 17342 df-topn 17343 df-0g 17361 df-gsum 17362 df-topgen 17363 df-pt 17364 df-prds 17367 df-xrs 17423 df-qtop 17428 df-imas 17429 df-xps 17431 df-mre 17505 df-mrc 17506 df-acs 17508 df-mgm 18565 df-sgrp 18644 df-mnd 18660 df-submnd 18709 df-mulg 18998 df-cntz 19246 df-cmn 19711 df-psmet 21301 df-xmet 21302 df-met 21303 df-bl 21304 df-mopn 21305 df-fbas 21306 df-fg 21307 df-cnfld 21310 df-top 22838 df-topon 22855 df-topsp 22877 df-bases 22890 df-cld 22963 df-ntr 22964 df-cls 22965 df-nei 23042 df-lp 23080 df-perf 23081 df-cn 23171 df-cnp 23172 df-haus 23259 df-cmp 23331 df-tx 23506 df-hmeo 23699 df-fil 23790 df-fm 23882 df-flim 23883 df-flf 23884 df-xms 24264 df-ms 24265 df-tms 24266 df-cncf 24827 df-ovol 25421 df-vol 25422 df-mbf 25576 df-itg1 25577 df-itg2 25578 df-ibl 25579 df-itg 25580 df-0p 25627 df-limc 25823 df-dv 25824

This theorem is referenced by: fourierdlem73 46423

W3C validator