fourierswlem - Mathbox for Glauco Siliprandi

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

Theorem fourierswlem 45647

Description: The Fourier series for the square wave 𝐹 converges to 𝑌, a simpler expression for this special case. (Contributed by Glauco Siliprandi, 11-Dec-2019.)

**Hypotheses**
Ref	Expression
fourierswlem.t	⊢ 𝑇 = (2 · π)
fourierswlem.f	⊢ 𝐹 = (𝑥 ∈ ℝ ↦ if((𝑥 mod 𝑇) < π, 1, -1))
fourierswlem.x	⊢ 𝑋 ∈ ℝ
fourierswlem.y	⊢ 𝑌 = if((𝑋 mod π) = 0, 0, (𝐹‘𝑋))

**Assertion**
Ref	Expression
fourierswlem	⊢ 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2)

Distinct variable groups: 𝑥,𝑇 𝑥,𝑋 Allowed substitution hints: 𝐹(𝑥) 𝑌(𝑥)

Proof of Theorem fourierswlem Dummy variable 𝑘 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		simpr 483	. . . . . . . . . 10 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → 2 ∥ (𝑋 / π))
2		2z 12632	. . . . . . . . . . . 12 ⊢ 2 ∈ ℤ
3	2	a1i 11	. . . . . . . . . . 11 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → 2 ∈ ℤ)
4		fourierswlem.x	. . . . . . . . . . . . . 14 ⊢ 𝑋 ∈ ℝ
5		pirp 26416	. . . . . . . . . . . . . 14 ⊢ π ∈ ℝ⁺
6		mod0 13881	. . . . . . . . . . . . . 14 ⊢ ((𝑋 ∈ ℝ ∧ π ∈ ℝ⁺) → ((𝑋 mod π) = 0 ↔ (𝑋 / π) ∈ ℤ))
7	4, 5, 6	mp2an 690	. . . . . . . . . . . . 13 ⊢ ((𝑋 mod π) = 0 ↔ (𝑋 / π) ∈ ℤ)
8	7	biimpi 215	. . . . . . . . . . . 12 ⊢ ((𝑋 mod π) = 0 → (𝑋 / π) ∈ ℤ)
9	8	adantr 479	. . . . . . . . . . 11 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (𝑋 / π) ∈ ℤ)
10		divides 16240	. . . . . . . . . . 11 ⊢ ((2 ∈ ℤ ∧ (𝑋 / π) ∈ ℤ) → (2 ∥ (𝑋 / π) ↔ ∃𝑘 ∈ ℤ (𝑘 · 2) = (𝑋 / π)))
11	3, 9, 10	syl2anc 582	. . . . . . . . . 10 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (2 ∥ (𝑋 / π) ↔ ∃𝑘 ∈ ℤ (𝑘 · 2) = (𝑋 / π)))
12	1, 11	mpbid 231	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → ∃𝑘 ∈ ℤ (𝑘 · 2) = (𝑋 / π))
13		2cnd 12328	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → 2 ∈ ℂ)
14		picn 26414	. . . . . . . . . . . . . . . . . . . 20 ⊢ π ∈ ℂ
15	14	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → π ∈ ℂ)
16		zcn 12601	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → 𝑘 ∈ ℂ)
17	13, 15, 16	mulassd 11275	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → ((2 · π) · 𝑘) = (2 · (π · 𝑘)))
18	15, 16	mulcld 11272	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → (π · 𝑘) ∈ ℂ)
19	13, 18	mulcomd 11273	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → (2 · (π · 𝑘)) = ((π · 𝑘) · 2))
20	17, 19	eqtrd 2768	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → ((2 · π) · 𝑘) = ((π · 𝑘) · 2))
21	20	adantr 479	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → ((2 · π) · 𝑘) = ((π · 𝑘) · 2))
22	15, 16, 13	mulassd 11275	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → ((π · 𝑘) · 2) = (π · (𝑘 · 2)))
23	22	adantr 479	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → ((π · 𝑘) · 2) = (π · (𝑘 · 2)))
24		id 22	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑘 · 2) = (𝑋 / π) → (𝑘 · 2) = (𝑋 / π))
25	24	eqcomd 2734	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 · 2) = (𝑋 / π) → (𝑋 / π) = (𝑘 · 2))
26	25	adantl 480	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (𝑋 / π) = (𝑘 · 2))
27	4	recni 11266	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑋 ∈ ℂ
28	27	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 𝑋 ∈ ℂ)
29	14	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → π ∈ ℂ)
30	16	adantr 479	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 𝑘 ∈ ℂ)
31		2cnd 12328	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 2 ∈ ℂ)
32	30, 31	mulcld 11272	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (𝑘 · 2) ∈ ℂ)
33		pire 26413	. . . . . . . . . . . . . . . . . . . 20 ⊢ π ∈ ℝ
34		pipos 26415	. . . . . . . . . . . . . . . . . . . 20 ⊢ 0 < π
35	33, 34	gt0ne0ii 11788	. . . . . . . . . . . . . . . . . . 19 ⊢ π ≠ 0
36	35	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → π ≠ 0)
37	28, 29, 32, 36	divmuld 12050	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → ((𝑋 / π) = (𝑘 · 2) ↔ (π · (𝑘 · 2)) = 𝑋))
38	26, 37	mpbid 231	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (π · (𝑘 · 2)) = 𝑋)
39	21, 23, 38	3eqtrrd 2773	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 𝑋 = ((2 · π) · 𝑘))
40		fourierswlem.t	. . . . . . . . . . . . . . . 16 ⊢ 𝑇 = (2 · π)
41	40	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 𝑇 = (2 · π))
42	39, 41	oveq12d 7444	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (𝑋 / 𝑇) = (((2 · π) · 𝑘) / (2 · π)))
43	13, 15	mulcld 11272	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ ℤ → (2 · π) ∈ ℂ)
44		2ne0 12354	. . . . . . . . . . . . . . . . . 18 ⊢ 2 ≠ 0
45	44	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → 2 ≠ 0)
46	35	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → π ≠ 0)
47	13, 15, 45, 46	mulne0d 11904	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ ℤ → (2 · π) ≠ 0)
48	16, 43, 47	divcan3d 12033	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ∈ ℤ → (((2 · π) · 𝑘) / (2 · π)) = 𝑘)
49	48	adantr 479	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (((2 · π) · 𝑘) / (2 · π)) = 𝑘)
50	42, 49	eqtrd 2768	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (𝑋 / 𝑇) = 𝑘)
51		simpl 481	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 𝑘 ∈ ℤ)
52	50, 51	eqeltrd 2829	. . . . . . . . . . . 12 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (𝑋 / 𝑇) ∈ ℤ)
53	52	ex 411	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℤ → ((𝑘 · 2) = (𝑋 / π) → (𝑋 / 𝑇) ∈ ℤ))
54	53	a1i 11	. . . . . . . . . 10 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (𝑘 ∈ ℤ → ((𝑘 · 2) = (𝑋 / π) → (𝑋 / 𝑇) ∈ ℤ)))
55	54	rexlimdv 3150	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (∃𝑘 ∈ ℤ (𝑘 · 2) = (𝑋 / π) → (𝑋 / 𝑇) ∈ ℤ))
56	12, 55	mpd 15	. . . . . . . 8 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (𝑋 / 𝑇) ∈ ℤ)
57		2re 12324	. . . . . . . . . . . 12 ⊢ 2 ∈ ℝ
58	57, 33	remulcli 11268	. . . . . . . . . . 11 ⊢ (2 · π) ∈ ℝ
59	40, 58	eqeltri 2825	. . . . . . . . . 10 ⊢ 𝑇 ∈ ℝ
60		2pos 12353	. . . . . . . . . . . 12 ⊢ 0 < 2
61	57, 33, 60, 34	mulgt0ii 11385	. . . . . . . . . . 11 ⊢ 0 < (2 · π)
62	61, 40	breqtrri 5179	. . . . . . . . . 10 ⊢ 0 < 𝑇
63	59, 62	elrpii 13017	. . . . . . . . 9 ⊢ 𝑇 ∈ ℝ⁺
64		mod0 13881	. . . . . . . . 9 ⊢ ((𝑋 ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) → ((𝑋 mod 𝑇) = 0 ↔ (𝑋 / 𝑇) ∈ ℤ))
65	4, 63, 64	mp2an 690	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) = 0 ↔ (𝑋 / 𝑇) ∈ ℤ)
66	56, 65	sylibr 233	. . . . . . 7 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (𝑋 mod 𝑇) = 0)
67	66	orcd 871	. . . . . 6 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → ((𝑋 mod 𝑇) = 0 ∨ (𝑋 mod 𝑇) = π))
68		odd2np1 16325	. . . . . . . . . 10 ⊢ ((𝑋 / π) ∈ ℤ → (¬ 2 ∥ (𝑋 / π) ↔ ∃𝑘 ∈ ℤ ((2 · 𝑘) + 1) = (𝑋 / π)))
69	7, 68	sylbi 216	. . . . . . . . 9 ⊢ ((𝑋 mod π) = 0 → (¬ 2 ∥ (𝑋 / π) ↔ ∃𝑘 ∈ ℤ ((2 · 𝑘) + 1) = (𝑋 / π)))
70	69	biimpa 475	. . . . . . . 8 ⊢ (((𝑋 mod π) = 0 ∧ ¬ 2 ∥ (𝑋 / π)) → ∃𝑘 ∈ ℤ ((2 · 𝑘) + 1) = (𝑋 / π))
71	13, 16	mulcld 11272	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → (2 · 𝑘) ∈ ℂ)
72	71	adantr 479	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (2 · 𝑘) ∈ ℂ)
73		1cnd 11247	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → 1 ∈ ℂ)
74	14	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → π ∈ ℂ)
75	72, 73, 74	adddird 11277	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (((2 · 𝑘) + 1) · π) = (((2 · 𝑘) · π) + (1 · π)))
76	13, 16	mulcomd 11273	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → (2 · 𝑘) = (𝑘 · 2))
77	76	oveq1d 7441	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → ((2 · 𝑘) · π) = ((𝑘 · 2) · π))
78	16, 13, 15	mulassd 11275	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → ((𝑘 · 2) · π) = (𝑘 · (2 · π)))
79	40	eqcomi 2737	. . . . . . . . . . . . . . . . . . . 20 ⊢ (2 · π) = 𝑇
80	79	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → (2 · π) = 𝑇)
81	80	oveq2d 7442	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → (𝑘 · (2 · π)) = (𝑘 · 𝑇))
82	77, 78, 81	3eqtrd 2772	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → ((2 · 𝑘) · π) = (𝑘 · 𝑇))
83	14	mullidi 11257	. . . . . . . . . . . . . . . . . 18 ⊢ (1 · π) = π
84	83	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → (1 · π) = π)
85	82, 84	oveq12d 7444	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ ℤ → (((2 · 𝑘) · π) + (1 · π)) = ((𝑘 · 𝑇) + π))
86	85	adantr 479	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (((2 · 𝑘) · π) + (1 · π)) = ((𝑘 · 𝑇) + π))
87	40, 43	eqeltrid 2833	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → 𝑇 ∈ ℂ)
88	16, 87	mulcld 11272	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → (𝑘 · 𝑇) ∈ ℂ)
89	88, 15	addcomd 11454	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ ℤ → ((𝑘 · 𝑇) + π) = (π + (𝑘 · 𝑇)))
90	89	adantr 479	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → ((𝑘 · 𝑇) + π) = (π + (𝑘 · 𝑇)))
91	75, 86, 90	3eqtrrd 2773	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (π + (𝑘 · 𝑇)) = (((2 · 𝑘) + 1) · π))
92		peano2cn 11424	. . . . . . . . . . . . . . . . 17 ⊢ ((2 · 𝑘) ∈ ℂ → ((2 · 𝑘) + 1) ∈ ℂ)
93	71, 92	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ ℤ → ((2 · 𝑘) + 1) ∈ ℂ)
94	93, 15	mulcomd 11273	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ∈ ℤ → (((2 · 𝑘) + 1) · π) = (π · ((2 · 𝑘) + 1)))
95	94	adantr 479	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (((2 · 𝑘) + 1) · π) = (π · ((2 · 𝑘) + 1)))
96		id 22	. . . . . . . . . . . . . . . . 17 ⊢ (((2 · 𝑘) + 1) = (𝑋 / π) → ((2 · 𝑘) + 1) = (𝑋 / π))
97	96	eqcomd 2734	. . . . . . . . . . . . . . . 16 ⊢ (((2 · 𝑘) + 1) = (𝑋 / π) → (𝑋 / π) = ((2 · 𝑘) + 1))
98	97	adantl 480	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (𝑋 / π) = ((2 · 𝑘) + 1))
99	27	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → 𝑋 ∈ ℂ)
100	93	adantr 479	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → ((2 · 𝑘) + 1) ∈ ℂ)
101	35	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → π ≠ 0)
102	99, 74, 100, 101	divmuld 12050	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → ((𝑋 / π) = ((2 · 𝑘) + 1) ↔ (π · ((2 · 𝑘) + 1)) = 𝑋))
103	98, 102	mpbid 231	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (π · ((2 · 𝑘) + 1)) = 𝑋)
104	91, 95, 103	3eqtrrd 2773	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → 𝑋 = (π + (𝑘 · 𝑇)))
105	104	oveq1d 7441	. . . . . . . . . . . 12 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (𝑋 mod 𝑇) = ((π + (𝑘 · 𝑇)) mod 𝑇))
106		modcyc 13911	. . . . . . . . . . . . . 14 ⊢ ((π ∈ ℝ ∧ 𝑇 ∈ ℝ⁺ ∧ 𝑘 ∈ ℤ) → ((π + (𝑘 · 𝑇)) mod 𝑇) = (π mod 𝑇))
107	33, 63, 106	mp3an12 1447	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℤ → ((π + (𝑘 · 𝑇)) mod 𝑇) = (π mod 𝑇))
108	107	adantr 479	. . . . . . . . . . . 12 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → ((π + (𝑘 · 𝑇)) mod 𝑇) = (π mod 𝑇))
109	33	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → π ∈ ℝ)
110	63	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → 𝑇 ∈ ℝ⁺)
111		0re 11254	. . . . . . . . . . . . . . 15 ⊢ 0 ∈ ℝ
112	111, 33, 34	ltleii 11375	. . . . . . . . . . . . . 14 ⊢ 0 ≤ π
113	112	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → 0 ≤ π)
114		2timesgt 44699	. . . . . . . . . . . . . . . 16 ⊢ (π ∈ ℝ⁺ → π < (2 · π))
115	5, 114	ax-mp 5	. . . . . . . . . . . . . . 15 ⊢ π < (2 · π)
116	115, 40	breqtrri 5179	. . . . . . . . . . . . . 14 ⊢ π < 𝑇
117	116	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → π < 𝑇)
118		modid 13901	. . . . . . . . . . . . 13 ⊢ (((π ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) ∧ (0 ≤ π ∧ π < 𝑇)) → (π mod 𝑇) = π)
119	109, 110, 113, 117, 118	syl22anc 837	. . . . . . . . . . . 12 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (π mod 𝑇) = π)
120	105, 108, 119	3eqtrd 2772	. . . . . . . . . . 11 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (𝑋 mod 𝑇) = π)
121	120	ex 411	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℤ → (((2 · 𝑘) + 1) = (𝑋 / π) → (𝑋 mod 𝑇) = π))
122	121	a1i 11	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ ¬ 2 ∥ (𝑋 / π)) → (𝑘 ∈ ℤ → (((2 · 𝑘) + 1) = (𝑋 / π) → (𝑋 mod 𝑇) = π)))
123	122	rexlimdv 3150	. . . . . . . 8 ⊢ (((𝑋 mod π) = 0 ∧ ¬ 2 ∥ (𝑋 / π)) → (∃𝑘 ∈ ℤ ((2 · 𝑘) + 1) = (𝑋 / π) → (𝑋 mod 𝑇) = π))
124	70, 123	mpd 15	. . . . . . 7 ⊢ (((𝑋 mod π) = 0 ∧ ¬ 2 ∥ (𝑋 / π)) → (𝑋 mod 𝑇) = π)
125	124	olcd 872	. . . . . 6 ⊢ (((𝑋 mod π) = 0 ∧ ¬ 2 ∥ (𝑋 / π)) → ((𝑋 mod 𝑇) = 0 ∨ (𝑋 mod 𝑇) = π))
126	67, 125	pm2.61dan 811	. . . . 5 ⊢ ((𝑋 mod π) = 0 → ((𝑋 mod 𝑇) = 0 ∨ (𝑋 mod 𝑇) = π))
127		0xr 11299	. . . . . . . 8 ⊢ 0 ∈ ℝ^*
128	33	rexri 11310	. . . . . . . 8 ⊢ π ∈ ℝ^*
129		iocgtlb 44916	. . . . . . . 8 ⊢ ((0 ∈ ℝ^* ∧ π ∈ ℝ^* ∧ (𝑋 mod 𝑇) ∈ (0(,]π)) → 0 < (𝑋 mod 𝑇))
130	127, 128, 129	mp3an12 1447	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) ∈ (0(,]π) → 0 < (𝑋 mod 𝑇))
131	130	gt0ne0d 11816	. . . . . 6 ⊢ ((𝑋 mod 𝑇) ∈ (0(,]π) → (𝑋 mod 𝑇) ≠ 0)
132	131	neneqd 2942	. . . . 5 ⊢ ((𝑋 mod 𝑇) ∈ (0(,]π) → ¬ (𝑋 mod 𝑇) = 0)
133		pm2.53 849	. . . . . 6 ⊢ (((𝑋 mod 𝑇) = 0 ∨ (𝑋 mod 𝑇) = π) → (¬ (𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) = π))
134	133	imp 405	. . . . 5 ⊢ ((((𝑋 mod 𝑇) = 0 ∨ (𝑋 mod 𝑇) = π) ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) = π)
135	126, 132, 134	syl2anr 595	. . . 4 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod π) = 0) → (𝑋 mod 𝑇) = π)
136	127	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → 0 ∈ ℝ^*)
137	128	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → π ∈ ℝ^*)
138		modcl 13878	. . . . . . . . . . . . . . 15 ⊢ ((𝑋 ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) → (𝑋 mod 𝑇) ∈ ℝ)
139	4, 63, 138	mp2an 690	. . . . . . . . . . . . . 14 ⊢ (𝑋 mod 𝑇) ∈ ℝ
140	139	rexri 11310	. . . . . . . . . . . . 13 ⊢ (𝑋 mod 𝑇) ∈ ℝ^*
141	140	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → (𝑋 mod 𝑇) ∈ ℝ^*)
142		id 22	. . . . . . . . . . . . 13 ⊢ ((𝑋 mod 𝑇) = π → (𝑋 mod 𝑇) = π)
143	34, 142	breqtrrid 5190	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → 0 < (𝑋 mod 𝑇))
144	33	eqlei2 11363	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → (𝑋 mod 𝑇) ≤ π)
145	136, 137, 141, 143, 144	eliocd 44921	. . . . . . . . . . 11 ⊢ ((𝑋 mod 𝑇) = π → (𝑋 mod 𝑇) ∈ (0(,]π))
146	145	iftrued 4540	. . . . . . . . . 10 ⊢ ((𝑋 mod 𝑇) = π → if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) = 1)
147	146	adantl 480	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = π) → if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) = 1)
148		oveq1 7433	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑋 → (𝑥 mod 𝑇) = (𝑋 mod 𝑇))
149	148	breq1d 5162	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑋 → ((𝑥 mod 𝑇) < π ↔ (𝑋 mod 𝑇) < π))
150	149	ifbid 4555	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑋 → if((𝑥 mod 𝑇) < π, 1, -1) = if((𝑋 mod 𝑇) < π, 1, -1))
151		fourierswlem.f	. . . . . . . . . . . . 13 ⊢ 𝐹 = (𝑥 ∈ ℝ ↦ if((𝑥 mod 𝑇) < π, 1, -1))
152		1ex 11248	. . . . . . . . . . . . . 14 ⊢ 1 ∈ V
153		negex 11496	. . . . . . . . . . . . . 14 ⊢ -1 ∈ V
154	152, 153	ifex 4582	. . . . . . . . . . . . 13 ⊢ if((𝑋 mod 𝑇) < π, 1, -1) ∈ V
155	150, 151, 154	fvmpt 7010	. . . . . . . . . . . 12 ⊢ (𝑋 ∈ ℝ → (𝐹‘𝑋) = if((𝑋 mod 𝑇) < π, 1, -1))
156	4, 155	ax-mp 5	. . . . . . . . . . 11 ⊢ (𝐹‘𝑋) = if((𝑋 mod 𝑇) < π, 1, -1)
157	139	a1i 11	. . . . . . . . . . . . . 14 ⊢ ((𝑋 mod 𝑇) < π → (𝑋 mod 𝑇) ∈ ℝ)
158		id 22	. . . . . . . . . . . . . 14 ⊢ ((𝑋 mod 𝑇) < π → (𝑋 mod 𝑇) < π)
159	157, 158	ltned 11388	. . . . . . . . . . . . 13 ⊢ ((𝑋 mod 𝑇) < π → (𝑋 mod 𝑇) ≠ π)
160	159	necon2bi 2968	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → ¬ (𝑋 mod 𝑇) < π)
161	160	iffalsed 4543	. . . . . . . . . . 11 ⊢ ((𝑋 mod 𝑇) = π → if((𝑋 mod 𝑇) < π, 1, -1) = -1)
162	156, 161	eqtrid 2780	. . . . . . . . . 10 ⊢ ((𝑋 mod 𝑇) = π → (𝐹‘𝑋) = -1)
163	162	adantl 480	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = π) → (𝐹‘𝑋) = -1)
164	147, 163	oveq12d 7444	. . . . . . . 8 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = π) → (if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) = (1 + -1))
165		1pneg1e0 12369	. . . . . . . 8 ⊢ (1 + -1) = 0
166	164, 165	eqtrdi 2784	. . . . . . 7 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = π) → (if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) = 0)
167	166	oveq1d 7441	. . . . . 6 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = π) → ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2) = (0 / 2))
168	167	adantll 712	. . . . 5 ⊢ ((((𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod π) = 0) ∧ (𝑋 mod 𝑇) = π) → ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2) = (0 / 2))
169		2cn 12325	. . . . . . 7 ⊢ 2 ∈ ℂ
170	169, 44	div0i 11986	. . . . . 6 ⊢ (0 / 2) = 0
171	170	a1i 11	. . . . 5 ⊢ ((((𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod π) = 0) ∧ (𝑋 mod 𝑇) = π) → (0 / 2) = 0)
172		fourierswlem.y	. . . . . . 7 ⊢ 𝑌 = if((𝑋 mod π) = 0, 0, (𝐹‘𝑋))
173		iftrue 4538	. . . . . . 7 ⊢ ((𝑋 mod π) = 0 → if((𝑋 mod π) = 0, 0, (𝐹‘𝑋)) = 0)
174	172, 173	eqtr2id 2781	. . . . . 6 ⊢ ((𝑋 mod π) = 0 → 0 = 𝑌)
175	174	ad2antlr 725	. . . . 5 ⊢ ((((𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod π) = 0) ∧ (𝑋 mod 𝑇) = π) → 0 = 𝑌)
176	168, 171, 175	3eqtrrd 2773	. . . 4 ⊢ ((((𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod π) = 0) ∧ (𝑋 mod 𝑇) = π) → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
177	135, 176	mpdan 685	. . 3 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod π) = 0) → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
178		iftrue 4538	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) ∈ (0(,]π) → if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) = 1)
179	178	adantr 479	. . . . . 6 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) = 1)
180	139	a1i 11	. . . . . . . 8 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → (𝑋 mod 𝑇) ∈ ℝ)
181	33	a1i 11	. . . . . . . 8 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → π ∈ ℝ)
182		iocleub 44917	. . . . . . . . . 10 ⊢ ((0 ∈ ℝ^* ∧ π ∈ ℝ^* ∧ (𝑋 mod 𝑇) ∈ (0(,]π)) → (𝑋 mod 𝑇) ≤ π)
183	127, 128, 182	mp3an12 1447	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) ∈ (0(,]π) → (𝑋 mod 𝑇) ≤ π)
184	183	adantr 479	. . . . . . . 8 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → (𝑋 mod 𝑇) ≤ π)
185		ax-1cn 11204	. . . . . . . . . . . . . . . . . . . 20 ⊢ 1 ∈ ℂ
186	185, 14	mulcomi 11260	. . . . . . . . . . . . . . . . . . 19 ⊢ (1 · π) = (π · 1)
187	83, 186	eqtr3i 2758	. . . . . . . . . . . . . . . . . 18 ⊢ π = (π · 1)
188	187	oveq1i 7436	. . . . . . . . . . . . . . . . 17 ⊢ (π + (π · (2 · (⌊‘(𝑋 / 𝑇))))) = ((π · 1) + (π · (2 · (⌊‘(𝑋 / 𝑇)))))
189	169, 14	mulcomi 11260	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (2 · π) = (π · 2)
190	40, 189	eqtri 2756	. . . . . . . . . . . . . . . . . . . 20 ⊢ 𝑇 = (π · 2)
191	190	oveq1i 7436	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑇 · (⌊‘(𝑋 / 𝑇))) = ((π · 2) · (⌊‘(𝑋 / 𝑇)))
192	111, 62	gtneii 11364	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 𝑇 ≠ 0
193	4, 59, 192	redivcli 12019	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑋 / 𝑇) ∈ ℝ
194		flcl 13800	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑋 / 𝑇) ∈ ℝ → (⌊‘(𝑋 / 𝑇)) ∈ ℤ)
195	193, 194	ax-mp 5	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (⌊‘(𝑋 / 𝑇)) ∈ ℤ
196		zcn 12601	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((⌊‘(𝑋 / 𝑇)) ∈ ℤ → (⌊‘(𝑋 / 𝑇)) ∈ ℂ)
197	195, 196	ax-mp 5	. . . . . . . . . . . . . . . . . . . 20 ⊢ (⌊‘(𝑋 / 𝑇)) ∈ ℂ
198	14, 169, 197	mulassi 11263	. . . . . . . . . . . . . . . . . . 19 ⊢ ((π · 2) · (⌊‘(𝑋 / 𝑇))) = (π · (2 · (⌊‘(𝑋 / 𝑇))))
199	191, 198	eqtri 2756	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑇 · (⌊‘(𝑋 / 𝑇))) = (π · (2 · (⌊‘(𝑋 / 𝑇))))
200	199	oveq2i 7437	. . . . . . . . . . . . . . . . 17 ⊢ (π + (𝑇 · (⌊‘(𝑋 / 𝑇)))) = (π + (π · (2 · (⌊‘(𝑋 / 𝑇)))))
201	169, 197	mulcli 11259	. . . . . . . . . . . . . . . . . 18 ⊢ (2 · (⌊‘(𝑋 / 𝑇))) ∈ ℂ
202	14, 185, 201	adddii 11264	. . . . . . . . . . . . . . . . 17 ⊢ (π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))) = ((π · 1) + (π · (2 · (⌊‘(𝑋 / 𝑇)))))
203	188, 200, 202	3eqtr4ri 2767	. . . . . . . . . . . . . . . 16 ⊢ (π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))) = (π + (𝑇 · (⌊‘(𝑋 / 𝑇))))
204	203	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (π = (𝑋 mod 𝑇) → (π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))) = (π + (𝑇 · (⌊‘(𝑋 / 𝑇)))))
205		id 22	. . . . . . . . . . . . . . . . 17 ⊢ (π = (𝑋 mod 𝑇) → π = (𝑋 mod 𝑇))
206		modval 13876	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑋 ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) → (𝑋 mod 𝑇) = (𝑋 − (𝑇 · (⌊‘(𝑋 / 𝑇)))))
207	4, 63, 206	mp2an 690	. . . . . . . . . . . . . . . . 17 ⊢ (𝑋 mod 𝑇) = (𝑋 − (𝑇 · (⌊‘(𝑋 / 𝑇))))
208	205, 207	eqtrdi 2784	. . . . . . . . . . . . . . . 16 ⊢ (π = (𝑋 mod 𝑇) → π = (𝑋 − (𝑇 · (⌊‘(𝑋 / 𝑇)))))
209	208	oveq1d 7441	. . . . . . . . . . . . . . 15 ⊢ (π = (𝑋 mod 𝑇) → (π + (𝑇 · (⌊‘(𝑋 / 𝑇)))) = ((𝑋 − (𝑇 · (⌊‘(𝑋 / 𝑇)))) + (𝑇 · (⌊‘(𝑋 / 𝑇)))))
210	27	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (π = (𝑋 mod 𝑇) → 𝑋 ∈ ℂ)
211	59	recni 11266	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑇 ∈ ℂ
212	211, 197	mulcli 11259	. . . . . . . . . . . . . . . . 17 ⊢ (𝑇 · (⌊‘(𝑋 / 𝑇))) ∈ ℂ
213	212	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (π = (𝑋 mod 𝑇) → (𝑇 · (⌊‘(𝑋 / 𝑇))) ∈ ℂ)
214	210, 213	npcand 11613	. . . . . . . . . . . . . . 15 ⊢ (π = (𝑋 mod 𝑇) → ((𝑋 − (𝑇 · (⌊‘(𝑋 / 𝑇)))) + (𝑇 · (⌊‘(𝑋 / 𝑇)))) = 𝑋)
215	204, 209, 214	3eqtrrd 2773	. . . . . . . . . . . . . 14 ⊢ (π = (𝑋 mod 𝑇) → 𝑋 = (π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))))
216	215	oveq1d 7441	. . . . . . . . . . . . 13 ⊢ (π = (𝑋 mod 𝑇) → (𝑋 / π) = ((π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))) / π))
217	185, 201	addcli 11258	. . . . . . . . . . . . . 14 ⊢ (1 + (2 · (⌊‘(𝑋 / 𝑇)))) ∈ ℂ
218	217, 14, 35	divcan3i 11998	. . . . . . . . . . . . 13 ⊢ ((π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))) / π) = (1 + (2 · (⌊‘(𝑋 / 𝑇))))
219	216, 218	eqtrdi 2784	. . . . . . . . . . . 12 ⊢ (π = (𝑋 mod 𝑇) → (𝑋 / π) = (1 + (2 · (⌊‘(𝑋 / 𝑇)))))
220		1z 12630	. . . . . . . . . . . . . 14 ⊢ 1 ∈ ℤ
221		zmulcl 12649	. . . . . . . . . . . . . . 15 ⊢ ((2 ∈ ℤ ∧ (⌊‘(𝑋 / 𝑇)) ∈ ℤ) → (2 · (⌊‘(𝑋 / 𝑇))) ∈ ℤ)
222	2, 195, 221	mp2an 690	. . . . . . . . . . . . . 14 ⊢ (2 · (⌊‘(𝑋 / 𝑇))) ∈ ℤ
223		zaddcl 12640	. . . . . . . . . . . . . 14 ⊢ ((1 ∈ ℤ ∧ (2 · (⌊‘(𝑋 / 𝑇))) ∈ ℤ) → (1 + (2 · (⌊‘(𝑋 / 𝑇)))) ∈ ℤ)
224	220, 222, 223	mp2an 690	. . . . . . . . . . . . 13 ⊢ (1 + (2 · (⌊‘(𝑋 / 𝑇)))) ∈ ℤ
225	224	a1i 11	. . . . . . . . . . . 12 ⊢ (π = (𝑋 mod 𝑇) → (1 + (2 · (⌊‘(𝑋 / 𝑇)))) ∈ ℤ)
226	219, 225	eqeltrd 2829	. . . . . . . . . . 11 ⊢ (π = (𝑋 mod 𝑇) → (𝑋 / π) ∈ ℤ)
227	226, 7	sylibr 233	. . . . . . . . . 10 ⊢ (π = (𝑋 mod 𝑇) → (𝑋 mod π) = 0)
228	227	necon3bi 2964	. . . . . . . . 9 ⊢ (¬ (𝑋 mod π) = 0 → π ≠ (𝑋 mod 𝑇))
229	228	adantl 480	. . . . . . . 8 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → π ≠ (𝑋 mod 𝑇))
230	180, 181, 184, 229	leneltd 11406	. . . . . . 7 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → (𝑋 mod 𝑇) < π)
231		iftrue 4538	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) < π → if((𝑋 mod 𝑇) < π, 1, -1) = 1)
232	156, 231	eqtrid 2780	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) < π → (𝐹‘𝑋) = 1)
233	230, 232	syl 17	. . . . . 6 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → (𝐹‘𝑋) = 1)
234	179, 233	oveq12d 7444	. . . . 5 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → (if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) = (1 + 1))
235	234	oveq1d 7441	. . . 4 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2) = ((1 + 1) / 2))
236		1p1e2 12375	. . . . . . 7 ⊢ (1 + 1) = 2
237	236	oveq1i 7436	. . . . . 6 ⊢ ((1 + 1) / 2) = (2 / 2)
238		2div2e1 12391	. . . . . 6 ⊢ (2 / 2) = 1
239	237, 238	eqtr2i 2757	. . . . 5 ⊢ 1 = ((1 + 1) / 2)
240	233, 239	eqtr2di 2785	. . . 4 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → ((1 + 1) / 2) = (𝐹‘𝑋))
241		iffalse 4541	. . . . . 6 ⊢ (¬ (𝑋 mod π) = 0 → if((𝑋 mod π) = 0, 0, (𝐹‘𝑋)) = (𝐹‘𝑋))
242	172, 241	eqtr2id 2781	. . . . 5 ⊢ (¬ (𝑋 mod π) = 0 → (𝐹‘𝑋) = 𝑌)
243	242	adantl 480	. . . 4 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → (𝐹‘𝑋) = 𝑌)
244	235, 240, 243	3eqtrrd 2773	. . 3 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
245	177, 244	pm2.61dan 811	. 2 ⊢ ((𝑋 mod 𝑇) ∈ (0(,]π) → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
246	131	necon2bi 2968	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) = 0 → ¬ (𝑋 mod 𝑇) ∈ (0(,]π))
247	246	iffalsed 4543	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) = 0 → if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) = -1)
248		id 22	. . . . . . . . . 10 ⊢ ((𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) = 0)
249	248, 34	eqbrtrdi 5191	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) < π)
250	249	iftrued 4540	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) = 0 → if((𝑋 mod 𝑇) < π, 1, -1) = 1)
251	156, 250	eqtrid 2780	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) = 0 → (𝐹‘𝑋) = 1)
252	247, 251	oveq12d 7444	. . . . . 6 ⊢ ((𝑋 mod 𝑇) = 0 → (if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) = (-1 + 1))
253	252	oveq1d 7441	. . . . 5 ⊢ ((𝑋 mod 𝑇) = 0 → ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2) = ((-1 + 1) / 2))
254		neg1cn 12364	. . . . . . . . 9 ⊢ -1 ∈ ℂ
255	185, 254, 165	addcomli 11444	. . . . . . . 8 ⊢ (-1 + 1) = 0
256	255	oveq1i 7436	. . . . . . 7 ⊢ ((-1 + 1) / 2) = (0 / 2)
257	256, 170	eqtri 2756	. . . . . 6 ⊢ ((-1 + 1) / 2) = 0
258	257	a1i 11	. . . . 5 ⊢ ((𝑋 mod 𝑇) = 0 → ((-1 + 1) / 2) = 0)
259	40	oveq2i 7437	. . . . . . . . . . . . 13 ⊢ (𝑋 / 𝑇) = (𝑋 / (2 · π))
260		2cnne0 12460	. . . . . . . . . . . . . 14 ⊢ (2 ∈ ℂ ∧ 2 ≠ 0)
261	14, 35	pm3.2i 469	. . . . . . . . . . . . . 14 ⊢ (π ∈ ℂ ∧ π ≠ 0)
262		divdiv1 11963	. . . . . . . . . . . . . 14 ⊢ ((𝑋 ∈ ℂ ∧ (2 ∈ ℂ ∧ 2 ≠ 0) ∧ (π ∈ ℂ ∧ π ≠ 0)) → ((𝑋 / 2) / π) = (𝑋 / (2 · π)))
263	27, 260, 261, 262	mp3an 1457	. . . . . . . . . . . . 13 ⊢ ((𝑋 / 2) / π) = (𝑋 / (2 · π))
264	27, 169, 14, 44, 35	divdiv32i 12007	. . . . . . . . . . . . 13 ⊢ ((𝑋 / 2) / π) = ((𝑋 / π) / 2)
265	259, 263, 264	3eqtr2i 2762	. . . . . . . . . . . 12 ⊢ (𝑋 / 𝑇) = ((𝑋 / π) / 2)
266	265	oveq2i 7437	. . . . . . . . . . 11 ⊢ (2 · (𝑋 / 𝑇)) = (2 · ((𝑋 / π) / 2))
267	27, 14, 35	divcli 11994	. . . . . . . . . . . 12 ⊢ (𝑋 / π) ∈ ℂ
268	267, 169, 44	divcan2i 11995	. . . . . . . . . . 11 ⊢ (2 · ((𝑋 / π) / 2)) = (𝑋 / π)
269	266, 268	eqtr2i 2757	. . . . . . . . . 10 ⊢ (𝑋 / π) = (2 · (𝑋 / 𝑇))
270	2	a1i 11	. . . . . . . . . . 11 ⊢ ((𝑋 / 𝑇) ∈ ℤ → 2 ∈ ℤ)
271		id 22	. . . . . . . . . . 11 ⊢ ((𝑋 / 𝑇) ∈ ℤ → (𝑋 / 𝑇) ∈ ℤ)
272	270, 271	zmulcld 12710	. . . . . . . . . 10 ⊢ ((𝑋 / 𝑇) ∈ ℤ → (2 · (𝑋 / 𝑇)) ∈ ℤ)
273	269, 272	eqeltrid 2833	. . . . . . . . 9 ⊢ ((𝑋 / 𝑇) ∈ ℤ → (𝑋 / π) ∈ ℤ)
274	65, 273	sylbi 216	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) = 0 → (𝑋 / π) ∈ ℤ)
275	274, 7	sylibr 233	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) = 0 → (𝑋 mod π) = 0)
276	275	iftrued 4540	. . . . . 6 ⊢ ((𝑋 mod 𝑇) = 0 → if((𝑋 mod π) = 0, 0, (𝐹‘𝑋)) = 0)
277	172, 276	eqtr2id 2781	. . . . 5 ⊢ ((𝑋 mod 𝑇) = 0 → 0 = 𝑌)
278	253, 258, 277	3eqtrrd 2773	. . . 4 ⊢ ((𝑋 mod 𝑇) = 0 → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
279	278	adantl 480	. . 3 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod 𝑇) = 0) → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
280	128	a1i 11	. . . . 5 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → π ∈ ℝ^*)
281	59	rexri 11310	. . . . . 6 ⊢ 𝑇 ∈ ℝ^*
282	281	a1i 11	. . . . 5 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → 𝑇 ∈ ℝ^*)
283	139	a1i 11	. . . . 5 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) ∈ ℝ)
284		pm4.56 986	. . . . . . . 8 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) ↔ ¬ ((𝑋 mod 𝑇) ∈ (0(,]π) ∨ (𝑋 mod 𝑇) = 0))
285	284	biimpi 215	. . . . . . 7 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → ¬ ((𝑋 mod 𝑇) ∈ (0(,]π) ∨ (𝑋 mod 𝑇) = 0))
286		olc 866	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) = 0 → ((𝑋 mod 𝑇) ∈ (0(,]π) ∨ (𝑋 mod 𝑇) = 0))
287	286	adantl 480	. . . . . . . 8 ⊢ (((𝑋 mod 𝑇) ≤ π ∧ (𝑋 mod 𝑇) = 0) → ((𝑋 mod 𝑇) ∈ (0(,]π) ∨ (𝑋 mod 𝑇) = 0))
288	127	a1i 11	. . . . . . . . . 10 ⊢ (((𝑋 mod 𝑇) ≤ π ∧ ¬ (𝑋 mod 𝑇) = 0) → 0 ∈ ℝ^*)
289	128	a1i 11	. . . . . . . . . 10 ⊢ (((𝑋 mod 𝑇) ≤ π ∧ ¬ (𝑋 mod 𝑇) = 0) → π ∈ ℝ^*)
290	140	a1i 11	. . . . . . . . . 10 ⊢ (((𝑋 mod 𝑇) ≤ π ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) ∈ ℝ^*)
291		0red 11255	. . . . . . . . . . . 12 ⊢ (¬ (𝑋 mod 𝑇) = 0 → 0 ∈ ℝ)
292	139	a1i 11	. . . . . . . . . . . 12 ⊢ (¬ (𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) ∈ ℝ)
293		modge0 13884	. . . . . . . . . . . . . 14 ⊢ ((𝑋 ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) → 0 ≤ (𝑋 mod 𝑇))
294	4, 63, 293	mp2an 690	. . . . . . . . . . . . 13 ⊢ 0 ≤ (𝑋 mod 𝑇)
295	294	a1i 11	. . . . . . . . . . . 12 ⊢ (¬ (𝑋 mod 𝑇) = 0 → 0 ≤ (𝑋 mod 𝑇))
296		neqne 2945	. . . . . . . . . . . 12 ⊢ (¬ (𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) ≠ 0)
297	291, 292, 295, 296	leneltd 11406	. . . . . . . . . . 11 ⊢ (¬ (𝑋 mod 𝑇) = 0 → 0 < (𝑋 mod 𝑇))
298	297	adantl 480	. . . . . . . . . 10 ⊢ (((𝑋 mod 𝑇) ≤ π ∧ ¬ (𝑋 mod 𝑇) = 0) → 0 < (𝑋 mod 𝑇))
299		simpl 481	. . . . . . . . . 10 ⊢ (((𝑋 mod 𝑇) ≤ π ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) ≤ π)
300	288, 289, 290, 298, 299	eliocd 44921	. . . . . . . . 9 ⊢ (((𝑋 mod 𝑇) ≤ π ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) ∈ (0(,]π))
301	300	orcd 871	. . . . . . . 8 ⊢ (((𝑋 mod 𝑇) ≤ π ∧ ¬ (𝑋 mod 𝑇) = 0) → ((𝑋 mod 𝑇) ∈ (0(,]π) ∨ (𝑋 mod 𝑇) = 0))
302	287, 301	pm2.61dan 811	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) ≤ π → ((𝑋 mod 𝑇) ∈ (0(,]π) ∨ (𝑋 mod 𝑇) = 0))
303	285, 302	nsyl 140	. . . . . 6 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → ¬ (𝑋 mod 𝑇) ≤ π)
304	33	a1i 11	. . . . . . 7 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → π ∈ ℝ)
305	304, 283	ltnled 11399	. . . . . 6 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → (π < (𝑋 mod 𝑇) ↔ ¬ (𝑋 mod 𝑇) ≤ π))
306	303, 305	mpbird 256	. . . . 5 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → π < (𝑋 mod 𝑇))
307		modlt 13885	. . . . . . 7 ⊢ ((𝑋 ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) → (𝑋 mod 𝑇) < 𝑇)
308	4, 63, 307	mp2an 690	. . . . . 6 ⊢ (𝑋 mod 𝑇) < 𝑇
309	308	a1i 11	. . . . 5 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) < 𝑇)
310	280, 282, 283, 306, 309	eliood 44912	. . . 4 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) ∈ (π(,)𝑇))
311	127	a1i 11	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → 0 ∈ ℝ^*)
312	33	a1i 11	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → π ∈ ℝ)
313	140	a1i 11	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → (𝑋 mod 𝑇) ∈ ℝ^*)
314		ioogtlb 44909	. . . . . . . . . 10 ⊢ ((π ∈ ℝ^* ∧ 𝑇 ∈ ℝ^* ∧ (𝑋 mod 𝑇) ∈ (π(,)𝑇)) → π < (𝑋 mod 𝑇))
315	128, 281, 314	mp3an12 1447	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → π < (𝑋 mod 𝑇))
316	311, 312, 313, 315	gtnelioc 44905	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → ¬ (𝑋 mod 𝑇) ∈ (0(,]π))
317	316	iffalsed 4543	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) = -1)
318	139	a1i 11	. . . . . . . . . 10 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → (𝑋 mod 𝑇) ∈ ℝ)
319	312, 318, 315	ltnsymd 11401	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → ¬ (𝑋 mod 𝑇) < π)
320	319	iffalsed 4543	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → if((𝑋 mod 𝑇) < π, 1, -1) = -1)
321	156, 320	eqtrid 2780	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → (𝐹‘𝑋) = -1)
322	317, 321	oveq12d 7444	. . . . . 6 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → (if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) = (-1 + -1))
323	322	oveq1d 7441	. . . . 5 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2) = ((-1 + -1) / 2))
324		df-2 12313	. . . . . . . . . 10 ⊢ 2 = (1 + 1)
325	324	negeqi 11491	. . . . . . . . 9 ⊢ -2 = -(1 + 1)
326	185, 185	negdii 11582	. . . . . . . . 9 ⊢ -(1 + 1) = (-1 + -1)
327	325, 326	eqtr2i 2757	. . . . . . . 8 ⊢ (-1 + -1) = -2
328	327	oveq1i 7436	. . . . . . 7 ⊢ ((-1 + -1) / 2) = (-2 / 2)
329		divneg 11944	. . . . . . . 8 ⊢ ((2 ∈ ℂ ∧ 2 ∈ ℂ ∧ 2 ≠ 0) → -(2 / 2) = (-2 / 2))
330	169, 169, 44, 329	mp3an 1457	. . . . . . 7 ⊢ -(2 / 2) = (-2 / 2)
331	238	negeqi 11491	. . . . . . 7 ⊢ -(2 / 2) = -1
332	328, 330, 331	3eqtr2i 2762	. . . . . 6 ⊢ ((-1 + -1) / 2) = -1
333	332	a1i 11	. . . . 5 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → ((-1 + -1) / 2) = -1)
334	172	a1i 11	. . . . . 6 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → 𝑌 = if((𝑋 mod π) = 0, 0, (𝐹‘𝑋)))
335	312, 318	ltnled 11399	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → (π < (𝑋 mod 𝑇) ↔ ¬ (𝑋 mod 𝑇) ≤ π))
336	315, 335	mpbid 231	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → ¬ (𝑋 mod 𝑇) ≤ π)
337	248, 112	eqbrtrdi 5191	. . . . . . . . . 10 ⊢ ((𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) ≤ π)
338	337	adantl 480	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) ≤ π)
339	126	orcanai 1000	. . . . . . . . . 10 ⊢ (((𝑋 mod π) = 0 ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) = π)
340	339, 144	syl 17	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) ≤ π)
341	338, 340	pm2.61dan 811	. . . . . . . 8 ⊢ ((𝑋 mod π) = 0 → (𝑋 mod 𝑇) ≤ π)
342	336, 341	nsyl 140	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → ¬ (𝑋 mod π) = 0)
343	342	iffalsed 4543	. . . . . 6 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → if((𝑋 mod π) = 0, 0, (𝐹‘𝑋)) = (𝐹‘𝑋))
344	334, 343, 321	3eqtrrd 2773	. . . . 5 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → -1 = 𝑌)
345	323, 333, 344	3eqtrrd 2773	. . . 4 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
346	310, 345	syl 17	. . 3 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
347	279, 346	pm2.61dan 811	. 2 ⊢ (¬ (𝑋 mod 𝑇) ∈ (0(,]π) → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
348	245, 347	pm2.61i 182	1 ⊢ 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2)

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 205 ∧ wa 394 ∨ wo 845 = wceq 1533 ∈ wcel 2098 ≠ wne 2937 ∃wrex 3067 ifcif 4532 class class class wbr 5152 ↦ cmpt 5235 ‘cfv 6553 (class class class)co 7426 ℂcc 11144 ℝcr 11145 0cc0 11146 1c1 11147 + caddc 11149 · cmul 11151 ℝ^*cxr 11285 < clt 11286 ≤ cle 11287 − cmin 11482 -cneg 11483 / cdiv 11909 2c2 12305 ℤcz 12596 ℝ⁺crp 13014 (,)cioo 13364 (,]cioc 13365 ⌊cfl 13795 mod cmo 13874 πcpi 16050 ∥ cdvds 16238

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1789 ax-4 1803 ax-5 1905 ax-6 1963 ax-7 2003 ax-8 2100 ax-9 2108 ax-10 2129 ax-11 2146 ax-12 2166 ax-ext 2699 ax-rep 5289 ax-sep 5303 ax-nul 5310 ax-pow 5369 ax-pr 5433 ax-un 7746 ax-inf2 9672 ax-cnex 11202 ax-resscn 11203 ax-1cn 11204 ax-icn 11205 ax-addcl 11206 ax-addrcl 11207 ax-mulcl 11208 ax-mulrcl 11209 ax-mulcom 11210 ax-addass 11211 ax-mulass 11212 ax-distr 11213 ax-i2m1 11214 ax-1ne0 11215 ax-1rid 11216 ax-rnegex 11217 ax-rrecex 11218 ax-cnre 11219 ax-pre-lttri 11220 ax-pre-lttrn 11221 ax-pre-ltadd 11222 ax-pre-mulgt0 11223 ax-pre-sup 11224 ax-addf 11225

