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 46504

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 24854	. . . . . 6 ⊢ (𝐹 ∈ ((𝐴[,]𝐵)–cn→ℂ) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
6	4, 5	syl 17	. . . . 5 ⊢ (𝜑 → 𝐹:(𝐴[,]𝐵)⟶ℂ)
7	6	feqmptd 6910	. . . 4 ⊢ (𝜑 → 𝐹 = (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥)))
8	7	eqcomd 2743	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥)) = 𝐹)
9	8, 4	eqeltrd 2837	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
10		coscn 26423	. . . . . 6 ⊢ cos ∈ (ℂ–cn→ℂ)
11	10	a1i 11	. . . . 5 ⊢ (𝜑 → cos ∈ (ℂ–cn→ℂ))
12	1, 2	iccssred 13362	. . . . . . . 8 ⊢ (𝜑 → (𝐴[,]𝐵) ⊆ ℝ)
13		ax-resscn 11095	. . . . . . . 8 ⊢ ℝ ⊆ ℂ
14	12, 13	sstrdi 3948	. . . . . . 7 ⊢ (𝜑 → (𝐴[,]𝐵) ⊆ ℂ)
15		fourierdlem39.r	. . . . . . . . 9 ⊢ (𝜑 → 𝑅 ∈ ℝ⁺)
16	15	rpred 12961	. . . . . . . 8 ⊢ (𝜑 → 𝑅 ∈ ℝ)
17	16	recnd 11172	. . . . . . 7 ⊢ (𝜑 → 𝑅 ∈ ℂ)
18		ssid 3958	. . . . . . . 8 ⊢ ℂ ⊆ ℂ
19	18	a1i 11	. . . . . . 7 ⊢ (𝜑 → ℂ ⊆ ℂ)
20	14, 17, 19	constcncfg 46230	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ 𝑅) ∈ ((𝐴[,]𝐵)–cn→ℂ))
21	14, 19	idcncfg 46231	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ 𝑥) ∈ ((𝐴[,]𝐵)–cn→ℂ))
22	20, 21	mulcncf 25414	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝑅 · 𝑥)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
23	11, 22	cncfmpt1f 24875	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ (cos‘(𝑅 · 𝑥))) ∈ ((𝐴[,]𝐵)–cn→ℂ))
24	15	rpcnne0d 12970	. . . . . 6 ⊢ (𝜑 → (𝑅 ∈ ℂ ∧ 𝑅 ≠ 0))
25		eldifsn 4744	. . . . . 6 ⊢ (𝑅 ∈ (ℂ ∖ {0}) ↔ (𝑅 ∈ ℂ ∧ 𝑅 ≠ 0))
26	24, 25	sylibr 234	. . . . 5 ⊢ (𝜑 → 𝑅 ∈ (ℂ ∖ {0}))
27		difssd 4091	. . . . 5 ⊢ (𝜑 → (ℂ ∖ {0}) ⊆ ℂ)
28	14, 26, 27	constcncfg 46230	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ 𝑅) ∈ ((𝐴[,]𝐵)–cn→(ℂ ∖ {0})))
29	23, 28	divcncf 25416	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ ((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
30	29	negcncfg 46239	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
31		fourierdlem39.gcn	. . . . . 6 ⊢ (𝜑 → 𝐺 ∈ ((𝐴(,)𝐵)–cn→ℂ))
32		cncff 24854	. . . . . 6 ⊢ (𝐺 ∈ ((𝐴(,)𝐵)–cn→ℂ) → 𝐺:(𝐴(,)𝐵)⟶ℂ)
33	31, 32	syl 17	. . . . 5 ⊢ (𝜑 → 𝐺:(𝐴(,)𝐵)⟶ℂ)
34	33	feqmptd 6910	. . . 4 ⊢ (𝜑 → 𝐺 = (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐺‘𝑥)))
35	34	eqcomd 2743	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐺‘𝑥)) = 𝐺)
36	35, 31	eqeltrd 2837	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐺‘𝑥)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
37		sincn 26422	. . . 4 ⊢ sin ∈ (ℂ–cn→ℂ)
38	37	a1i 11	. . 3 ⊢ (𝜑 → sin ∈ (ℂ–cn→ℂ))
39		ioosscn 13336	. . . . . 6 ⊢ (𝐴(,)𝐵) ⊆ ℂ
40	39	a1i 11	. . . . 5 ⊢ (𝜑 → (𝐴(,)𝐵) ⊆ ℂ)
41	40, 17, 19	constcncfg 46230	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ 𝑅) ∈ ((𝐴(,)𝐵)–cn→ℂ))
42	40, 19	idcncfg 46231	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ 𝑥) ∈ ((𝐴(,)𝐵)–cn→ℂ))
43	41, 42	mulcncf 25414	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝑅 · 𝑥)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
44	38, 43	cncfmpt1f 24875	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (sin‘(𝑅 · 𝑥))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
45		ioombl 25534	. . . 4 ⊢ (𝐴(,)𝐵) ∈ dom vol
46	45	a1i 11	. . 3 ⊢ (𝜑 → (𝐴(,)𝐵) ∈ dom vol)
47		volioo 25538	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → (vol‘(𝐴(,)𝐵)) = (𝐵 − 𝐴))
48	1, 2, 3, 47	syl3anc 1374	. . . 4 ⊢ (𝜑 → (vol‘(𝐴(,)𝐵)) = (𝐵 − 𝐴))
49	2, 1	resubcld 11577	. . . 4 ⊢ (𝜑 → (𝐵 − 𝐴) ∈ ℝ)
50	48, 49	eqeltrd 2837	. . 3 ⊢ (𝜑 → (vol‘(𝐴(,)𝐵)) ∈ ℝ)
51		eqid 2737	. . . . 5 ⊢ (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥)) = (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥))
52		ioossicc 13361	. . . . . 6 ⊢ (𝐴(,)𝐵) ⊆ (𝐴[,]𝐵)
53	52	a1i 11	. . . . 5 ⊢ (𝜑 → (𝐴(,)𝐵) ⊆ (𝐴[,]𝐵))
54	6	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
55	53	sselda 3935	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑥 ∈ (𝐴[,]𝐵))
56	54, 55	ffvelcdmd 7039	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (𝐹‘𝑥) ∈ ℂ)
57	51, 9, 53, 19, 56	cncfmptssg 46229	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐹‘𝑥)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
58	57, 44	mulcncf 25414	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
59		cniccbdd 25430	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐹 ∈ ((𝐴[,]𝐵)–cn→ℂ)) → ∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
60	1, 2, 4, 59	syl3anc 1374	. . . . 5 ⊢ (𝜑 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
61		nfra1 3262	. . . . . . . 8 ⊢ Ⅎ𝑧∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦
62	52	sseli 3931	. . . . . . . . . 10 ⊢ (𝑧 ∈ (𝐴(,)𝐵) → 𝑧 ∈ (𝐴[,]𝐵))
63		rspa 3227	. . . . . . . . . 10 ⊢ ((∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 ∧ 𝑧 ∈ (𝐴[,]𝐵)) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
64	62, 63	sylan2 594	. . . . . . . . 9 ⊢ ((∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
65	64	ex 412	. . . . . . . 8 ⊢ (∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → (𝑧 ∈ (𝐴(,)𝐵) → (abs‘(𝐹‘𝑧)) ≤ 𝑦))
66	61, 65	ralrimi 3236	. . . . . . 7 ⊢ (∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
67	66	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦))
68	67	reximdva 3151	. . . . 5 ⊢ (𝜑 → (∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦))
69	60, 68	mpd 15	. . . 4 ⊢ (𝜑 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
70		nfv 1916	. . . . . . . 8 ⊢ Ⅎ𝑧(𝜑 ∧ 𝑦 ∈ ℝ)
71		nfra1 3262	. . . . . . . 8 ⊢ Ⅎ𝑧∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦
72	70, 71	nfan 1901	. . . . . . 7 ⊢ Ⅎ𝑧((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
73		simpll 767	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → (𝜑 ∧ 𝑦 ∈ ℝ))
74		simpr 484	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))))
75	16	adantr 480	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℝ)
76		elioore 13303	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ (𝐴(,)𝐵) → 𝑥 ∈ ℝ)
77	76	adantl 481	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑥 ∈ ℝ)
78	75, 77	remulcld 11174	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑥) ∈ ℝ)
79	78	resincld 16080	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (sin‘(𝑅 · 𝑥)) ∈ ℝ)
80	79	recnd 11172	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (sin‘(𝑅 · 𝑥)) ∈ ℂ)
81	56, 80	mulcld 11164	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) ∈ ℂ)
82	81	ralrimiva 3130	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∀𝑥 ∈ (𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) ∈ ℂ)
83		dmmptg 6208	. . . . . . . . . . . . 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 2839	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → 𝑧 ∈ (𝐴(,)𝐵))
87	86	ad4ant14 753	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → 𝑧 ∈ (𝐴(,)𝐵))
88		simplr 769	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
89	86	adantlr 716	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → 𝑧 ∈ (𝐴(,)𝐵))
90		rspa 3227	. . . . . . . . . . 11 ⊢ ((∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
91	88, 89, 90	syl2anc 585	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
92	91	adantllr 720	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
93		eqidd 2738	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))))
94		fveq2 6842	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑧 → (𝐹‘𝑥) = (𝐹‘𝑧))
95		oveq2 7376	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = 𝑧 → (𝑅 · 𝑥) = (𝑅 · 𝑧))
96	95	fveq2d 6846	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑧 → (sin‘(𝑅 · 𝑥)) = (sin‘(𝑅 · 𝑧)))
97	94, 96	oveq12d 7386	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑧 → ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) = ((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧))))
98	97	adantl 481	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ 𝑥 = 𝑧) → ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) = ((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧))))
99		simpr 484	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ (𝐴(,)𝐵))
100	6	adantr 480	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
101	52, 99	sselid 3933	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ (𝐴[,]𝐵))
102	100, 101	ffvelcdmd 7039	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝐹‘𝑧) ∈ ℂ)
103	17	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℂ)
104	39, 99	sselid 3933	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ ℂ)
105	103, 104	mulcld 11164	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑧) ∈ ℂ)
106	105	sincld 16067	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (sin‘(𝑅 · 𝑧)) ∈ ℂ)
107	102, 106	mulcld 11164	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧))) ∈ ℂ)
108	93, 98, 99, 107	fvmptd 6957	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧) = ((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧))))
109	108	fveq2d 6846	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) = (abs‘((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧)))))
110	102, 106	absmuld 15392	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧)))) = ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))))
111	109, 110	eqtrd 2772	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) = ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))))
112	111	adantlr 716	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) = ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))))
113	112	adantr 480	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) = ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))))
114		simplll 775	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝜑)
115		simplr 769	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑧 ∈ (𝐴(,)𝐵))
116	114, 115, 102	syl2anc 585	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝐹‘𝑧) ∈ ℂ)
117	116	abscld 15374	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘(𝐹‘𝑧)) ∈ ℝ)
118	17	ad3antrrr 731	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑅 ∈ ℂ)
119	39, 115	sselid 3933	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑧 ∈ ℂ)
120	118, 119	mulcld 11164	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝑅 · 𝑧) ∈ ℂ)
121	120	sincld 16067	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (sin‘(𝑅 · 𝑧)) ∈ ℂ)
122	121	abscld 15374	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘(sin‘(𝑅 · 𝑧))) ∈ ℝ)
123	117, 122	remulcld 11174	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ∈ ℝ)
124		1red 11145	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 1 ∈ ℝ)
125	117, 124	remulcld 11174	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · 1) ∈ ℝ)
126		simpllr 776	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑦 ∈ ℝ)
127	126, 124	remulcld 11174	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝑦 · 1) ∈ ℝ)
128	106	abscld 15374	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(sin‘(𝑅 · 𝑧))) ∈ ℝ)
129		1red 11145	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 1 ∈ ℝ)
130	102	abscld 15374	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐹‘𝑧)) ∈ ℝ)
131	102	absge0d 15382	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 0 ≤ (abs‘(𝐹‘𝑧)))
132	16	adantr 480	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℝ)
133		elioore 13303	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑧 ∈ (𝐴(,)𝐵) → 𝑧 ∈ ℝ)
134	133	adantl 481	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ ℝ)
135	132, 134	remulcld 11174	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑧) ∈ ℝ)
136		abssinbd 45657	. . . . . . . . . . . . . . . 16 ⊢ ((𝑅 · 𝑧) ∈ ℝ → (abs‘(sin‘(𝑅 · 𝑧))) ≤ 1)
137	135, 136	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(sin‘(𝑅 · 𝑧))) ≤ 1)
138	128, 129, 130, 131, 137	lemul2ad 12094	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ≤ ((abs‘(𝐹‘𝑧)) · 1))
139	138	adantlr 716	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ≤ ((abs‘(𝐹‘𝑧)) · 1))
140	139	adantr 480	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ≤ ((abs‘(𝐹‘𝑧)) · 1))
141		0le1 11672	. . . . . . . . . . . . . 14 ⊢ 0 ≤ 1
142	141	a1i 11	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 0 ≤ 1)
143		simpr 484	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
144	117, 126, 124, 142, 143	lemul1ad 12093	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · 1) ≤ (𝑦 · 1))
145	123, 125, 127, 140, 144	letrd 11302	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ≤ (𝑦 · 1))
146	113, 145	eqbrtrd 5122	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ (𝑦 · 1))
147	126	recnd 11172	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑦 ∈ ℂ)
148	147	mulridd 11161	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝑦 · 1) = 𝑦)
149	146, 148	breqtrd 5126	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦)
150	73, 87, 92, 149	syl21anc 838	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦)
151	150	ex 412	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦))
152	72, 151	ralrimi 3236	. . . . . 6 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) → ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦)
153	152	ex 412	. . . . 5 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦))
154	153	reximdva 3151	. . . 4 ⊢ (𝜑 → (∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦))
155	69, 154	mpd 15	. . 3 ⊢ (𝜑 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦)
156	46, 50, 58, 155	cnbdibl 46320	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) ∈ 𝐿¹)
157	11, 43	cncfmpt1f 24875	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (cos‘(𝑅 · 𝑥))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
158	40, 26, 27	constcncfg 46230	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ 𝑅) ∈ ((𝐴(,)𝐵)–cn→(ℂ ∖ {0})))
159	157, 158	divcncf 25416	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
160	159	negcncfg 46239	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
161	36, 160	mulcncf 25414	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
162		simpr 484	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℝ)
163	16	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑅 ∈ ℝ)
164	15	rpne0d 12966	. . . . . . . 8 ⊢ (𝜑 → 𝑅 ≠ 0)
165	164	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑅 ≠ 0)
166	162, 163, 165	redivcld 11981	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (𝑦 / 𝑅) ∈ ℝ)
167	166	adantr 480	. . . . 5 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) → (𝑦 / 𝑅) ∈ ℝ)
168		simpr 484	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))))
169	33	ffvelcdmda 7038	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (𝐺‘𝑥) ∈ ℂ)
170	17	adantr 480	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℂ)
171	76	recnd 11172	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 ∈ (𝐴(,)𝐵) → 𝑥 ∈ ℂ)
172	171	adantl 481	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑥 ∈ ℂ)
173	170, 172	mulcld 11164	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑥) ∈ ℂ)
174	173	coscld 16068	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (cos‘(𝑅 · 𝑥)) ∈ ℂ)
175	164	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑅 ≠ 0)
176	174, 170, 175	divcld 11929	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((cos‘(𝑅 · 𝑥)) / 𝑅) ∈ ℂ)
177	176	negcld 11491	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → -((cos‘(𝑅 · 𝑥)) / 𝑅) ∈ ℂ)
178	169, 177	mulcld 11164	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ℂ)
179	178	ralrimiva 3130	. . . . . . . . . . 11 ⊢ (𝜑 → ∀𝑥 ∈ (𝐴(,)𝐵)((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ℂ)
180	179	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → ∀𝑥 ∈ (𝐴(,)𝐵)((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ℂ)
181		dmmptg 6208	. . . . . . . . . 10 ⊢ (∀𝑥 ∈ (𝐴(,)𝐵)((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ℂ → dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝐴(,)𝐵))
182	180, 181	syl 17	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝐴(,)𝐵))
183	168, 182	eleqtrd 2839	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → 𝑧 ∈ (𝐴(,)𝐵))
184	183	ad4ant14 753	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → 𝑧 ∈ (𝐴(,)𝐵))
185		eqidd 2738	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))))
186		fveq2 6842	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑧 → (𝐺‘𝑥) = (𝐺‘𝑧))
187	95	fveq2d 6846	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑧 → (cos‘(𝑅 · 𝑥)) = (cos‘(𝑅 · 𝑧)))
188	187	oveq1d 7383	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑧 → ((cos‘(𝑅 · 𝑥)) / 𝑅) = ((cos‘(𝑅 · 𝑧)) / 𝑅))
189	188	negeqd 11386	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑧 → -((cos‘(𝑅 · 𝑥)) / 𝑅) = -((cos‘(𝑅 · 𝑧)) / 𝑅))
190	186, 189	oveq12d 7386	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑧 → ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅)))
191	190	adantl 481	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ 𝑥 = 𝑧) → ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅)))
192	33	ffvelcdmda 7038	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝐺‘𝑧) ∈ ℂ)
193	105	coscld 16068	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (cos‘(𝑅 · 𝑧)) ∈ ℂ)
194	164	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ≠ 0)
195	193, 103, 194	divcld 11929	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((cos‘(𝑅 · 𝑧)) / 𝑅) ∈ ℂ)
196	195	negcld 11491	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → -((cos‘(𝑅 · 𝑧)) / 𝑅) ∈ ℂ)
197	192, 196	mulcld 11164	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅)) ∈ ℂ)
198	185, 191, 99, 197	fvmptd 6957	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧) = ((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅)))
199	198	fveq2d 6846	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) = (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))))
200	199	ad4ant14 753	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) = (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))))
201	33	ad2antrr 727	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) → 𝐺:(𝐴(,)𝐵)⟶ℂ)
202	201	ffvelcdmda 7038	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝐺‘𝑧) ∈ ℂ)
203	202	abscld 15374	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐺‘𝑧)) ∈ ℝ)
204		simpllr 776	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑦 ∈ ℝ)
205	17	ad3antrrr 731	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℂ)
206	104	ad4ant14 753	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ ℂ)
207	205, 206	mulcld 11164	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑧) ∈ ℂ)
208	207	coscld 16068	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (cos‘(𝑅 · 𝑧)) ∈ ℂ)
209	164	ad3antrrr 731	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ≠ 0)
210	208, 205, 209	divcld 11929	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((cos‘(𝑅 · 𝑧)) / 𝑅) ∈ ℂ)
211	210	negcld 11491	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → -((cos‘(𝑅 · 𝑧)) / 𝑅) ∈ ℂ)
212	211	abscld 15374	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) ∈ ℝ)
213	15	rprecred 12972	. . . . . . . . . . 11 ⊢ (𝜑 → (1 / 𝑅) ∈ ℝ)
214	213	ad3antrrr 731	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (1 / 𝑅) ∈ ℝ)
215	202	absge0d 15382	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 0 ≤ (abs‘(𝐺‘𝑧)))
216	211	absge0d 15382	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 0 ≤ (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)))
217	186	fveq2d 6846	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑧 → (abs‘(𝐺‘𝑥)) = (abs‘(𝐺‘𝑧)))
218	217	breq1d 5110	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑧 → ((abs‘(𝐺‘𝑥)) ≤ 𝑦 ↔ (abs‘(𝐺‘𝑧)) ≤ 𝑦))
219	218	rspccva 3577	. . . . . . . . . . 11 ⊢ ((∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐺‘𝑧)) ≤ 𝑦)
220	219	adantll 715	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐺‘𝑧)) ≤ 𝑦)
221	195	absnegd 15387	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) = (abs‘((cos‘(𝑅 · 𝑧)) / 𝑅)))
222	193, 103, 194	absdivd 15393	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((cos‘(𝑅 · 𝑧)) / 𝑅)) = ((abs‘(cos‘(𝑅 · 𝑧))) / (abs‘𝑅)))
223	15	rpge0d 12965	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 0 ≤ 𝑅)
224	16, 223	absidd 15358	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (abs‘𝑅) = 𝑅)
225	224	oveq2d 7384	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((abs‘(cos‘(𝑅 · 𝑧))) / (abs‘𝑅)) = ((abs‘(cos‘(𝑅 · 𝑧))) / 𝑅))
226	225	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(cos‘(𝑅 · 𝑧))) / (abs‘𝑅)) = ((abs‘(cos‘(𝑅 · 𝑧))) / 𝑅))
227	221, 222, 226	3eqtrd 2776	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) = ((abs‘(cos‘(𝑅 · 𝑧))) / 𝑅))
228	193	abscld 15374	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(cos‘(𝑅 · 𝑧))) ∈ ℝ)
229	15	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℝ⁺)
230		abscosbd 45641	. . . . . . . . . . . . . 14 ⊢ ((𝑅 · 𝑧) ∈ ℝ → (abs‘(cos‘(𝑅 · 𝑧))) ≤ 1)
231	135, 230	syl 17	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(cos‘(𝑅 · 𝑧))) ≤ 1)
232	228, 129, 229, 231	lediv1dd 13019	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(cos‘(𝑅 · 𝑧))) / 𝑅) ≤ (1 / 𝑅))
233	227, 232	eqbrtrd 5122	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) ≤ (1 / 𝑅))
234	233	ad4ant14 753	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) ≤ (1 / 𝑅))
235	203, 204, 212, 214, 215, 216, 220, 234	lemul12ad 12096	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(𝐺‘𝑧)) · (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅))) ≤ (𝑦 · (1 / 𝑅)))
236	192, 196	absmuld 15392	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))) = ((abs‘(𝐺‘𝑧)) · (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅))))
237	236	ad4ant14 753	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))) = ((abs‘(𝐺‘𝑧)) · (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅))))
238	204	recnd 11172	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑦 ∈ ℂ)
239	238, 205, 209	divrecd 11932	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑦 / 𝑅) = (𝑦 · (1 / 𝑅)))
240	235, 237, 239	3brtr4d 5132	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))) ≤ (𝑦 / 𝑅))
241	200, 240	eqbrtrd 5122	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅))
242	184, 241	syldan 592	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅))
243	242	ralrimiva 3130	. . . . 5 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) → ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅))
244		breq2 5104	. . . . . . 7 ⊢ (𝑤 = (𝑦 / 𝑅) → ((abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤 ↔ (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅)))
245	244	ralbidv 3161	. . . . . 6 ⊢ (𝑤 = (𝑦 / 𝑅) → (∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤 ↔ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅)))
246	245	rspcev 3578	. . . . 5 ⊢ (((𝑦 / 𝑅) ∈ ℝ ∧ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅)) → ∃𝑤 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤)
247	167, 243, 246	syl2anc 585	. . . 4 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) → ∃𝑤 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤)
248		fourierdlem39.gbd	. . . 4 ⊢ (𝜑 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦)
249	247, 248	r19.29a 3146	. . 3 ⊢ (𝜑 → ∃𝑤 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤)
250	46, 50, 161, 249	cnbdibl 46320	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) ∈ 𝐿¹)
251	8	oveq2d 7384	. . 3 ⊢ (𝜑 → (ℝ D (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥))) = (ℝ D 𝐹))
252		fourierdlem39.g	. . . . 5 ⊢ 𝐺 = (ℝ D 𝐹)
253	252	eqcomi 2746	. . . 4 ⊢ (ℝ D 𝐹) = 𝐺
254	253	a1i 11	. . 3 ⊢ (𝜑 → (ℝ D 𝐹) = 𝐺)
255	251, 254, 34	3eqtrd 2776	. 2 ⊢ (𝜑 → (ℝ D (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐺‘𝑥)))
256		reelprrecn 11130	. . . . 5 ⊢ ℝ ∈ {ℝ, ℂ}
257	256	a1i 11	. . . 4 ⊢ (𝜑 → ℝ ∈ {ℝ, ℂ})
258	17	adantr 480	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑅 ∈ ℂ)
259		recn 11128	. . . . . . . . 9 ⊢ (𝑥 ∈ ℝ → 𝑥 ∈ ℂ)
260	259	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℂ)
261	258, 260	mulcld 11164	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑅 · 𝑥) ∈ ℂ)
262	261	coscld 16068	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (cos‘(𝑅 · 𝑥)) ∈ ℂ)
263	164	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑅 ≠ 0)
264	262, 258, 263	divcld 11929	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ((cos‘(𝑅 · 𝑥)) / 𝑅) ∈ ℂ)
265	264	negcld 11491	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → -((cos‘(𝑅 · 𝑥)) / 𝑅) ∈ ℂ)
266	16	adantr 480	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑅 ∈ ℝ)
267		simpr 484	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
268	266, 267	remulcld 11174	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑅 · 𝑥) ∈ ℝ)
269	268	resincld 16080	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (sin‘(𝑅 · 𝑥)) ∈ ℝ)
270	269	renegcld 11576	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → -(sin‘(𝑅 · 𝑥)) ∈ ℝ)
271	270, 266	remulcld 11174	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (-(sin‘(𝑅 · 𝑥)) · 𝑅) ∈ ℝ)
272	271, 266, 263	redivcld 11981	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) ∈ ℝ)
273	272	renegcld 11576	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) ∈ ℝ)
274		recoscl 16078	. . . . . . . . 9 ⊢ (𝑦 ∈ ℝ → (cos‘𝑦) ∈ ℝ)
275	274	adantl 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (cos‘𝑦) ∈ ℝ)
276	275	recnd 11172	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (cos‘𝑦) ∈ ℂ)
277		resincl 16077	. . . . . . . . 9 ⊢ (𝑦 ∈ ℝ → (sin‘𝑦) ∈ ℝ)
278	277	renegcld 11576	. . . . . . . 8 ⊢ (𝑦 ∈ ℝ → -(sin‘𝑦) ∈ ℝ)
279	278	adantl 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → -(sin‘𝑦) ∈ ℝ)
280		1red 11145	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 1 ∈ ℝ)
281	257	dvmptid 25929	. . . . . . . . 9 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ 𝑥)) = (𝑥 ∈ ℝ ↦ 1))
282	257, 260, 280, 281, 17	dvmptcmul 25936	. . . . . . . 8 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ (𝑅 · 𝑥))) = (𝑥 ∈ ℝ ↦ (𝑅 · 1)))
283	258	mulridd 11161	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑅 · 1) = 𝑅)
284	283	mpteq2dva 5193	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ (𝑅 · 1)) = (𝑥 ∈ ℝ ↦ 𝑅))
285	282, 284	eqtrd 2772	. . . . . . 7 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ (𝑅 · 𝑥))) = (𝑥 ∈ ℝ ↦ 𝑅))
286		dvcosre 46270	. . . . . . . 8 ⊢ (ℝ D (𝑦 ∈ ℝ ↦ (cos‘𝑦))) = (𝑦 ∈ ℝ ↦ -(sin‘𝑦))
287	286	a1i 11	. . . . . . 7 ⊢ (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ (cos‘𝑦))) = (𝑦 ∈ ℝ ↦ -(sin‘𝑦)))
288		fveq2 6842	. . . . . . 7 ⊢ (𝑦 = (𝑅 · 𝑥) → (cos‘𝑦) = (cos‘(𝑅 · 𝑥)))
289		fveq2 6842	. . . . . . . 8 ⊢ (𝑦 = (𝑅 · 𝑥) → (sin‘𝑦) = (sin‘(𝑅 · 𝑥)))
290	289	negeqd 11386	. . . . . . 7 ⊢ (𝑦 = (𝑅 · 𝑥) → -(sin‘𝑦) = -(sin‘(𝑅 · 𝑥)))
291	257, 257, 268, 266, 276, 279, 285, 287, 288, 290	dvmptco 25944	. . . . . 6 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ (cos‘(𝑅 · 𝑥)))) = (𝑥 ∈ ℝ ↦ (-(sin‘(𝑅 · 𝑥)) · 𝑅)))
292	257, 262, 271, 291, 17, 164	dvmptdivc 25937	. . . . 5 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ ((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ ℝ ↦ ((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅)))
293	257, 264, 272, 292	dvmptneg 25938	. . . 4 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ ℝ ↦ -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅)))
294		tgioo4 24761	. . . 4 ⊢ (topGen‘ran (,)) = ((TopOpen‘ℂ_fld) ↾_t ℝ)
295		eqid 2737	. . . 4 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
296		iccntr 24778	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ((int‘(topGen‘ran (,)))‘(𝐴[,]𝐵)) = (𝐴(,)𝐵))
297	1, 2, 296	syl2anc 585	. . . 4 ⊢ (𝜑 → ((int‘(topGen‘ran (,)))‘(𝐴[,]𝐵)) = (𝐴(,)𝐵))
298	257, 265, 273, 293, 12, 294, 295, 297	dvmptres2 25934	. . 3 ⊢ (𝜑 → (ℝ D (𝑥 ∈ (𝐴[,]𝐵) ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅)))
299	80, 170	mulneg1d 11602	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (-(sin‘(𝑅 · 𝑥)) · 𝑅) = -((sin‘(𝑅 · 𝑥)) · 𝑅))
300	299	oveq1d 7383	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (-((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
301	80, 170	mulcld 11164	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((sin‘(𝑅 · 𝑥)) · 𝑅) ∈ ℂ)
302	301, 170, 175	divnegd 11942	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → -(((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (-((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
303	300, 302	eqtr4d 2775	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = -(((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
304	303	negeqd 11386	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = --(((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
305	301, 170, 175	divcld 11929	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) ∈ ℂ)
306	305	negnegd 11495	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → --(((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
307	80, 170, 175	divcan4d 11935	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (sin‘(𝑅 · 𝑥)))
308	304, 306, 307	3eqtrd 2776	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (sin‘(𝑅 · 𝑥)))
309	308	mpteq2dva 5193	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅)) = (𝑥 ∈ (𝐴(,)𝐵) ↦ (sin‘(𝑅 · 𝑥))))
310	298, 309	eqtrd 2772	. 2 ⊢ (𝜑 → (ℝ D (𝑥 ∈ (𝐴[,]𝐵) ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ (sin‘(𝑅 · 𝑥))))
311		fveq2 6842	. . . 4 ⊢ (𝑥 = 𝐴 → (𝐹‘𝑥) = (𝐹‘𝐴))
312		oveq2 7376	. . . . . . 7 ⊢ (𝑥 = 𝐴 → (𝑅 · 𝑥) = (𝑅 · 𝐴))
313	312	fveq2d 6846	. . . . . 6 ⊢ (𝑥 = 𝐴 → (cos‘(𝑅 · 𝑥)) = (cos‘(𝑅 · 𝐴)))
314	313	oveq1d 7383	. . . . 5 ⊢ (𝑥 = 𝐴 → ((cos‘(𝑅 · 𝑥)) / 𝑅) = ((cos‘(𝑅 · 𝐴)) / 𝑅))
315	314	negeqd 11386	. . . 4 ⊢ (𝑥 = 𝐴 → -((cos‘(𝑅 · 𝑥)) / 𝑅) = -((cos‘(𝑅 · 𝐴)) / 𝑅))
316	311, 315	oveq12d 7386	. . 3 ⊢ (𝑥 = 𝐴 → ((𝐹‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐹‘𝐴) · -((cos‘(𝑅 · 𝐴)) / 𝑅)))
317	316	adantl 481	. 2 ⊢ ((𝜑 ∧ 𝑥 = 𝐴) → ((𝐹‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐹‘𝐴) · -((cos‘(𝑅 · 𝐴)) / 𝑅)))
318		fveq2 6842	. . . 4 ⊢ (𝑥 = 𝐵 → (𝐹‘𝑥) = (𝐹‘𝐵))
319		oveq2 7376	. . . . . . 7 ⊢ (𝑥 = 𝐵 → (𝑅 · 𝑥) = (𝑅 · 𝐵))
320	319	fveq2d 6846	. . . . . 6 ⊢ (𝑥 = 𝐵 → (cos‘(𝑅 · 𝑥)) = (cos‘(𝑅 · 𝐵)))
321	320	oveq1d 7383	. . . . 5 ⊢ (𝑥 = 𝐵 → ((cos‘(𝑅 · 𝑥)) / 𝑅) = ((cos‘(𝑅 · 𝐵)) / 𝑅))
322	321	negeqd 11386	. . . 4 ⊢ (𝑥 = 𝐵 → -((cos‘(𝑅 · 𝑥)) / 𝑅) = -((cos‘(𝑅 · 𝐵)) / 𝑅))
323	318, 322	oveq12d 7386	. . 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 26022	1 ⊢ (𝜑 → ∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) d𝑥 = ((((𝐹‘𝐵) · -((cos‘(𝑅 · 𝐵)) / 𝑅)) − ((𝐹‘𝐴) · -((cos‘(𝑅 · 𝐴)) / 𝑅))) − ∫(𝐴(,)𝐵)((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) d𝑥))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1542 ∈ wcel 2114 ≠ wne 2933 ∀wral 3052 ∃wrex 3062 ∖ cdif 3900 ⊆ wss 3903 {csn 4582 {cpr 4584 class class class wbr 5100 ↦ cmpt 5181 dom cdm 5632 ran crn 5633 ⟶wf 6496 ‘cfv 6500 (class class class)co 7368 ℂcc 11036 ℝcr 11037 0cc0 11038 1c1 11039 · cmul 11043 ≤ cle 11179 − cmin 11376 -cneg 11377 / cdiv 11806 ℝ⁺crp 12917 (,)cioo 13273 [,]cicc 13276 abscabs 15169 sincsin 15998 cosccos 15999 TopOpenctopn 17353 topGenctg 17369 ℂ_fldccnfld 21321 intcnt 22973 –cn→ccncf 24837 volcvol 25432 ∫citg 25587 D cdv 25832

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2185 ax-ext 2709 ax-rep 5226 ax-sep 5243 ax-nul 5253 ax-pow 5312 ax-pr 5379 ax-un 7690 ax-inf2 9562 ax-cc 10357 ax-cnex 11094 ax-resscn 11095 ax-1cn 11096 ax-icn 11097 ax-addcl 11098 ax-addrcl 11099 ax-mulcl 11100 ax-mulrcl 11101 ax-mulcom 11102 ax-addass 11103 ax-mulass 11104 ax-distr 11105 ax-i2m1 11106 ax-1ne0 11107 ax-1rid 11108 ax-rnegex 11109 ax-rrecex 11110 ax-cnre 11111 ax-pre-lttri 11112 ax-pre-lttrn 11113 ax-pre-ltadd 11114 ax-pre-mulgt0 11115 ax-pre-sup 11116 ax-addf 11117

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2540 df-eu 2570 df-clab 2716 df-cleq 2729 df-clel 2812 df-nfc 2886 df-ne 2934 df-nel 3038 df-ral 3053 df-rex 3063 df-rmo 3352 df-reu 3353 df-rab 3402 df-v 3444 df-sbc 3743 df-csb 3852 df-dif 3906 df-un 3908 df-in 3910 df-ss 3920 df-pss 3923 df-symdif 4207 df-nul 4288 df-if 4482 df-pw 4558 df-sn 4583 df-pr 4585 df-tp 4587 df-op 4589 df-uni 4866 df-int 4905 df-iun 4950 df-iin 4951 df-disj 5068 df-br 5101 df-opab 5163 df-mpt 5182 df-tr 5208 df-id 5527 df-eprel 5532 df-po 5540 df-so 5541 df-fr 5585 df-se 5586 df-we 5587 df-xp 5638 df-rel 5639 df-cnv 5640 df-co 5641 df-dm 5642 df-rn 5643 df-res 5644 df-ima 5645 df-pred 6267 df-ord 6328 df-on 6329 df-lim 6330 df-suc 6331 df-iota 6456 df-fun 6502 df-fn 6503 df-f 6504 df-f1 6505 df-fo 6506 df-f1o 6507 df-fv 6508 df-isom 6509 df-riota 7325 df-ov 7371 df-oprab 7372 df-mpo 7373 df-of 7632 df-ofr 7633 df-om 7819 df-1st 7943 df-2nd 7944 df-supp 8113 df-frecs 8233 df-wrecs 8264 df-recs 8313 df-rdg 8351 df-1o 8407 df-2o 8408 df-oadd 8411 df-omul 8412 df-er 8645 df-map 8777 df-pm 8778 df-ixp 8848 df-en 8896 df-dom 8897 df-sdom 8898 df-fin 8899 df-fsupp 9277 df-fi 9326 df-sup 9357 df-inf 9358 df-oi 9427 df-dju 9825 df-card 9863 df-acn 9866 df-pnf 11180 df-mnf 11181 df-xr 11182 df-ltxr 11183 df-le 11184 df-sub 11378 df-neg 11379 df-div 11807 df-nn 12158 df-2 12220 df-3 12221 df-4 12222 df-5 12223 df-6 12224 df-7 12225 df-8 12226 df-9 12227 df-n0 12414 df-z 12501 df-dec 12620 df-uz 12764 df-q 12874 df-rp 12918 df-xneg 13038 df-xadd 13039 df-xmul 13040 df-ioo 13277 df-ioc 13278 df-ico 13279 df-icc 13280 df-fz 13436 df-fzo 13583 df-fl 13724 df-mod 13802 df-seq 13937 df-exp 13997 df-fac 14209 df-bc 14238 df-hash 14266 df-shft 15002 df-cj 15034 df-re 15035 df-im 15036 df-sqrt 15170 df-abs 15171 df-limsup 15406 df-clim 15423 df-rlim 15424 df-sum 15622 df-ef 16002 df-sin 16004 df-cos 16005 df-struct 17086 df-sets 17103 df-slot 17121 df-ndx 17133 df-base 17149 df-ress 17170 df-plusg 17202 df-mulr 17203 df-starv 17204 df-sca 17205 df-vsca 17206 df-ip 17207 df-tset 17208 df-ple 17209 df-ds 17211 df-unif 17212 df-hom 17213 df-cco 17214 df-rest 17354 df-topn 17355 df-0g 17373 df-gsum 17374 df-topgen 17375 df-pt 17376 df-prds 17379 df-xrs 17435 df-qtop 17440 df-imas 17441 df-xps 17443 df-mre 17517 df-mrc 17518 df-acs 17520 df-mgm 18577 df-sgrp 18656 df-mnd 18672 df-submnd 18721 df-mulg 19010 df-cntz 19258 df-cmn 19723 df-psmet 21313 df-xmet 21314 df-met 21315 df-bl 21316 df-mopn 21317 df-fbas 21318 df-fg 21319 df-cnfld 21322 df-top 22850 df-topon 22867 df-topsp 22889 df-bases 22902 df-cld 22975 df-ntr 22976 df-cls 22977 df-nei 23054 df-lp 23092 df-perf 23093 df-cn 23183 df-cnp 23184 df-haus 23271 df-cmp 23343 df-tx 23518 df-hmeo 23711 df-fil 23802 df-fm 23894 df-flim 23895 df-flf 23896 df-xms 24276 df-ms 24277 df-tms 24278 df-cncf 24839 df-ovol 25433 df-vol 25434 df-mbf 25588 df-itg1 25589 df-itg2 25590 df-ibl 25591 df-itg 25592 df-0p 25639 df-limc 25835 df-dv 25836

This theorem is referenced by: fourierdlem73 46537

W3C validator