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 44377

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 24256	. . . . . 6 ⊢ (𝐹 ∈ ((𝐴[,]𝐵)–cn→ℂ) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
6	4, 5	syl 17	. . . . 5 ⊢ (𝜑 → 𝐹:(𝐴[,]𝐵)⟶ℂ)
7	6	feqmptd 6910	. . . 4 ⊢ (𝜑 → 𝐹 = (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥)))
8	7	eqcomd 2742	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥)) = 𝐹)
9	8, 4	eqeltrd 2838	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
10		coscn 25804	. . . . . 6 ⊢ cos ∈ (ℂ–cn→ℂ)
11	10	a1i 11	. . . . 5 ⊢ (𝜑 → cos ∈ (ℂ–cn→ℂ))
12	1, 2	iccssred 13351	. . . . . . . 8 ⊢ (𝜑 → (𝐴[,]𝐵) ⊆ ℝ)
13		ax-resscn 11108	. . . . . . . 8 ⊢ ℝ ⊆ ℂ
14	12, 13	sstrdi 3956	. . . . . . 7 ⊢ (𝜑 → (𝐴[,]𝐵) ⊆ ℂ)
15		fourierdlem39.r	. . . . . . . . 9 ⊢ (𝜑 → 𝑅 ∈ ℝ⁺)
16	15	rpred 12957	. . . . . . . 8 ⊢ (𝜑 → 𝑅 ∈ ℝ)
17	16	recnd 11183	. . . . . . 7 ⊢ (𝜑 → 𝑅 ∈ ℂ)
18		ssid 3966	. . . . . . . 8 ⊢ ℂ ⊆ ℂ
19	18	a1i 11	. . . . . . 7 ⊢ (𝜑 → ℂ ⊆ ℂ)
20	14, 17, 19	constcncfg 44103	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ 𝑅) ∈ ((𝐴[,]𝐵)–cn→ℂ))
21	14, 19	idcncfg 44104	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ 𝑥) ∈ ((𝐴[,]𝐵)–cn→ℂ))
22	20, 21	mulcncf 24810	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝑅 · 𝑥)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
23	11, 22	cncfmpt1f 24277	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ (cos‘(𝑅 · 𝑥))) ∈ ((𝐴[,]𝐵)–cn→ℂ))
24	15	rpcnne0d 12966	. . . . . 6 ⊢ (𝜑 → (𝑅 ∈ ℂ ∧ 𝑅 ≠ 0))
25		eldifsn 4747	. . . . . 6 ⊢ (𝑅 ∈ (ℂ ∖ {0}) ↔ (𝑅 ∈ ℂ ∧ 𝑅 ≠ 0))
26	24, 25	sylibr 233	. . . . 5 ⊢ (𝜑 → 𝑅 ∈ (ℂ ∖ {0}))
27		difssd 4092	. . . . 5 ⊢ (𝜑 → (ℂ ∖ {0}) ⊆ ℂ)
28	14, 26, 27	constcncfg 44103	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ 𝑅) ∈ ((𝐴[,]𝐵)–cn→(ℂ ∖ {0})))
29	23, 28	divcncf 24811	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ ((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
30	29	negcncfg 44112	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴[,]𝐵) ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ((𝐴[,]𝐵)–cn→ℂ))
31		fourierdlem39.gcn	. . . . . 6 ⊢ (𝜑 → 𝐺 ∈ ((𝐴(,)𝐵)–cn→ℂ))
32		cncff 24256	. . . . . 6 ⊢ (𝐺 ∈ ((𝐴(,)𝐵)–cn→ℂ) → 𝐺:(𝐴(,)𝐵)⟶ℂ)
33	31, 32	syl 17	. . . . 5 ⊢ (𝜑 → 𝐺:(𝐴(,)𝐵)⟶ℂ)
34	33	feqmptd 6910	. . . 4 ⊢ (𝜑 → 𝐺 = (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐺‘𝑥)))
35	34	eqcomd 2742	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐺‘𝑥)) = 𝐺)
36	35, 31	eqeltrd 2838	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐺‘𝑥)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
37		sincn 25803	. . . 4 ⊢ sin ∈ (ℂ–cn→ℂ)
38	37	a1i 11	. . 3 ⊢ (𝜑 → sin ∈ (ℂ–cn→ℂ))
39		ioosscn 13326	. . . . . 6 ⊢ (𝐴(,)𝐵) ⊆ ℂ
40	39	a1i 11	. . . . 5 ⊢ (𝜑 → (𝐴(,)𝐵) ⊆ ℂ)
41	40, 17, 19	constcncfg 44103	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ 𝑅) ∈ ((𝐴(,)𝐵)–cn→ℂ))
42	40, 19	idcncfg 44104	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ 𝑥) ∈ ((𝐴(,)𝐵)–cn→ℂ))
43	41, 42	mulcncf 24810	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝑅 · 𝑥)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
44	38, 43	cncfmpt1f 24277	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (sin‘(𝑅 · 𝑥))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
45		ioombl 24929	. . . 4 ⊢ (𝐴(,)𝐵) ∈ dom vol
46	45	a1i 11	. . 3 ⊢ (𝜑 → (𝐴(,)𝐵) ∈ dom vol)
47		volioo 24933	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐴 ≤ 𝐵) → (vol‘(𝐴(,)𝐵)) = (𝐵 − 𝐴))
48	1, 2, 3, 47	syl3anc 1371	. . . 4 ⊢ (𝜑 → (vol‘(𝐴(,)𝐵)) = (𝐵 − 𝐴))
49	2, 1	resubcld 11583	. . . 4 ⊢ (𝜑 → (𝐵 − 𝐴) ∈ ℝ)
50	48, 49	eqeltrd 2838	. . 3 ⊢ (𝜑 → (vol‘(𝐴(,)𝐵)) ∈ ℝ)
51		eqid 2736	. . . . 5 ⊢ (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥)) = (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥))
52		ioossicc 13350	. . . . . 6 ⊢ (𝐴(,)𝐵) ⊆ (𝐴[,]𝐵)
53	52	a1i 11	. . . . 5 ⊢ (𝜑 → (𝐴(,)𝐵) ⊆ (𝐴[,]𝐵))
54	6	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
55	53	sselda 3944	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑥 ∈ (𝐴[,]𝐵))
56	54, 55	ffvelcdmd 7036	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (𝐹‘𝑥) ∈ ℂ)
57	51, 9, 53, 19, 56	cncfmptssg 44102	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐹‘𝑥)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
58	57, 44	mulcncf 24810	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
59		cniccbdd 24825	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ ∧ 𝐹 ∈ ((𝐴[,]𝐵)–cn→ℂ)) → ∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
60	1, 2, 4, 59	syl3anc 1371	. . . . 5 ⊢ (𝜑 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
61		nfra1 3267	. . . . . . . 8 ⊢ Ⅎ𝑧∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦
62	52	sseli 3940	. . . . . . . . . 10 ⊢ (𝑧 ∈ (𝐴(,)𝐵) → 𝑧 ∈ (𝐴[,]𝐵))
63		rspa 3231	. . . . . . . . . 10 ⊢ ((∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 ∧ 𝑧 ∈ (𝐴[,]𝐵)) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
64	62, 63	sylan2 593	. . . . . . . . 9 ⊢ ((∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
65	64	ex 413	. . . . . . . 8 ⊢ (∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → (𝑧 ∈ (𝐴(,)𝐵) → (abs‘(𝐹‘𝑧)) ≤ 𝑦))
66	61, 65	ralrimi 3240	. . . . . . 7 ⊢ (∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
67	66	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦))
68	67	reximdva 3165	. . . . 5 ⊢ (𝜑 → (∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴[,]𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦))
69	60, 68	mpd 15	. . . 4 ⊢ (𝜑 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
70		nfv 1917	. . . . . . . 8 ⊢ Ⅎ𝑧(𝜑 ∧ 𝑦 ∈ ℝ)
71		nfra1 3267	. . . . . . . 8 ⊢ Ⅎ𝑧∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦
72	70, 71	nfan 1902	. . . . . . 7 ⊢ Ⅎ𝑧((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
73		simpll 765	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → (𝜑 ∧ 𝑦 ∈ ℝ))
74		simpr 485	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))))
75	16	adantr 481	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℝ)
76		elioore 13294	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ (𝐴(,)𝐵) → 𝑥 ∈ ℝ)
77	76	adantl 482	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑥 ∈ ℝ)
78	75, 77	remulcld 11185	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑥) ∈ ℝ)
79	78	resincld 16025	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (sin‘(𝑅 · 𝑥)) ∈ ℝ)
80	79	recnd 11183	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (sin‘(𝑅 · 𝑥)) ∈ ℂ)
81	56, 80	mulcld 11175	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) ∈ ℂ)
82	81	ralrimiva 3143	. . . . . . . . . . . . 13 ⊢ (𝜑 → ∀𝑥 ∈ (𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) ∈ ℂ)
83		dmmptg 6194	. . . . . . . . . . . . 13 ⊢ (∀𝑥 ∈ (𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) ∈ ℂ → dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) = (𝐴(,)𝐵))
84	82, 83	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) = (𝐴(,)𝐵))
85	84	adantr 481	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) = (𝐴(,)𝐵))
86	74, 85	eleqtrd 2840	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → 𝑧 ∈ (𝐴(,)𝐵))
87	86	ad4ant14 750	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → 𝑧 ∈ (𝐴(,)𝐵))
88		simplr 767	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦)
89	86	adantlr 713	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → 𝑧 ∈ (𝐴(,)𝐵))
90		rspa 3231	. . . . . . . . . . 11 ⊢ ((∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
91	88, 89, 90	syl2anc 584	. . . . . . . . . 10 ⊢ (((𝜑 ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
92	91	adantllr 717	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
93		eqidd 2737	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))))
94		fveq2 6842	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑧 → (𝐹‘𝑥) = (𝐹‘𝑧))
95		oveq2 7365	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = 𝑧 → (𝑅 · 𝑥) = (𝑅 · 𝑧))
96	95	fveq2d 6846	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 = 𝑧 → (sin‘(𝑅 · 𝑥)) = (sin‘(𝑅 · 𝑧)))
97	94, 96	oveq12d 7375	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 = 𝑧 → ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) = ((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧))))
98	97	adantl 482	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ 𝑥 = 𝑧) → ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) = ((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧))))
99		simpr 485	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ (𝐴(,)𝐵))
100	6	adantr 481	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝐹:(𝐴[,]𝐵)⟶ℂ)
101	52, 99	sselid 3942	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ (𝐴[,]𝐵))
102	100, 101	ffvelcdmd 7036	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝐹‘𝑧) ∈ ℂ)
103	17	adantr 481	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℂ)
104	39, 99	sselid 3942	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ ℂ)
105	103, 104	mulcld 11175	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑧) ∈ ℂ)
106	105	sincld 16012	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (sin‘(𝑅 · 𝑧)) ∈ ℂ)
107	102, 106	mulcld 11175	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧))) ∈ ℂ)
108	93, 98, 99, 107	fvmptd 6955	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧) = ((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧))))
109	108	fveq2d 6846	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) = (abs‘((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧)))))
110	102, 106	absmuld 15339	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝐹‘𝑧) · (sin‘(𝑅 · 𝑧)))) = ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))))
111	109, 110	eqtrd 2776	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) = ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))))
112	111	adantlr 713	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) = ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))))
113	112	adantr 481	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) = ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))))
114		simplll 773	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝜑)
115		simplr 767	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑧 ∈ (𝐴(,)𝐵))
116	114, 115, 102	syl2anc 584	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝐹‘𝑧) ∈ ℂ)
117	116	abscld 15321	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘(𝐹‘𝑧)) ∈ ℝ)
118	17	ad3antrrr 728	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑅 ∈ ℂ)
119	39, 115	sselid 3942	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑧 ∈ ℂ)
120	118, 119	mulcld 11175	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝑅 · 𝑧) ∈ ℂ)
121	120	sincld 16012	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (sin‘(𝑅 · 𝑧)) ∈ ℂ)
122	121	abscld 15321	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘(sin‘(𝑅 · 𝑧))) ∈ ℝ)
123	117, 122	remulcld 11185	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ∈ ℝ)
124		1red 11156	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 1 ∈ ℝ)
125	117, 124	remulcld 11185	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · 1) ∈ ℝ)
126		simpllr 774	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑦 ∈ ℝ)
127	126, 124	remulcld 11185	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝑦 · 1) ∈ ℝ)
128	106	abscld 15321	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(sin‘(𝑅 · 𝑧))) ∈ ℝ)
129		1red 11156	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 1 ∈ ℝ)
130	102	abscld 15321	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐹‘𝑧)) ∈ ℝ)
131	102	absge0d 15329	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 0 ≤ (abs‘(𝐹‘𝑧)))
132	16	adantr 481	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℝ)
133		elioore 13294	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑧 ∈ (𝐴(,)𝐵) → 𝑧 ∈ ℝ)
134	133	adantl 482	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ ℝ)
135	132, 134	remulcld 11185	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑧) ∈ ℝ)
136		abssinbd 43519	. . . . . . . . . . . . . . . 16 ⊢ ((𝑅 · 𝑧) ∈ ℝ → (abs‘(sin‘(𝑅 · 𝑧))) ≤ 1)
137	135, 136	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(sin‘(𝑅 · 𝑧))) ≤ 1)
138	128, 129, 130, 131, 137	lemul2ad 12095	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ≤ ((abs‘(𝐹‘𝑧)) · 1))
139	138	adantlr 713	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ≤ ((abs‘(𝐹‘𝑧)) · 1))
140	139	adantr 481	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ≤ ((abs‘(𝐹‘𝑧)) · 1))
141		0le1 11678	. . . . . . . . . . . . . 14 ⊢ 0 ≤ 1
142	141	a1i 11	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 0 ≤ 1)
143		simpr 485	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘(𝐹‘𝑧)) ≤ 𝑦)
144	117, 126, 124, 142, 143	lemul1ad 12094	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · 1) ≤ (𝑦 · 1))
145	123, 125, 127, 140, 144	letrd 11312	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → ((abs‘(𝐹‘𝑧)) · (abs‘(sin‘(𝑅 · 𝑧)))) ≤ (𝑦 · 1))
146	113, 145	eqbrtrd 5127	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ (𝑦 · 1))
147	126	recnd 11183	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → 𝑦 ∈ ℂ)
148	147	mulid1d 11172	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝑦 · 1) = 𝑦)
149	146, 148	breqtrd 5131	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ (abs‘(𝐹‘𝑧)) ≤ 𝑦) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦)
150	73, 87, 92, 149	syl21anc 836	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦)
151	150	ex 413	. . . . . . 7 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) → (𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦))
152	72, 151	ralrimi 3240	. . . . . 6 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦) → ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦)
153	152	ex 413	. . . . 5 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦))
154	153	reximdva 3165	. . . 4 ⊢ (𝜑 → (∃𝑦 ∈ ℝ ∀𝑧 ∈ (𝐴(,)𝐵)(abs‘(𝐹‘𝑧)) ≤ 𝑦 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦))
155	69, 154	mpd 15	. . 3 ⊢ (𝜑 → ∃𝑦 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))))‘𝑧)) ≤ 𝑦)
156	46, 50, 58, 155	cnbdibl 44193	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥)))) ∈ 𝐿¹)
157	11, 43	cncfmpt1f 24277	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ (cos‘(𝑅 · 𝑥))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
158	40, 26, 27	constcncfg 44103	. . . . . 6 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ 𝑅) ∈ ((𝐴(,)𝐵)–cn→(ℂ ∖ {0})))
159	157, 158	divcncf 24811	. . . . 5 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
160	159	negcncfg 44112	. . . 4 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ((𝐴(,)𝐵)–cn→ℂ))
161	36, 160	mulcncf 24810	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) ∈ ((𝐴(,)𝐵)–cn→ℂ))
162		simpr 485	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑦 ∈ ℝ)
163	16	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑅 ∈ ℝ)
164	15	rpne0d 12962	. . . . . . . 8 ⊢ (𝜑 → 𝑅 ≠ 0)
165	164	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → 𝑅 ≠ 0)
166	162, 163, 165	redivcld 11983	. . . . . 6 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (𝑦 / 𝑅) ∈ ℝ)
167	166	adantr 481	. . . . 5 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) → (𝑦 / 𝑅) ∈ ℝ)
168		simpr 485	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))))
169	33	ffvelcdmda 7035	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (𝐺‘𝑥) ∈ ℂ)
170	17	adantr 481	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℂ)
171	76	recnd 11183	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 ∈ (𝐴(,)𝐵) → 𝑥 ∈ ℂ)
172	171	adantl 482	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑥 ∈ ℂ)
173	170, 172	mulcld 11175	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑥) ∈ ℂ)
174	173	coscld 16013	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (cos‘(𝑅 · 𝑥)) ∈ ℂ)
175	164	adantr 481	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → 𝑅 ≠ 0)
176	174, 170, 175	divcld 11931	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((cos‘(𝑅 · 𝑥)) / 𝑅) ∈ ℂ)
177	176	negcld 11499	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → -((cos‘(𝑅 · 𝑥)) / 𝑅) ∈ ℂ)
178	169, 177	mulcld 11175	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ℂ)
179	178	ralrimiva 3143	. . . . . . . . . . 11 ⊢ (𝜑 → ∀𝑥 ∈ (𝐴(,)𝐵)((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ℂ)
180	179	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → ∀𝑥 ∈ (𝐴(,)𝐵)((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ℂ)
181		dmmptg 6194	. . . . . . . . . 10 ⊢ (∀𝑥 ∈ (𝐴(,)𝐵)((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) ∈ ℂ → dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝐴(,)𝐵))
182	180, 181	syl 17	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝐴(,)𝐵))
183	168, 182	eleqtrd 2840	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → 𝑧 ∈ (𝐴(,)𝐵))
184	183	ad4ant14 750	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → 𝑧 ∈ (𝐴(,)𝐵))
185		eqidd 2737	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))))
186		fveq2 6842	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑧 → (𝐺‘𝑥) = (𝐺‘𝑧))
187	95	fveq2d 6846	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑧 → (cos‘(𝑅 · 𝑥)) = (cos‘(𝑅 · 𝑧)))
188	187	oveq1d 7372	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑧 → ((cos‘(𝑅 · 𝑥)) / 𝑅) = ((cos‘(𝑅 · 𝑧)) / 𝑅))
189	188	negeqd 11395	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑧 → -((cos‘(𝑅 · 𝑥)) / 𝑅) = -((cos‘(𝑅 · 𝑧)) / 𝑅))
190	186, 189	oveq12d 7375	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑧 → ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅)))
191	190	adantl 482	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) ∧ 𝑥 = 𝑧) → ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅)))
192	33	ffvelcdmda 7035	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝐺‘𝑧) ∈ ℂ)
193	105	coscld 16013	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (cos‘(𝑅 · 𝑧)) ∈ ℂ)
194	164	adantr 481	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ≠ 0)
195	193, 103, 194	divcld 11931	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((cos‘(𝑅 · 𝑧)) / 𝑅) ∈ ℂ)
196	195	negcld 11499	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → -((cos‘(𝑅 · 𝑧)) / 𝑅) ∈ ℂ)
197	192, 196	mulcld 11175	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅)) ∈ ℂ)
198	185, 191, 99, 197	fvmptd 6955	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧) = ((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅)))
199	198	fveq2d 6846	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) = (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))))
200	199	ad4ant14 750	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) = (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))))
201	33	ad2antrr 724	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) → 𝐺:(𝐴(,)𝐵)⟶ℂ)
202	201	ffvelcdmda 7035	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝐺‘𝑧) ∈ ℂ)
203	202	abscld 15321	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐺‘𝑧)) ∈ ℝ)
204		simpllr 774	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑦 ∈ ℝ)
205	17	ad3antrrr 728	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℂ)
206	104	ad4ant14 750	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑧 ∈ ℂ)
207	205, 206	mulcld 11175	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑅 · 𝑧) ∈ ℂ)
208	207	coscld 16013	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (cos‘(𝑅 · 𝑧)) ∈ ℂ)
209	164	ad3antrrr 728	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ≠ 0)
210	208, 205, 209	divcld 11931	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((cos‘(𝑅 · 𝑧)) / 𝑅) ∈ ℂ)
211	210	negcld 11499	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → -((cos‘(𝑅 · 𝑧)) / 𝑅) ∈ ℂ)
212	211	abscld 15321	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) ∈ ℝ)
213	15	rprecred 12968	. . . . . . . . . . 11 ⊢ (𝜑 → (1 / 𝑅) ∈ ℝ)
214	213	ad3antrrr 728	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (1 / 𝑅) ∈ ℝ)
215	202	absge0d 15329	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 0 ≤ (abs‘(𝐺‘𝑧)))
216	211	absge0d 15329	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 0 ≤ (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)))
217	186	fveq2d 6846	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑧 → (abs‘(𝐺‘𝑥)) = (abs‘(𝐺‘𝑧)))
218	217	breq1d 5115	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑧 → ((abs‘(𝐺‘𝑥)) ≤ 𝑦 ↔ (abs‘(𝐺‘𝑧)) ≤ 𝑦))
219	218	rspccva 3580	. . . . . . . . . . 11 ⊢ ((∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐺‘𝑧)) ≤ 𝑦)
220	219	adantll 712	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(𝐺‘𝑧)) ≤ 𝑦)
221	195	absnegd 15334	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) = (abs‘((cos‘(𝑅 · 𝑧)) / 𝑅)))
222	193, 103, 194	absdivd 15340	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((cos‘(𝑅 · 𝑧)) / 𝑅)) = ((abs‘(cos‘(𝑅 · 𝑧))) / (abs‘𝑅)))
223	15	rpge0d 12961	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 0 ≤ 𝑅)
224	16, 223	absidd 15307	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (abs‘𝑅) = 𝑅)
225	224	oveq2d 7373	. . . . . . . . . . . . . 14 ⊢ (𝜑 → ((abs‘(cos‘(𝑅 · 𝑧))) / (abs‘𝑅)) = ((abs‘(cos‘(𝑅 · 𝑧))) / 𝑅))
226	225	adantr 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(cos‘(𝑅 · 𝑧))) / (abs‘𝑅)) = ((abs‘(cos‘(𝑅 · 𝑧))) / 𝑅))
227	221, 222, 226	3eqtrd 2780	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) = ((abs‘(cos‘(𝑅 · 𝑧))) / 𝑅))
228	193	abscld 15321	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(cos‘(𝑅 · 𝑧))) ∈ ℝ)
229	15	adantr 481	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑅 ∈ ℝ⁺)
230		abscosbd 43502	. . . . . . . . . . . . . 14 ⊢ ((𝑅 · 𝑧) ∈ ℝ → (abs‘(cos‘(𝑅 · 𝑧))) ≤ 1)
231	135, 230	syl 17	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘(cos‘(𝑅 · 𝑧))) ≤ 1)
232	228, 129, 229, 231	lediv1dd 13015	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(cos‘(𝑅 · 𝑧))) / 𝑅) ≤ (1 / 𝑅))
233	227, 232	eqbrtrd 5127	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) ≤ (1 / 𝑅))
234	233	ad4ant14 750	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅)) ≤ (1 / 𝑅))
235	203, 204, 212, 214, 215, 216, 220, 234	lemul12ad 12097	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → ((abs‘(𝐺‘𝑧)) · (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅))) ≤ (𝑦 · (1 / 𝑅)))
236	192, 196	absmuld 15339	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))) = ((abs‘(𝐺‘𝑧)) · (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅))))
237	236	ad4ant14 750	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))) = ((abs‘(𝐺‘𝑧)) · (abs‘-((cos‘(𝑅 · 𝑧)) / 𝑅))))
238	204	recnd 11183	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → 𝑦 ∈ ℂ)
239	238, 205, 209	divrecd 11934	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (𝑦 / 𝑅) = (𝑦 · (1 / 𝑅)))
240	235, 237, 239	3brtr4d 5137	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝐺‘𝑧) · -((cos‘(𝑅 · 𝑧)) / 𝑅))) ≤ (𝑦 / 𝑅))
241	200, 240	eqbrtrd 5127	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ (𝐴(,)𝐵)) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅))
242	184, 241	syldan 591	. . . . . 6 ⊢ ((((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) ∧ 𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))) → (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅))
243	242	ralrimiva 3143	. . . . 5 ⊢ (((𝜑 ∧ 𝑦 ∈ ℝ) ∧ ∀𝑥 ∈ (𝐴(,)𝐵)(abs‘(𝐺‘𝑥)) ≤ 𝑦) → ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅))
244		breq2 5109	. . . . . . 7 ⊢ (𝑤 = (𝑦 / 𝑅) → ((abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤 ↔ (abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅)))
245	244	ralbidv 3174	. . . . . 6 ⊢ (𝑤 = (𝑦 / 𝑅) → (∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤 ↔ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ (𝑦 / 𝑅)))
246	245	rspcev 3581	. . . . 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 3159	. . 3 ⊢ (𝜑 → ∃𝑤 ∈ ℝ ∀𝑧 ∈ dom (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))(abs‘((𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)))‘𝑧)) ≤ 𝑤)
250	46, 50, 161, 249	cnbdibl 44193	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ ((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅))) ∈ 𝐿¹)
251	8	oveq2d 7373	. . 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 2780	. 2 ⊢ (𝜑 → (ℝ D (𝑥 ∈ (𝐴[,]𝐵) ↦ (𝐹‘𝑥))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ (𝐺‘𝑥)))
256		reelprrecn 11143	. . . . 5 ⊢ ℝ ∈ {ℝ, ℂ}
257	256	a1i 11	. . . 4 ⊢ (𝜑 → ℝ ∈ {ℝ, ℂ})
258	17	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑅 ∈ ℂ)
259		recn 11141	. . . . . . . . 9 ⊢ (𝑥 ∈ ℝ → 𝑥 ∈ ℂ)
260	259	adantl 482	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℂ)
261	258, 260	mulcld 11175	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑅 · 𝑥) ∈ ℂ)
262	261	coscld 16013	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (cos‘(𝑅 · 𝑥)) ∈ ℂ)
263	164	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑅 ≠ 0)
264	262, 258, 263	divcld 11931	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ((cos‘(𝑅 · 𝑥)) / 𝑅) ∈ ℂ)
265	264	negcld 11499	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → -((cos‘(𝑅 · 𝑥)) / 𝑅) ∈ ℂ)
266	16	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑅 ∈ ℝ)
267		simpr 485	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
268	266, 267	remulcld 11185	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑅 · 𝑥) ∈ ℝ)
269	268	resincld 16025	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (sin‘(𝑅 · 𝑥)) ∈ ℝ)
270	269	renegcld 11582	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → -(sin‘(𝑅 · 𝑥)) ∈ ℝ)
271	270, 266	remulcld 11185	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (-(sin‘(𝑅 · 𝑥)) · 𝑅) ∈ ℝ)
272	271, 266, 263	redivcld 11983	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → ((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) ∈ ℝ)
273	272	renegcld 11582	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) ∈ ℝ)
274		recoscl 16023	. . . . . . . . 9 ⊢ (𝑦 ∈ ℝ → (cos‘𝑦) ∈ ℝ)
275	274	adantl 482	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (cos‘𝑦) ∈ ℝ)
276	275	recnd 11183	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → (cos‘𝑦) ∈ ℂ)
277		resincl 16022	. . . . . . . . 9 ⊢ (𝑦 ∈ ℝ → (sin‘𝑦) ∈ ℝ)
278	277	renegcld 11582	. . . . . . . 8 ⊢ (𝑦 ∈ ℝ → -(sin‘𝑦) ∈ ℝ)
279	278	adantl 482	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑦 ∈ ℝ) → -(sin‘𝑦) ∈ ℝ)
280		1red 11156	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → 1 ∈ ℝ)
281	257	dvmptid 25321	. . . . . . . . 9 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ 𝑥)) = (𝑥 ∈ ℝ ↦ 1))
282	257, 260, 280, 281, 17	dvmptcmul 25328	. . . . . . . 8 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ (𝑅 · 𝑥))) = (𝑥 ∈ ℝ ↦ (𝑅 · 1)))
283	258	mulid1d 11172	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑥 ∈ ℝ) → (𝑅 · 1) = 𝑅)
284	283	mpteq2dva 5205	. . . . . . . 8 ⊢ (𝜑 → (𝑥 ∈ ℝ ↦ (𝑅 · 1)) = (𝑥 ∈ ℝ ↦ 𝑅))
285	282, 284	eqtrd 2776	. . . . . . 7 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ (𝑅 · 𝑥))) = (𝑥 ∈ ℝ ↦ 𝑅))
286		dvcosre 44143	. . . . . . . 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 11395	. . . . . . 7 ⊢ (𝑦 = (𝑅 · 𝑥) → -(sin‘𝑦) = -(sin‘(𝑅 · 𝑥)))
291	257, 257, 268, 266, 276, 279, 285, 287, 288, 290	dvmptco 25336	. . . . . 6 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ (cos‘(𝑅 · 𝑥)))) = (𝑥 ∈ ℝ ↦ (-(sin‘(𝑅 · 𝑥)) · 𝑅)))
292	257, 262, 271, 291, 17, 164	dvmptdivc 25329	. . . . 5 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ ((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ ℝ ↦ ((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅)))
293	257, 264, 272, 292	dvmptneg 25330	. . . 4 ⊢ (𝜑 → (ℝ D (𝑥 ∈ ℝ ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ ℝ ↦ -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅)))
294		eqid 2736	. . . . 5 ⊢ (TopOpen‘ℂ_fld) = (TopOpen‘ℂ_fld)
295	294	tgioo2 24166	. . . 4 ⊢ (topGen‘ran (,)) = ((TopOpen‘ℂ_fld) ↾_t ℝ)
296		iccntr 24184	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → ((int‘(topGen‘ran (,)))‘(𝐴[,]𝐵)) = (𝐴(,)𝐵))
297	1, 2, 296	syl2anc 584	. . . 4 ⊢ (𝜑 → ((int‘(topGen‘ran (,)))‘(𝐴[,]𝐵)) = (𝐴(,)𝐵))
298	257, 265, 273, 293, 12, 295, 294, 297	dvmptres2 25326	. . 3 ⊢ (𝜑 → (ℝ D (𝑥 ∈ (𝐴[,]𝐵) ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅)))
299	80, 170	mulneg1d 11608	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (-(sin‘(𝑅 · 𝑥)) · 𝑅) = -((sin‘(𝑅 · 𝑥)) · 𝑅))
300	299	oveq1d 7372	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (-((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
301	80, 170	mulcld 11175	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((sin‘(𝑅 · 𝑥)) · 𝑅) ∈ ℂ)
302	301, 170, 175	divnegd 11944	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → -(((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (-((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
303	300, 302	eqtr4d 2779	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → ((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = -(((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
304	303	negeqd 11395	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = --(((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
305	301, 170, 175	divcld 11931	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) ∈ ℂ)
306	305	negnegd 11503	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → --(((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅))
307	80, 170, 175	divcan4d 11937	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → (((sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (sin‘(𝑅 · 𝑥)))
308	304, 306, 307	3eqtrd 2780	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝐴(,)𝐵)) → -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅) = (sin‘(𝑅 · 𝑥)))
309	308	mpteq2dva 5205	. . 3 ⊢ (𝜑 → (𝑥 ∈ (𝐴(,)𝐵) ↦ -((-(sin‘(𝑅 · 𝑥)) · 𝑅) / 𝑅)) = (𝑥 ∈ (𝐴(,)𝐵) ↦ (sin‘(𝑅 · 𝑥))))
310	298, 309	eqtrd 2776	. 2 ⊢ (𝜑 → (ℝ D (𝑥 ∈ (𝐴[,]𝐵) ↦ -((cos‘(𝑅 · 𝑥)) / 𝑅))) = (𝑥 ∈ (𝐴(,)𝐵) ↦ (sin‘(𝑅 · 𝑥))))
311		fveq2 6842	. . . 4 ⊢ (𝑥 = 𝐴 → (𝐹‘𝑥) = (𝐹‘𝐴))
312		oveq2 7365	. . . . . . 7 ⊢ (𝑥 = 𝐴 → (𝑅 · 𝑥) = (𝑅 · 𝐴))
313	312	fveq2d 6846	. . . . . 6 ⊢ (𝑥 = 𝐴 → (cos‘(𝑅 · 𝑥)) = (cos‘(𝑅 · 𝐴)))
314	313	oveq1d 7372	. . . . 5 ⊢ (𝑥 = 𝐴 → ((cos‘(𝑅 · 𝑥)) / 𝑅) = ((cos‘(𝑅 · 𝐴)) / 𝑅))
315	314	negeqd 11395	. . . 4 ⊢ (𝑥 = 𝐴 → -((cos‘(𝑅 · 𝑥)) / 𝑅) = -((cos‘(𝑅 · 𝐴)) / 𝑅))
316	311, 315	oveq12d 7375	. . 3 ⊢ (𝑥 = 𝐴 → ((𝐹‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐹‘𝐴) · -((cos‘(𝑅 · 𝐴)) / 𝑅)))
317	316	adantl 482	. 2 ⊢ ((𝜑 ∧ 𝑥 = 𝐴) → ((𝐹‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐹‘𝐴) · -((cos‘(𝑅 · 𝐴)) / 𝑅)))
318		fveq2 6842	. . . 4 ⊢ (𝑥 = 𝐵 → (𝐹‘𝑥) = (𝐹‘𝐵))
319		oveq2 7365	. . . . . . 7 ⊢ (𝑥 = 𝐵 → (𝑅 · 𝑥) = (𝑅 · 𝐵))
320	319	fveq2d 6846	. . . . . 6 ⊢ (𝑥 = 𝐵 → (cos‘(𝑅 · 𝑥)) = (cos‘(𝑅 · 𝐵)))
321	320	oveq1d 7372	. . . . 5 ⊢ (𝑥 = 𝐵 → ((cos‘(𝑅 · 𝑥)) / 𝑅) = ((cos‘(𝑅 · 𝐵)) / 𝑅))
322	321	negeqd 11395	. . . 4 ⊢ (𝑥 = 𝐵 → -((cos‘(𝑅 · 𝑥)) / 𝑅) = -((cos‘(𝑅 · 𝐵)) / 𝑅))
323	318, 322	oveq12d 7375	. . 3 ⊢ (𝑥 = 𝐵 → ((𝐹‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐹‘𝐵) · -((cos‘(𝑅 · 𝐵)) / 𝑅)))
324	323	adantl 482	. 2 ⊢ ((𝜑 ∧ 𝑥 = 𝐵) → ((𝐹‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) = ((𝐹‘𝐵) · -((cos‘(𝑅 · 𝐵)) / 𝑅)))
325	1, 2, 3, 9, 30, 36, 44, 156, 250, 255, 310, 317, 324	itgparts 25411	1 ⊢ (𝜑 → ∫(𝐴(,)𝐵)((𝐹‘𝑥) · (sin‘(𝑅 · 𝑥))) d𝑥 = ((((𝐹‘𝐵) · -((cos‘(𝑅 · 𝐵)) / 𝑅)) − ((𝐹‘𝐴) · -((cos‘(𝑅 · 𝐴)) / 𝑅))) − ∫(𝐴(,)𝐵)((𝐺‘𝑥) · -((cos‘(𝑅 · 𝑥)) / 𝑅)) d𝑥))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 396 = wceq 1541 ∈ wcel 2106 ≠ wne 2943 ∀wral 3064 ∃wrex 3073 ∖ cdif 3907 ⊆ wss 3910 {csn 4586 {cpr 4588 class class class wbr 5105 ↦ cmpt 5188 dom cdm 5633 ran crn 5634 ⟶wf 6492 ‘cfv 6496 (class class class)co 7357 ℂcc 11049 ℝcr 11050 0cc0 11051 1c1 11052 · cmul 11056 ≤ cle 11190 − cmin 11385 -cneg 11386 / cdiv 11812 ℝ⁺crp 12915 (,)cioo 13264 [,]cicc 13267 abscabs 15119 sincsin 15946 cosccos 15947 TopOpenctopn 17303 topGenctg 17319 ℂ_fldccnfld 20796 intcnt 22368 –cn→ccncf 24239 volcvol 24827 ∫citg 24982 D cdv 25227

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 1913 ax-6 1971 ax-7 2011 ax-8 2108 ax-9 2116 ax-10 2137 ax-11 2154 ax-12 2171 ax-ext 2707 ax-rep 5242 ax-sep 5256 ax-nul 5263 ax-pow 5320 ax-pr 5384 ax-un 7672 ax-inf2 9577 ax-cc 10371 ax-cnex 11107 ax-resscn 11108 ax-1cn 11109 ax-icn 11110 ax-addcl 11111 ax-addrcl 11112 ax-mulcl 11113 ax-mulrcl 11114 ax-mulcom 11115 ax-addass 11116 ax-mulass 11117 ax-distr 11118 ax-i2m1 11119 ax-1ne0 11120 ax-1rid 11121 ax-rnegex 11122 ax-rrecex 11123 ax-cnre 11124 ax-pre-lttri 11125 ax-pre-lttrn 11126 ax-pre-ltadd 11127 ax-pre-mulgt0 11128 ax-pre-sup 11129 ax-addf 11130 ax-mulf 11131

This theorem depends on definitions: df-bi 206 df-an 397 df-or 846 df-3or 1088 df-3an 1089 df-tru 1544 df-fal 1554 df-ex 1782 df-nf 1786 df-sb 2068 df-mo 2538 df-eu 2567 df-clab 2714 df-cleq 2728 df-clel 2814 df-nfc 2889 df-ne 2944 df-nel 3050 df-ral 3065 df-rex 3074 df-rmo 3353 df-reu 3354 df-rab 3408 df-v 3447 df-sbc 3740 df-csb 3856 df-dif 3913 df-un 3915 df-in 3917 df-ss 3927 df-pss 3929 df-symdif 4202 df-nul 4283 df-if 4487 df-pw 4562 df-sn 4587 df-pr 4589 df-tp 4591 df-op 4593 df-uni 4866 df-int 4908 df-iun 4956 df-iin 4957 df-disj 5071 df-br 5106 df-opab 5168 df-mpt 5189 df-tr 5223 df-id 5531 df-eprel 5537 df-po 5545 df-so 5546 df-fr 5588 df-se 5589 df-we 5590 df-xp 5639 df-rel 5640 df-cnv 5641 df-co 5642 df-dm 5643 df-rn 5644 df-res 5645 df-ima 5646 df-pred 6253 df-ord 6320 df-on 6321 df-lim 6322 df-suc 6323 df-iota 6448 df-fun 6498 df-fn 6499 df-f 6500 df-f1 6501 df-fo 6502 df-f1o 6503 df-fv 6504 df-isom 6505 df-riota 7313 df-ov 7360 df-oprab 7361 df-mpo 7362 df-of 7617 df-ofr 7618 df-om 7803 df-1st 7921 df-2nd 7922 df-supp 8093 df-frecs 8212 df-wrecs 8243 df-recs 8317 df-rdg 8356 df-1o 8412 df-2o 8413 df-oadd 8416 df-omul 8417 df-er 8648 df-map 8767 df-pm 8768 df-ixp 8836 df-en 8884 df-dom 8885 df-sdom 8886 df-fin 8887 df-fsupp 9306 df-fi 9347 df-sup 9378 df-inf 9379 df-oi 9446 df-dju 9837 df-card 9875 df-acn 9878 df-pnf 11191 df-mnf 11192 df-xr 11193 df-ltxr 11194 df-le 11195 df-sub 11387 df-neg 11388 df-div 11813 df-nn 12154 df-2 12216 df-3 12217 df-4 12218 df-5 12219 df-6 12220 df-7 12221 df-8 12222 df-9 12223 df-n0 12414 df-z 12500 df-dec 12619 df-uz 12764 df-q 12874 df-rp 12916 df-xneg 13033 df-xadd 13034 df-xmul 13035 df-ioo 13268 df-ioc 13269 df-ico 13270 df-icc 13271 df-fz 13425 df-fzo 13568 df-fl 13697 df-mod 13775 df-seq 13907 df-exp 13968 df-fac 14174 df-bc 14203 df-hash 14231 df-shft 14952 df-cj 14984 df-re 14985 df-im 14986 df-sqrt 15120 df-abs 15121 df-limsup 15353 df-clim 15370 df-rlim 15371 df-sum 15571 df-ef 15950 df-sin 15952 df-cos 15953 df-struct 17019 df-sets 17036 df-slot 17054 df-ndx 17066 df-base 17084 df-ress 17113 df-plusg 17146 df-mulr 17147 df-starv 17148 df-sca 17149 df-vsca 17150 df-ip 17151 df-tset 17152 df-ple 17153 df-ds 17155 df-unif 17156 df-hom 17157 df-cco 17158 df-rest 17304 df-topn 17305 df-0g 17323 df-gsum 17324 df-topgen 17325 df-pt 17326 df-prds 17329 df-xrs 17384 df-qtop 17389 df-imas 17390 df-xps 17392 df-mre 17466 df-mrc 17467 df-acs 17469 df-mgm 18497 df-sgrp 18546 df-mnd 18557 df-submnd 18602 df-mulg 18873 df-cntz 19097 df-cmn 19564 df-psmet 20788 df-xmet 20789 df-met 20790 df-bl 20791 df-mopn 20792 df-fbas 20793 df-fg 20794 df-cnfld 20797 df-top 22243 df-topon 22260 df-topsp 22282 df-bases 22296 df-cld 22370 df-ntr 22371 df-cls 22372 df-nei 22449 df-lp 22487 df-perf 22488 df-cn 22578 df-cnp 22579 df-haus 22666 df-cmp 22738 df-tx 22913 df-hmeo 23106 df-fil 23197 df-fm 23289 df-flim 23290 df-flf 23291 df-xms 23673 df-ms 23674 df-tms 23675 df-cncf 24241 df-ovol 24828 df-vol 24829 df-mbf 24983 df-itg1 24984 df-itg2 24985 df-ibl 24986 df-itg 24987 df-0p 25034 df-limc 25230 df-dv 25231

This theorem is referenced by: fourierdlem73 44410

W3C validator