This theorem depends on definitions: df-bi 206 df-an 395 df-or 846 df-3or 1085 df-3an 1086 df-tru 1536 df-fal 1546 df-ex 1774 df-nf 1778 df-sb 2060 df-mo 2529 df-eu 2558 df-clab 2706 df-cleq 2720 df-clel 2806 df-nfc 2881 df-ne 2938 df-nel 3044 df-ral 3059 df-rex 3068 df-rmo 3374 df-reu 3375 df-rab 3431 df-v 3475 df-sbc 3779 df-csb 3895 df-dif 3952 df-un 3954 df-in 3956 df-ss 3966 df-pss 3968 df-nul 4327 df-if 4533 df-pw 4608 df-sn 4633 df-pr 4635 df-tp 4637 df-op 4639 df-uni 4913 df-int 4954 df-iun 5002 df-iin 5003 df-br 5153 df-opab 5215 df-mpt 5236 df-tr 5270 df-id 5580 df-eprel 5586 df-po 5594 df-so 5595 df-fr 5637 df-se 5638 df-we 5639 df-xp 5688 df-rel 5689 df-cnv 5690 df-co 5691 df-dm 5692 df-rn 5693 df-res 5694 df-ima 5695 df-pred 6310 df-ord 6377 df-on 6378 df-lim 6379 df-suc 6380 df-iota 6505 df-fun 6555 df-fn 6556 df-f 6557 df-f1 6558 df-fo 6559 df-f1o 6560 df-fv 6561 df-isom 6562 df-riota 7382 df-ov 7429 df-oprab 7430 df-mpo 7431 df-of 7691 df-om 7877 df-1st 7999 df-2nd 8000 df-supp 8172 df-frecs 8293 df-wrecs 8324 df-recs 8398 df-rdg 8437 df-1o 8493 df-2o 8494 df-er 8731 df-map 8853 df-pm 8854 df-ixp 8923 df-en 8971 df-dom 8972 df-sdom 8973 df-fin 8974 df-fsupp 9394 df-fi 9442 df-sup 9473 df-inf 9474 df-oi 9541 df-card 9970 df-pnf 11288 df-mnf 11289 df-xr 11290 df-ltxr 11291 df-le 11292 df-sub 11484 df-neg 11485 df-div 11910 df-nn 12251 df-2 12313 df-3 12314 df-4 12315 df-5 12316 df-6 12317 df-7 12318 df-8 12319 df-9 12320 df-n0 12511 df-z 12597 df-dec 12716 df-uz 12861 df-q 12971 df-rp 13015 df-xneg 13132 df-xadd 13133 df-xmul 13134 df-ioo 13368 df-ioc 13369 df-ico 13370 df-icc 13371 df-fz 13525 df-fzo 13668 df-fl 13797 df-mod 13875 df-seq 14007 df-exp 14067 df-fac 14273 df-bc 14302 df-hash 14330 df-shft 15054 df-cj 15086 df-re 15087 df-im 15088 df-sqrt 15222 df-abs 15223 df-limsup 15455 df-clim 15472 df-rlim 15473 df-sum 15673 df-ef 16051 df-sin 16053 df-cos 16054 df-pi 16056 df-dvds 16239 df-struct 17123 df-sets 17140 df-slot 17158 df-ndx 17170 df-base 17188 df-ress 17217 df-plusg 17253 df-mulr 17254 df-starv 17255 df-sca 17256 df-vsca 17257 df-ip 17258 df-tset 17259 df-ple 17260 df-ds 17262 df-unif 17263 df-hom 17264 df-cco 17265 df-rest 17411 df-topn 17412 df-0g 17430 df-gsum 17431 df-topgen 17432 df-pt 17433 df-prds 17436 df-xrs 17491 df-qtop 17496 df-imas 17497 df-xps 17499 df-mre 17573 df-mrc 17574 df-acs 17576 df-mgm 18607 df-sgrp 18686 df-mnd 18702 df-submnd 18748 df-mulg 19031 df-cntz 19275 df-cmn 19744 df-psmet 21278 df-xmet 21279 df-met 21280 df-bl 21281 df-mopn 21282 df-fbas 21283 df-fg 21284 df-cnfld 21287 df-top 22816 df-topon 22833 df-topsp 22855 df-bases 22869 df-cld 22943 df-ntr 22944 df-cls 22945 df-nei 23022 df-lp 23060 df-perf 23061 df-cn 23151 df-cnp 23152 df-haus 23239 df-tx 23486 df-hmeo 23679 df-fil 23770 df-fm 23862 df-flim 23863 df-flf 23864 df-xms 24246 df-ms 24247 df-tms 24248 df-cncf 24818 df-limc 25815 df-dv 25816

This theorem is referenced by: fouriersw 45648

W3C validator