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 46751

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 25020	. . . . . 6 ⊢ (𝐹 ∈ ((𝐴[,]𝐵)–cn→ℂ) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
6	4, 5	syl 18	. . . . 5 ⊢ (𝜑 → 𝐹:(𝐴[,]𝐵)⟶ℂ)
7	6	feqmptd 6950	. . . 4 ⊢ (𝜑 → 𝐹 = (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥)))
8	7	eqcomd 2775	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥)) = 𝐹)
9	8, 4	eqeltrd 2869	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
10		coscn 26573	. . . . . 6 ⊢ cos ∈ (ℂ–cn→ℂ)
11	10	a1i 11	. . . . 5 ⊢ (𝜑 → cos ∈ (ℂ–cn→ℂ))
12	1, 2	iccssred 13460	. . . . . . . 8 ⊢ (𝜑 → (𝐴[,]𝐵) ⊆ ℝ)
13		ax-resscn 11156	. . . . . . . 8 ⊢ ℝ ⊆ ℂ
14	12, 13	sstrdi 3957	. . . . . . 7 ⊢ (𝜑 → (𝐴[,]𝐵) ⊆ ℂ)
15		fourierdlem39.r	. . . . . . . . 9 ⊢ (𝜑 → 𝑅 ∈ ℝ⁺)
16	15	rpred 13059	. . . . . . . 8 ⊢ (𝜑 → 𝑅 ∈ ℝ)
17	16	recnd 11236	. . . . . . 7 ⊢ (𝜑 → 𝑅 ∈ ℂ)
18		ssid 3967	. . . . . . . 8 ⊢ ℂ ⊆ ℂ
19	18	a1i 11	. . . . . . 7 ⊢ (𝜑 → ℂ ⊆ ℂ)
20	14, 17, 19	constcncfg 46477	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ 𝑅) ∈ ((𝐴[,]𝐵)–cn→ℂ))
21	14, 19	idcncfg 46478	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ 𝑥) ∈ ((𝐴[,]𝐵)–cn→ℂ))
22	20, 21	mulcncf 25573	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝑅 · 𝑥)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
23	11, 22	cncfmpt1f 25041	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ (cos‘(𝑅 · 𝑥))) ∈ ((𝐴[,]𝐵)–cn→ℂ))
24	15	rpcnne0d 13068	. . . . . 6 ⊢ (𝜑 → (𝑅 ∈ ℂ ∧ 𝑅 ≠ 0))
25		eldifsn 4758	. . . . . 6 ⊢ (𝑅 ∈ (ℂ ∖ {0}) ↔ (𝑅 ∈ ℂ ∧ 𝑅 ≠ 0))
26	24, 25	sylibr 237	. . . . 5 ⊢ (𝜑 → 𝑅 ∈ (ℂ ∖ {0}))
27		difssd 4099	. . . . 5 ⊢ (𝜑 → (ℂ ∖ {0}) ⊆ ℂ)
28	14, 26, 27	constcncfg 46477	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ 𝑅) ∈ ((𝐴[,]𝐵)–cn→(ℂ ∖ {0})))
29	23, 28	divcncf 25574	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ ((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
30	29	negcncfg 46486	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
31		fourierdlem39.gcn	. . . . . 6 ⊢ (𝜑 → 𝐺 ∈ ((𝐴(,)𝐵)–cn→ℂ))
32		cncff 25020	. . . . . 6 ⊢ (𝐺 ∈ ((𝐴(,)𝐵)–cn→ℂ) → 𝐺:(𝐴(,)𝐵)⟶ℂ)
33	31, 32	syl 18	. . . . 5 ⊢ (𝜑 → 𝐺:(𝐴(,)𝐵)⟶ℂ)
34	33	feqmptd 6950	. . . 4 ⊢ (𝜑 → 𝐺 = (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐺‘𝑥)))
35	34	eqcomd 2775	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐺‘𝑥)) = 𝐺)
36	35, 31	eqeltrd 2869	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐺‘𝑥)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
37		sincn 26572	. . . 4 ⊢ sin ∈ (ℂ–cn→ℂ)
38	37	a1i 11	. . 3 ⊢ (𝜑 → sin ∈ (ℂ–cn→ℂ))
39		ioosscn 13434	. . . . . 6 ⊢ (𝐴(,)𝐵) ⊆ ℂ
40	39	a1i 11	. . . . 5 ⊢ (𝜑 → (𝐴(,)𝐵) ⊆ ℂ)
41	40, 17, 19	constcncfg 46477	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ 𝑅) ∈ ((𝐴(,)𝐵)–cn→ℂ))
42	40, 19	idcncfg 46478	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ 𝑥) ∈ ((𝐴(,)𝐵)–cn→ℂ))
43	41, 42	mulcncf 25573	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝑅 · 𝑥)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
44	38, 43	cncfmpt1f 25041	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (sin‘(𝑅 · 𝑥))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
45		ioombl 25692	. . . 4 ⊢ (𝐴(,)𝐵) ∈ dom vol
46	45	a1i 11	. . 3 ⊢ (𝜑 → (𝐴(,)𝐵) ∈ dom vol)
47		volioo 25696	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → (vol‘(𝐴(,)𝐵)) = (𝐵 − 𝐴))
48	1, 2, 3, 47	syl3anc 1396	. . . 4 ⊢ (𝜑 → (vol‘(𝐴(,)𝐵)) = (𝐵 − 𝐴))
49	2, 1	resubcld 11641	. . . 4 ⊢ (𝜑 → (𝐵 − 𝐴) ∈ ℝ)
50	48, 49	eqeltrd 2869	. . 3 ⊢ (𝜑 → (vol‘(𝐴(,)𝐵)) ∈ ℝ)
51		eqid 2769	. . . . 5 ⊢ (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥)) = (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥))
52		ioossicc 13459	. . . . . 6 ⊢ (𝐴(,)𝐵) ⊆ (𝐴[,]𝐵)
53	52	a1i 11	. . . . 5 ⊢ (𝜑 → (𝐴(,)𝐵) ⊆ (𝐴[,]𝐵))
54	6	adantr 485	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
55	53	sselda 3945	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑥 ∈ (𝐴[,]𝐵))
56	54, 55	ffvelcdmd 7081	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (𝐹‘𝑥) ∈ ℂ)
57	51, 9, 53, 19, 56	cncfmptssg 46476	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐹‘𝑥)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
58	57, 44	mulcncf 25573	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
59		cniccbdd 25588	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐹 ∈ ((𝐴[,]𝐵)–cn→ℂ)) → ∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
60	1, 2, 4, 59	syl3anc 1396	. . . . 5 ⊢ (𝜑 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
61		nfra1 3295	. . . . . . . 8 ⊢ Ⅎ𝑧∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦
62	52	sseli 3941	. . . . . . . . . 10 ⊢ (𝑧 ∈ (𝐴(,)𝐵) → 𝑧 ∈ (𝐴[,]𝐵))
63		rspa 3260	. . . . . . . . . 10 ⊢ ((∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 ∧ 𝑧 ∈ (𝐴[,]𝐵)) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
64	62, 63	sylan2 604	. . . . . . . . 9 ⊢ ((∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
65	64	ex 417	. . . . . . . 8 ⊢ (∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → (𝑧 ∈ (𝐴(,)𝐵) → (abs‘(𝐹‘𝑧)) ≤ 𝑦))
66	61, 65	ralrimi 3269	. . . . . . 7 ⊢ (∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
67	66	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦))
68	67	reximdva 3184	. . . . 5 ⊢ (𝜑 → (∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦))
69	60, 68	mpd 16	. . . 4 ⊢ (𝜑 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
70		nfv 1941	. . . . . . . 8 ⊢ Ⅎ𝑧(𝜑 ∧ 𝑦 ∈ ℝ)
71		nfra1 3295	. . . . . . . 8 ⊢ Ⅎ𝑧∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦
72	70, 71	nfan 1926	. . . . . . 7 ⊢ Ⅎ𝑧((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
73		simpll 778	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → (𝜑 ∧ 𝑦 ∈ ℝ))
74		simpr 489	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))))
75	16	adantr 485	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℝ)
76		elioore 13401	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ (𝐴(,)𝐵) → 𝑥 ∈ ℝ)
77	76	adantl 486	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑥 ∈ ℝ)
78	75, 77	remulcld 11238	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑥) ∈ ℝ)
79	78	resincld 16198	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (sin‘(𝑅 · 𝑥)) ∈ ℝ)
80	79	recnd 11236	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (sin‘(𝑅 · 𝑥)) ∈ ℂ)
81	56, 80	mulcld 11228	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) ∈ ℂ)
82	81	ralrimiva 3163	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∀𝑥 ∈ (𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) ∈ ℂ)
83		dmmptg 6244	. . . . . . . . . . . . 13 ⊢ (∀𝑥 ∈ (𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) ∈ ℂ → dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) = (𝐴(,)𝐵))
84	82, 83	syl 18	. . . . . . . . . . . 12 ⊢ (𝜑 → dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) = (𝐴(,)𝐵))
85	84	adantr 485	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) = (𝐴(,)𝐵))
86	74, 85	eleqtrd 2871	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → 𝑧 ∈ (𝐴(,)𝐵))
87	86	ad4ant14 764	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → 𝑧 ∈ (𝐴(,)𝐵))
88		simplr 780	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
89	86	adantlr 727	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → 𝑧 ∈ (𝐴(,)𝐵))
90		rspa 3260	. . . . . . . . . . 11 ⊢ ((∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
91	88, 89, 90	syl2anc 595	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
92	91	adantllr 731	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
93		eqidd 2770	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))))
94		fveq2 6882	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑧 → (𝐹‘𝑥) = (𝐹‘𝑧))
95		oveq2 7419	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = 𝑧 → (𝑅 · 𝑥) = (𝑅 · 𝑧))
96	95	fveq2d 6886	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑧 → (sin‘(𝑅 · 𝑥)) = (sin‘(𝑅 · 𝑧)))
97	94, 96	oveq12d 7429	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑧 → ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) = ((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧))))
98	97	adantl 486	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ 𝑥 = 𝑧) → ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) = ((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧))))
99		simpr 489	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ (𝐴(,)𝐵))
100	6	adantr 485	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
101	52, 99	sselid 3943	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ (𝐴[,]𝐵))
102	100, 101	ffvelcdmd 7081	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝐹‘𝑧) ∈ ℂ)
103	17	adantr 485	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℂ)
104	39, 99	sselid 3943	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ ℂ)
105	103, 104	mulcld 11228	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑧) ∈ ℂ)
106	105	sincld 16185	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (sin‘(𝑅 · 𝑧)) ∈ ℂ)
107	102, 106	mulcld 11228	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧))) ∈ ℂ)
108	93, 98, 99, 107	fvmptd 6998	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧) = ((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧))))
109	108	fveq2d 6886	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) = (abs‘((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧)))))
110	102, 106	absmuld 15507	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧)))) = ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))))
111	109, 110	eqtrd 2804	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) = ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))))
112	111	adantlr 727	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) = ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))))
113	112	adantr 485	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) = ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))))
114		simplll 786	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝜑)
115		simplr 780	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑧 ∈ (𝐴(,)𝐵))
116	114, 115, 102	syl2anc 595	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝐹‘𝑧) ∈ ℂ)
117	116	abscld 15489	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘(𝐹‘𝑧)) ∈ ℝ)
118	17	ad3antrrr 742	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑅 ∈ ℂ)
119	39, 115	sselid 3943	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑧 ∈ ℂ)
120	118, 119	mulcld 11228	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝑅 · 𝑧) ∈ ℂ)
121	120	sincld 16185	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (sin‘(𝑅 · 𝑧)) ∈ ℂ)
122	121	abscld 15489	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘(sin‘(𝑅 · 𝑧))) ∈ ℝ)
123	117, 122	remulcld 11238	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ∈ ℝ)
124		1red 11208	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 1 ∈ ℝ)
125	117, 124	remulcld 11238	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · 1) ∈ ℝ)
126		simpllr 787	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑦 ∈ ℝ)
127	126, 124	remulcld 11238	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝑦 · 1) ∈ ℝ)
128	106	abscld 15489	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(sin‘(𝑅 · 𝑧))) ∈ ℝ)
129		1red 11208	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 1 ∈ ℝ)
130	102	abscld 15489	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐹‘𝑧)) ∈ ℝ)
131	102	absge0d 15497	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 0 ≤ (abs‘(𝐹‘𝑧)))
132	16	adantr 485	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℝ)
133		elioore 13401	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑧 ∈ (𝐴(,)𝐵) → 𝑧 ∈ ℝ)
134	133	adantl 486	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ ℝ)
135	132, 134	remulcld 11238	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑧) ∈ ℝ)
136		abssinbd 45905	. . . . . . . . . . . . . . . 16 ⊢ ((𝑅 · 𝑧) ∈ ℝ → (abs‘(sin‘(𝑅 · 𝑧))) ≤ 1)
137	135, 136	syl 18	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(sin‘(𝑅 · 𝑧))) ≤ 1)
138	128, 129, 130, 131, 137	lemul2ad 12154	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ≤ ((abs‘(𝐹‘𝑧)) · 1))
139	138	adantlr 727	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ≤ ((abs‘(𝐹‘𝑧)) · 1))
140	139	adantr 485	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ≤ ((abs‘(𝐹‘𝑧)) · 1))
141		0le1 11736	. . . . . . . . . . . . . 14 ⊢ 0 ≤ 1
142	141	a1i 11	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 0 ≤ 1)
143		simpr 489	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
144	117, 126, 124, 142, 143	lemul1ad 12153	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · 1) ≤ (𝑦 · 1))
145	123, 125, 127, 140, 144	letrd 11366	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ≤ (𝑦 · 1))
146	113, 145	eqbrtrd 5137	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ (𝑦 · 1))
147	126	recnd 11236	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑦 ∈ ℂ)
148	147	mulridd 11225	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝑦 · 1) = 𝑦)
149	146, 148	breqtrd 5141	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦)
150	73, 87, 92, 149	syl21anc 850	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦)
151	150	ex 417	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦))
152	72, 151	ralrimi 3269	. . . . . 6 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) → ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦)
153	152	ex 417	. . . . 5 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦))
154	153	reximdva 3184	. . . 4 ⊢ (𝜑 → (∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦))
155	69, 154	mpd 16	. . 3 ⊢ (𝜑 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦)
156	46, 50, 58, 155	cnbdibl 46567	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) ∈ 𝐿¹)
157	11, 43	cncfmpt1f 25041	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (cos‘(𝑅 · 𝑥))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
158	40, 26, 27	constcncfg 46477	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ 𝑅) ∈ ((𝐴(,)𝐵)–cn→(ℂ ∖ {0})))
159	157, 158	divcncf 25574	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
160	159	negcncfg 46486	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
161	36, 160	mulcncf 25573	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
162		simpr 489	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℝ)
163	16	adantr 485	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑅 ∈ ℝ)
164	15	rpne0d 13064	. . . . . . . 8 ⊢ (𝜑 → 𝑅 ≠ 0)
165	164	adantr 485	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑅 ≠ 0)
166	162, 163, 165	redivcld 12042	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (𝑦 / 𝑅) ∈ ℝ)
167	166	adantr 485	. . . . 5 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) → (𝑦 / 𝑅) ∈ ℝ)
168		simpr 489	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))))
169	33	ffvelcdmda 7080	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (𝐺‘𝑥) ∈ ℂ)
170	17	adantr 485	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℂ)
171	76	recnd 11236	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 ∈ (𝐴(,)𝐵) → 𝑥 ∈ ℂ)
172	171	adantl 486	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑥 ∈ ℂ)
173	170, 172	mulcld 11228	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑥) ∈ ℂ)
174	173	coscld 16186	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (cos‘(𝑅 · 𝑥)) ∈ ℂ)
175	164	adantr 485	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑅 ≠ 0)
176	174, 170, 175	divcld 11990	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((cos‘(𝑅 · 𝑥)) / 𝑅) ∈ ℂ)
177	176	negcld 11555	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → -((cos‘(𝑅 · 𝑥)) / 𝑅) ∈ ℂ)
178	169, 177	mulcld 11228	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ℂ)
179	178	ralrimiva 3163	. . . . . . . . . . 11 ⊢ (𝜑 → ∀𝑥 ∈ (𝐴(,)𝐵)((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ℂ)
180	179	adantr 485	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → ∀𝑥 ∈ (𝐴(,)𝐵)((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ℂ)
181		dmmptg 6244	. . . . . . . . . 10 ⊢ (∀𝑥 ∈ (𝐴(,)𝐵)((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ℂ → dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝐴(,)𝐵))
182	180, 181	syl 18	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝐴(,)𝐵))
183	168, 182	eleqtrd 2871	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → 𝑧 ∈ (𝐴(,)𝐵))
184	183	ad4ant14 764	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → 𝑧 ∈ (𝐴(,)𝐵))
185		eqidd 2770	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))))
186		fveq2 6882	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑧 → (𝐺‘𝑥) = (𝐺‘𝑧))
187	95	fveq2d 6886	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑧 → (cos‘(𝑅 · 𝑥)) = (cos‘(𝑅 · 𝑧)))
188	187	oveq1d 7426	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑧 → ((cos‘(𝑅 · 𝑥)) / 𝑅) = ((cos‘(𝑅 · 𝑧)) / 𝑅))
189	188	negeqd 11450	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑧 → -((cos‘(𝑅 · 𝑥)) / 𝑅) = -((cos‘(𝑅 · 𝑧)) / 𝑅))
190	186, 189	oveq12d 7429	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑧 → ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅)))
191	190	adantl 486	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ 𝑥 = 𝑧) → ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅)))
192	33	ffvelcdmda 7080	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝐺‘𝑧) ∈ ℂ)
193	105	coscld 16186	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (cos‘(𝑅 · 𝑧)) ∈ ℂ)
194	164	adantr 485	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ≠ 0)
195	193, 103, 194	divcld 11990	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((cos‘(𝑅 · 𝑧)) / 𝑅) ∈ ℂ)
196	195	negcld 11555	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → -((cos‘(𝑅 · 𝑧)) / 𝑅) ∈ ℂ)
197	192, 196	mulcld 11228	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅)) ∈ ℂ)
198	185, 191, 99, 197	fvmptd 6998	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧) = ((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅)))
199	198	fveq2d 6886	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) = (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))))
200	199	ad4ant14 764	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) = (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))))
201	33	ad2antrr 738	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) → 𝐺:(𝐴(,)𝐵)⟶ℂ)
202	201	ffvelcdmda 7080	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝐺‘𝑧) ∈ ℂ)
203	202	abscld 15489	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐺‘𝑧)) ∈ ℝ)
204		simpllr 787	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑦 ∈ ℝ)
205	17	ad3antrrr 742	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℂ)
206	104	ad4ant14 764	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ ℂ)
207	205, 206	mulcld 11228	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑧) ∈ ℂ)
208	207	coscld 16186	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (cos‘(𝑅 · 𝑧)) ∈ ℂ)
209	164	ad3antrrr 742	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ≠ 0)
210	208, 205, 209	divcld 11990	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((cos‘(𝑅 · 𝑧)) / 𝑅) ∈ ℂ)
211	210	negcld 11555	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → -((cos‘(𝑅 · 𝑧)) / 𝑅) ∈ ℂ)
212	211	abscld 15489	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) ∈ ℝ)
213	15	rprecred 13070	. . . . . . . . . . 11 ⊢ (𝜑 → (1 / 𝑅) ∈ ℝ)
214	213	ad3antrrr 742	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (1 / 𝑅) ∈ ℝ)
215	202	absge0d 15497	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 0 ≤ (abs‘(𝐺‘𝑧)))
216	211	absge0d 15497	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 0 ≤ (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)))
217	186	fveq2d 6886	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑧 → (abs‘(𝐺‘𝑥)) = (abs‘(𝐺‘𝑧)))
218	217	breq1d 5123	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑧 → ((abs‘(𝐺‘𝑥)) ≤ 𝑦 ↔ (abs‘(𝐺‘𝑧)) ≤ 𝑦))
219	218	rspccva 3589	. . . . . . . . . . 11 ⊢ ((∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐺‘𝑧)) ≤ 𝑦)
220	219	adantll 726	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐺‘𝑧)) ≤ 𝑦)
221	195	absnegd 15502	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) = (abs‘((cos‘(𝑅 · 𝑧)) / 𝑅)))
222	193, 103, 194	absdivd 15508	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((cos‘(𝑅 · 𝑧)) / 𝑅)) = ((abs‘(cos‘(𝑅 · 𝑧))) / (abs‘𝑅)))
223	15	rpge0d 13063	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 0 ≤ 𝑅)
224	16, 223	absidd 15473	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (abs‘𝑅) = 𝑅)
225	224	oveq2d 7427	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((abs‘(cos‘(𝑅 · 𝑧))) / (abs‘𝑅)) = ((abs‘(cos‘(𝑅 · 𝑧))) / 𝑅))
226	225	adantr 485	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(cos‘(𝑅 · 𝑧))) / (abs‘𝑅)) = ((abs‘(cos‘(𝑅 · 𝑧))) / 𝑅))
227	221, 222, 226	3eqtrd 2808	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) = ((abs‘(cos‘(𝑅 · 𝑧))) / 𝑅))
228	193	abscld 15489	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(cos‘(𝑅 · 𝑧))) ∈ ℝ)
229	15	adantr 485	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℝ⁺)
230		abscosbd 45889	. . . . . . . . . . . . . 14 ⊢ ((𝑅 · 𝑧) ∈ ℝ → (abs‘(cos‘(𝑅 · 𝑧))) ≤ 1)
231	135, 230	syl 18	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(cos‘(𝑅 · 𝑧))) ≤ 1)
232	228, 129, 229, 231	lediv1dd 13117	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(cos‘(𝑅 · 𝑧))) / 𝑅) ≤ (1 / 𝑅))
233	227, 232	eqbrtrd 5137	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) ≤ (1 / 𝑅))
234	233	ad4ant14 764	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) ≤ (1 / 𝑅))
235	203, 204, 212, 214, 215, 216, 220, 234	lemul12ad 12156	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(𝐺‘𝑧)) · (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅))) ≤ (𝑦 · (1 / 𝑅)))
236	192, 196	absmuld 15507	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))) = ((abs‘(𝐺‘𝑧)) · (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅))))
237	236	ad4ant14 764	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))) = ((abs‘(𝐺‘𝑧)) · (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅))))
238	204	recnd 11236	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑦 ∈ ℂ)
239	238, 205, 209	divrecd 11993	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑦 / 𝑅) = (𝑦 · (1 / 𝑅)))
240	235, 237, 239	3brtr4d 5147	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))) ≤ (𝑦 / 𝑅))
241	200, 240	eqbrtrd 5137	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅))
242	184, 241	syldan 602	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅))
243	242	ralrimiva 3163	. . . . 5 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) → ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅))
244		breq2 5117	. . . . . . 7 ⊢ (𝑤 = (𝑦 / 𝑅) → ((abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤 ↔ (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅)))
245	244	ralbidv 3194	. . . . . 6 ⊢ (𝑤 = (𝑦 / 𝑅) → (∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤 ↔ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅)))
246	245	rspcev 3590	. . . . 5 ⊢ (((𝑦 / 𝑅) ∈ ℝ ∧ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅)) → ∃𝑤 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤)
247	167, 243, 246	syl2anc 595	. . . 4 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) → ∃𝑤 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤)
248		fourierdlem39.gbd	. . . 4 ⊢ (𝜑 → ∃𝑦 ∈ ℝ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦)
249	247, 248	r19.29a 3179	. . 3 ⊢ (𝜑 → ∃𝑤 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤)
250	46, 50, 161, 249	cnbdibl 46567	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) ∈ 𝐿¹)
251	8	oveq2d 7427	. . 3 ⊢ (𝜑 → (ℝ D (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥))) = (ℝ D 𝐹))
252		fourierdlem39.g	. . . . 5 ⊢ 𝐺 = (ℝ D 𝐹)
253	252	eqcomi 2778	. . . 4 ⊢ (ℝ D 𝐹) = 𝐺
254	253	a1i 11	. . 3 ⊢ (𝜑 → (ℝ D 𝐹) = 𝐺)
255	251, 254, 34	3eqtrd 2808	. 2 ⊢ (𝜑 → (ℝ D (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐺‘𝑥)))
256		reelprrecn 11191	. . . . 5 ⊢ ℝ ∈ {ℝ, ℂ}
257	256	a1i 11	. . . 4 ⊢ (𝜑 → ℝ ∈ {ℝ, ℂ})
258	17	adantr 485	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑅 ∈ ℂ)
259		recn 11189	. . . . . . . . 9 ⊢ (𝑥 ∈ ℝ → 𝑥 ∈ ℂ)
260	259	adantl 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℂ)
261	258, 260	mulcld 11228	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑅 · 𝑥) ∈ ℂ)
262	261	coscld 16186	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (cos‘(𝑅 · 𝑥)) ∈ ℂ)
263	164	adantr 485	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑅 ≠ 0)
264	262, 258, 263	divcld 11990	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ((cos‘(𝑅 · 𝑥)) / 𝑅) ∈ ℂ)
265	264	negcld 11555	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → -((cos‘(𝑅 · 𝑥)) / 𝑅) ∈ ℂ)
266	16	adantr 485	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑅 ∈ ℝ)
267		simpr 489	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
268	266, 267	remulcld 11238	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑅 · 𝑥) ∈ ℝ)
269	268	resincld 16198	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (sin‘(𝑅 · 𝑥)) ∈ ℝ)
270	269	renegcld 11640	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → -(sin‘(𝑅 · 𝑥)) ∈ ℝ)
271	270, 266	remulcld 11238	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (-(sin‘(𝑅 · 𝑥)) · 𝑅) ∈ ℝ)
272	271, 266, 263	redivcld 12042	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) ∈ ℝ)
273	272	renegcld 11640	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) ∈ ℝ)
274		recoscl 16196	. . . . . . . . 9 ⊢ (𝑦 ∈ ℝ → (cos‘𝑦) ∈ ℝ)
275	274	adantl 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (cos‘𝑦) ∈ ℝ)
276	275	recnd 11236	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (cos‘𝑦) ∈ ℂ)
277		resincl 16195	. . . . . . . . 9 ⊢ (𝑦 ∈ ℝ → (sin‘𝑦) ∈ ℝ)
278	277	renegcld 11640	. . . . . . . 8 ⊢ (𝑦 ∈ ℝ → -(sin‘𝑦) ∈ ℝ)
279	278	adantl 486	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → -(sin‘𝑦) ∈ ℝ)
280		1red 11208	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 1 ∈ ℝ)
281	257	dvmptid 26084	. . . . . . . . 9 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ 𝑥)) = (𝑥 ∈ ℝ ↦ 1))
282	257, 260, 280, 281, 17	dvmptcmul 26091	. . . . . . . 8 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ (𝑅 · 𝑥))) = (𝑥 ∈ ℝ ↦ (𝑅 · 1)))
283	258	mulridd 11225	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑅 · 1) = 𝑅)
284	283	mpteq2dva 5208	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ (𝑅 · 1)) = (𝑥 ∈ ℝ ↦ 𝑅))
285	282, 284	eqtrd 2804	. . . . . . 7 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ (𝑅 · 𝑥))) = (𝑥 ∈ ℝ ↦ 𝑅))
286		dvcosre 46517	. . . . . . . 8 ⊢ (ℝ D (𝑦 ∈ ℝ ↦ (cos‘𝑦))) = (𝑦 ∈ ℝ ↦ -(sin‘𝑦))
287	286	a1i 11	. . . . . . 7 ⊢ (𝜑 → (ℝ D (𝑦 ∈ ℝ ↦ (cos‘𝑦))) = (𝑦 ∈ ℝ ↦ -(sin‘𝑦)))
288		fveq2 6882	. . . . . . 7 ⊢ (𝑦 = (𝑅 · 𝑥) → (cos‘𝑦) = (cos‘(𝑅 · 𝑥)))
289		fveq2 6882	. . . . . . . 8 ⊢ (𝑦 = (𝑅 · 𝑥) → (sin‘𝑦) = (sin‘(𝑅 · 𝑥)))
290	289	negeqd 11450	. . . . . . 7 ⊢ (𝑦 = (𝑅 · 𝑥) → -(sin‘𝑦) = -(sin‘(𝑅 · 𝑥)))
291	257, 257, 268, 266, 276, 279, 285, 287, 288, 290	dvmptco 26099	. . . . . 6 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ (cos‘(𝑅 · 𝑥)))) = (𝑥 ∈ ℝ ↦ (-(sin‘(𝑅 · 𝑥)) · 𝑅)))
292	257, 262, 271, 291, 17, 164	dvmptdivc 26092	. . . . 5 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ ((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ ℝ ↦ ((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅)))
293	257, 264, 272, 292	dvmptneg 26093	. . . 4 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ ℝ ↦ -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅)))
294		tgioo4 24930	. . . 4 ⊢ (topGen‘ran (,)) = ((TopOpen‘ℂ_fld) ↾_t ℝ)
295		eqid 2769	. . . 4 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
296		iccntr 24947	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ((int‘(topGen‘ran (,)))‘(𝐴[,]𝐵)) = (𝐴(,)𝐵))
297	1, 2, 296	syl2anc 595	. . . 4 ⊢ (𝜑 → ((int‘(topGen‘ran (,)))‘(𝐴[,]𝐵)) = (𝐴(,)𝐵))
298	257, 265, 273, 293, 12, 294, 295, 297	dvmptres2 26089	. . 3 ⊢ (𝜑 → (ℝ D (𝑥 ∈ (𝐴[,]𝐵) ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅)))
299	80, 170	mulneg1d 11666	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (-(sin‘(𝑅 · 𝑥)) · 𝑅) = -((sin‘(𝑅 · 𝑥)) · 𝑅))
300	299	oveq1d 7426	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (-((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
301	80, 170	mulcld 11228	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((sin‘(𝑅 · 𝑥)) · 𝑅) ∈ ℂ)
302	301, 170, 175	divnegd 12003	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → -(((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (-((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
303	300, 302	eqtr4d 2807	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = -(((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
304	303	negeqd 11450	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = --(((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
305	301, 170, 175	divcld 11990	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) ∈ ℂ)
306	305	negnegd 11559	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → --(((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
307	80, 170, 175	divcan4d 11996	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (sin‘(𝑅 · 𝑥)))
308	304, 306, 307	3eqtrd 2808	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (sin‘(𝑅 · 𝑥)))
309	308	mpteq2dva 5208	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅)) = (𝑥 ∈ (𝐴(,)𝐵) ↦ (sin‘(𝑅 · 𝑥))))
310	298, 309	eqtrd 2804	. 2 ⊢ (𝜑 → (ℝ D (𝑥 ∈ (𝐴[,]𝐵) ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ (sin‘(𝑅 · 𝑥))))
311		fveq2 6882	. . . 4 ⊢ (𝑥 = 𝐴 → (𝐹‘𝑥) = (𝐹‘𝐴))
312		oveq2 7419	. . . . . . 7 ⊢ (𝑥 = 𝐴 → (𝑅 · 𝑥) = (𝑅 · 𝐴))
313	312	fveq2d 6886	. . . . . 6 ⊢ (𝑥 = 𝐴 → (cos‘(𝑅 · 𝑥)) = (cos‘(𝑅 · 𝐴)))
314	313	oveq1d 7426	. . . . 5 ⊢ (𝑥 = 𝐴 → ((cos‘(𝑅 · 𝑥)) / 𝑅) = ((cos‘(𝑅 · 𝐴)) / 𝑅))
315	314	negeqd 11450	. . . 4 ⊢ (𝑥 = 𝐴 → -((cos‘(𝑅 · 𝑥)) / 𝑅) = -((cos‘(𝑅 · 𝐴)) / 𝑅))
316	311, 315	oveq12d 7429	. . 3 ⊢ (𝑥 = 𝐴 → ((𝐹‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐹‘𝐴) · -((cos‘(𝑅 · 𝐴)) / 𝑅)))
317	316	adantl 486	. 2 ⊢ ((𝜑 ∧ 𝑥 = 𝐴) → ((𝐹‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐹‘𝐴) · -((cos‘(𝑅 · 𝐴)) / 𝑅)))
318		fveq2 6882	. . . 4 ⊢ (𝑥 = 𝐵 → (𝐹‘𝑥) = (𝐹‘𝐵))
319		oveq2 7419	. . . . . . 7 ⊢ (𝑥 = 𝐵 → (𝑅 · 𝑥) = (𝑅 · 𝐵))
320	319	fveq2d 6886	. . . . . 6 ⊢ (𝑥 = 𝐵 → (cos‘(𝑅 · 𝑥)) = (cos‘(𝑅 · 𝐵)))
321	320	oveq1d 7426	. . . . 5 ⊢ (𝑥 = 𝐵 → ((cos‘(𝑅 · 𝑥)) / 𝑅) = ((cos‘(𝑅 · 𝐵)) / 𝑅))
322	321	negeqd 11450	. . . 4 ⊢ (𝑥 = 𝐵 → -((cos‘(𝑅 · 𝑥)) / 𝑅) = -((cos‘(𝑅 · 𝐵)) / 𝑅))
323	318, 322	oveq12d 7429	. . 3 ⊢ (𝑥 = 𝐵 → ((𝐹‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐹‘𝐵) · -((cos‘(𝑅 · 𝐵)) / 𝑅)))
324	323	adantl 486	. 2 ⊢ ((𝜑 ∧ 𝑥 = 𝐵) → ((𝐹‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐹‘𝐵) · -((cos‘(𝑅 · 𝐵)) / 𝑅)))
325	1, 2, 3, 9, 30, 36, 44, 156, 250, 255, 310, 317, 324	itgparts 26174	1 ⊢ (𝜑 → ∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) d𝑥 = ((((𝐹‘𝐵) · -((cos‘(𝑅 · 𝐵)) / 𝑅)) − ((𝐹‘𝐴) · -((cos‘(𝑅 · 𝐴)) / 𝑅))) − ∫(𝐴(,)𝐵)((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) d𝑥))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 400 = wceq 1567 ∈ wcel 2149 ≠ wne 2964 ∀wral 3085 ∃wrex 3095 ∖ cdif 3910 ⊆ wss 3913 {csn 4594 {cpr 4596 class class class wbr 5113 ↦ cmpt 5196 dom cdm 5662 ran crn 5663 ⟶wf 6533 ‘cfv 6537 (class class class)co 7411 ℂcc 11097 ℝcr 11098 0cc0 11099 1c1 11100 · cmul 11104 ≤ cle 11243 − cmin 11440 -cneg 11441 / cdiv 11870 ℝ⁺crp 13015 (,)cioo 13371 [,]cicc 13374 abscabs 15284 sincsin 16116 cosccos 16117 TopOpenctopn 17473 topGenctg 17489 ℂ_fldccnfld 21490 intcnt 23142 –cn→ccncf 25003 volcvol 25590 ∫citg 25745 D cdv 25990

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1822 ax-4 1836 ax-5 1937 ax-6 1994 ax-7 2035 ax-8 2151 ax-9 2159 ax-10 2182 ax-11 2198 ax-12 2219 ax-ext 2741 ax-rep 5242 ax-sep 5261 ax-nul 5271 ax-pow 5337 ax-pr 5405 ax-un 7733 ax-inf2 9609 ax-cc 10418 ax-cnex 11155 ax-resscn 11156 ax-1cn 11157 ax-icn 11158 ax-addcl 11159 ax-addrcl 11160 ax-mulcl 11161 ax-mulrcl 11162 ax-mulcom 11163 ax-addass 11164 ax-mulass 11165 ax-distr 11166 ax-i2m1 11167 ax-1ne0 11168 ax-1rid 11169 ax-rnegex 11170 ax-rrecex 11171 ax-cnre 11172 ax-pre-lttri 11173 ax-pre-lttrn 11174 ax-pre-ltadd 11175 ax-pre-mulgt0 11176 ax-pre-sup 11177 ax-addf 11178

This theorem depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1102 df-3an 1103 df-tru 1570 df-fal 1580 df-ex 1807 df-nf 1811 df-sb 2098 df-mo 2573 df-eu 2603 df-clab 2748 df-cleq 2761 df-clel 2844 df-nfc 2918 df-ne 2965 df-nel 3071 df-ral 3086 df-rex 3096 df-rmo 3376 df-reu 3377 df-rab 3424 df-v 3465 df-sbc 3754 df-csb 3862 df-dif 3916 df-un 3918 df-in 3920 df-ss 3930 df-pss 3933 df-symdif 4214 df-nul 4295 df-if 4493 df-pw 4569 df-sn 4595 df-pr 4597 df-tp 4599 df-op 4601 df-uni 4877 df-int 4917 df-iun 4962 df-iin 4963 df-disj 5081 df-br 5114 df-opab 5178 df-mpt 5197 df-tr 5223 df-id 5557 df-eprel 5562 df-po 5570 df-so 5571 df-fr 5615 df-se 5616 df-we 5617 df-xp 5668 df-rel 5669 df-cnv 5670 df-co 5671 df-dm 5672 df-rn 5673 df-res 5674 df-ima 5675 df-pred 6303 df-ord 6364 df-on 6365 df-lim 6366 df-suc 6367 df-iota 6493 df-fun 6539 df-fn 6540 df-f 6541 df-f1 6542 df-fo 6543 df-f1o 6544 df-fv 6545 df-isom 6546 df-riota 7368 df-ov 7414 df-oprab 7415 df-mpo 7416 df-of 7675 df-ofr 7676 df-om 7862 df-1st 7985 df-2nd 7986 df-supp 8156 df-frecs 8277 df-wrecs 8308 df-recs 8357 df-rdg 8396 df-1o 8452 df-2o 8453 df-oadd 8456 df-omul 8457 df-er 8693 df-map 8825 df-pm 8826 df-ixp 8895 df-en 8943 df-dom 8944 df-sdom 8945 df-fin 8946 df-fsupp 9321 df-fi 9370 df-sup 9401 df-inf 9402 df-oi 9471 df-dju 9886 df-card 9924 df-acn 9927 df-pnf 11244 df-mnf 11245 df-xr 11246 df-ltxr 11247 df-le 11248 df-sub 11442 df-neg 11443 df-div 11871 df-nn 12233 df-2 12302 df-3 12303 df-4 12304 df-5 12305 df-6 12306 df-7 12307 df-8 12308 df-9 12309 df-n0 12504 df-z 12591 df-dec 12711 df-uz 12862 df-q 12972 df-rp 13016 df-xneg 13136 df-xadd 13137 df-xmul 13138 df-ioo 13375 df-ioc 13376 df-ico 13377 df-icc 13378 df-fz 13535 df-fzo 13682 df-fl 13824 df-mod 13902 df-seq 14037 df-exp 14097 df-fac 14309 df-bc 14338 df-hash 14366 df-shft 15103 df-cj 15149 df-re 15150 df-im 15151 df-sqrt 15285 df-abs 15286 df-limsup 15521 df-clim 15538 df-rlim 15539 df-sum 15737 df-ef 16120 df-sin 16122 df-cos 16123 df-struct 17206 df-sets 17223 df-slot 17241 df-ndx 17253 df-base 17269 df-ress 17290 df-plusg 17322 df-mulr 17323 df-starv 17324 df-sca 17325 df-vsca 17326 df-ip 17327 df-tset 17328 df-ple 17329 df-ds 17331 df-unif 17332 df-hom 17333 df-cco 17334 df-rest 17474 df-topn 17475 df-0g 17493 df-gsum 17494 df-topgen 17495 df-pt 17496 df-prds 17499 df-xrs 17555 df-qtop 17560 df-imas 17561 df-xps 17563 df-mre 17637 df-mrc 17638 df-acs 17640 df-mgm 18697 df-sgrp 18776 df-mnd 18792 df-submnd 18841 df-mulg 19133 df-cntz 19386 df-cmn 19851 df-psmet 21482 df-xmet 21483 df-met 21484 df-bl 21485 df-mopn 21486 df-fbas 21487 df-fg 21488 df-cnfld 21491 df-top 23019 df-topon 23036 df-topsp 23058 df-bases 23071 df-cld 23144 df-ntr 23145 df-cls 23146 df-nei 23223 df-lp 23261 df-perf 23262 df-cn 23352 df-cnp 23353 df-haus 23440 df-cmp 23512 df-tx 23687 df-hmeo 23880 df-fil 23971 df-fm 24063 df-flim 24064 df-flf 24065 df-xms 24445 df-ms 24446 df-tms 24447 df-cncf 25005 df-ovol 25591 df-vol 25592 df-mbf 25746 df-itg1 25747 df-itg2 25748 df-ibl 25749 df-itg 25750 df-0p 25797 df-limc 25993 df-dv 25994

This theorem is referenced by: fourierdlem73 46784

W3C validator