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 45531

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 484	. . . . . . . . . 10 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → 2 ∥ (𝑋 / π))
2		2z 12610	. . . . . . . . . . . 12 ⊢ 2 ∈ ℤ
3	2	a1i 11	. . . . . . . . . . 11 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → 2 ∈ ℤ)
4		fourierswlem.x	. . . . . . . . . . . . . 14 ⊢ 𝑋 ∈ ℝ
5		pirp 26370	. . . . . . . . . . . . . 14 ⊢ π ∈ ℝ⁺
6		mod0 13859	. . . . . . . . . . . . . 14 ⊢ ((𝑋 ∈ ℝ ∧ π ∈ ℝ⁺) → ((𝑋 mod π) = 0 ↔ (𝑋 / π) ∈ ℤ))
7	4, 5, 6	mp2an 691	. . . . . . . . . . . . 13 ⊢ ((𝑋 mod π) = 0 ↔ (𝑋 / π) ∈ ℤ)
8	7	biimpi 215	. . . . . . . . . . . 12 ⊢ ((𝑋 mod π) = 0 → (𝑋 / π) ∈ ℤ)
9	8	adantr 480	. . . . . . . . . . 11 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (𝑋 / π) ∈ ℤ)
10		divides 16218	. . . . . . . . . . 11 ⊢ ((2 ∈ ℤ ∧ (𝑋 / π) ∈ ℤ) → (2 ∥ (𝑋 / π) ↔ ∃𝑘 ∈ ℤ (𝑘 · 2) = (𝑋 / π)))
11	3, 9, 10	syl2anc 583	. . . . . . . . . 10 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (2 ∥ (𝑋 / π) ↔ ∃𝑘 ∈ ℤ (𝑘 · 2) = (𝑋 / π)))
12	1, 11	mpbid 231	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → ∃𝑘 ∈ ℤ (𝑘 · 2) = (𝑋 / π))
13		2cnd 12306	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → 2 ∈ ℂ)
14		picn 26368	. . . . . . . . . . . . . . . . . . . 20 ⊢ π ∈ ℂ
15	14	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → π ∈ ℂ)
16		zcn 12579	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → 𝑘 ∈ ℂ)
17	13, 15, 16	mulassd 11253	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → ((2 · π) · 𝑘) = (2 · (π · 𝑘)))
18	15, 16	mulcld 11250	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → (π · 𝑘) ∈ ℂ)
19	13, 18	mulcomd 11251	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → (2 · (π · 𝑘)) = ((π · 𝑘) · 2))
20	17, 19	eqtrd 2767	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → ((2 · π) · 𝑘) = ((π · 𝑘) · 2))
21	20	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → ((2 · π) · 𝑘) = ((π · 𝑘) · 2))
22	15, 16, 13	mulassd 11253	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → ((π · 𝑘) · 2) = (π · (𝑘 · 2)))
23	22	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → ((π · 𝑘) · 2) = (π · (𝑘 · 2)))
24		id 22	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑘 · 2) = (𝑋 / π) → (𝑘 · 2) = (𝑋 / π))
25	24	eqcomd 2733	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 · 2) = (𝑋 / π) → (𝑋 / π) = (𝑘 · 2))
26	25	adantl 481	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (𝑋 / π) = (𝑘 · 2))
27	4	recni 11244	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑋 ∈ ℂ
28	27	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 𝑋 ∈ ℂ)
29	14	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → π ∈ ℂ)
30	16	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 𝑘 ∈ ℂ)
31		2cnd 12306	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 2 ∈ ℂ)
32	30, 31	mulcld 11250	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (𝑘 · 2) ∈ ℂ)
33		pire 26367	. . . . . . . . . . . . . . . . . . . 20 ⊢ π ∈ ℝ
34		pipos 26369	. . . . . . . . . . . . . . . . . . . 20 ⊢ 0 < π
35	33, 34	gt0ne0ii 11766	. . . . . . . . . . . . . . . . . . 19 ⊢ π ≠ 0
36	35	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → π ≠ 0)
37	28, 29, 32, 36	divmuld 12028	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → ((𝑋 / π) = (𝑘 · 2) ↔ (π · (𝑘 · 2)) = 𝑋))
38	26, 37	mpbid 231	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (π · (𝑘 · 2)) = 𝑋)
39	21, 23, 38	3eqtrrd 2772	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 𝑋 = ((2 · π) · 𝑘))
40		fourierswlem.t	. . . . . . . . . . . . . . . 16 ⊢ 𝑇 = (2 · π)
41	40	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 𝑇 = (2 · π))
42	39, 41	oveq12d 7432	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (𝑋 / 𝑇) = (((2 · π) · 𝑘) / (2 · π)))
43	13, 15	mulcld 11250	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ ℤ → (2 · π) ∈ ℂ)
44		2ne0 12332	. . . . . . . . . . . . . . . . . 18 ⊢ 2 ≠ 0
45	44	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → 2 ≠ 0)
46	35	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → π ≠ 0)
47	13, 15, 45, 46	mulne0d 11882	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ ℤ → (2 · π) ≠ 0)
48	16, 43, 47	divcan3d 12011	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ∈ ℤ → (((2 · π) · 𝑘) / (2 · π)) = 𝑘)
49	48	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (((2 · π) · 𝑘) / (2 · π)) = 𝑘)
50	42, 49	eqtrd 2767	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (𝑋 / 𝑇) = 𝑘)
51		simpl 482	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 𝑘 ∈ ℤ)
52	50, 51	eqeltrd 2828	. . . . . . . . . . . 12 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (𝑋 / 𝑇) ∈ ℤ)
53	52	ex 412	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℤ → ((𝑘 · 2) = (𝑋 / π) → (𝑋 / 𝑇) ∈ ℤ))
54	53	a1i 11	. . . . . . . . . 10 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (𝑘 ∈ ℤ → ((𝑘 · 2) = (𝑋 / π) → (𝑋 / 𝑇) ∈ ℤ)))
55	54	rexlimdv 3148	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (∃𝑘 ∈ ℤ (𝑘 · 2) = (𝑋 / π) → (𝑋 / 𝑇) ∈ ℤ))
56	12, 55	mpd 15	. . . . . . . 8 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (𝑋 / 𝑇) ∈ ℤ)
57		2re 12302	. . . . . . . . . . . 12 ⊢ 2 ∈ ℝ
58	57, 33	remulcli 11246	. . . . . . . . . . 11 ⊢ (2 · π) ∈ ℝ
59	40, 58	eqeltri 2824	. . . . . . . . . 10 ⊢ 𝑇 ∈ ℝ
60		2pos 12331	. . . . . . . . . . . 12 ⊢ 0 < 2
61	57, 33, 60, 34	mulgt0ii 11363	. . . . . . . . . . 11 ⊢ 0 < (2 · π)
62	61, 40	breqtrri 5169	. . . . . . . . . 10 ⊢ 0 < 𝑇
63	59, 62	elrpii 12995	. . . . . . . . 9 ⊢ 𝑇 ∈ ℝ⁺
64		mod0 13859	. . . . . . . . 9 ⊢ ((𝑋 ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) → ((𝑋 mod 𝑇) = 0 ↔ (𝑋 / 𝑇) ∈ ℤ))
65	4, 63, 64	mp2an 691	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) = 0 ↔ (𝑋 / 𝑇) ∈ ℤ)
66	56, 65	sylibr 233	. . . . . . 7 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (𝑋 mod 𝑇) = 0)
67	66	orcd 872	. . . . . 6 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → ((𝑋 mod 𝑇) = 0 ∨ (𝑋 mod 𝑇) = π))
68		odd2np1 16303	. . . . . . . . . 10 ⊢ ((𝑋 / π) ∈ ℤ → (¬ 2 ∥ (𝑋 / π) ↔ ∃𝑘 ∈ ℤ ((2 · 𝑘) + 1) = (𝑋 / π)))
69	7, 68	sylbi 216	. . . . . . . . 9 ⊢ ((𝑋 mod π) = 0 → (¬ 2 ∥ (𝑋 / π) ↔ ∃𝑘 ∈ ℤ ((2 · 𝑘) + 1) = (𝑋 / π)))
70	69	biimpa 476	. . . . . . . 8 ⊢ (((𝑋 mod π) = 0 ∧ ¬ 2 ∥ (𝑋 / π)) → ∃𝑘 ∈ ℤ ((2 · 𝑘) + 1) = (𝑋 / π))
71	13, 16	mulcld 11250	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → (2 · 𝑘) ∈ ℂ)
72	71	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (2 · 𝑘) ∈ ℂ)
73		1cnd 11225	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → 1 ∈ ℂ)
74	14	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → π ∈ ℂ)
75	72, 73, 74	adddird 11255	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (((2 · 𝑘) + 1) · π) = (((2 · 𝑘) · π) + (1 · π)))
76	13, 16	mulcomd 11251	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → (2 · 𝑘) = (𝑘 · 2))
77	76	oveq1d 7429	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → ((2 · 𝑘) · π) = ((𝑘 · 2) · π))
78	16, 13, 15	mulassd 11253	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → ((𝑘 · 2) · π) = (𝑘 · (2 · π)))
79	40	eqcomi 2736	. . . . . . . . . . . . . . . . . . . 20 ⊢ (2 · π) = 𝑇
80	79	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → (2 · π) = 𝑇)
81	80	oveq2d 7430	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → (𝑘 · (2 · π)) = (𝑘 · 𝑇))
82	77, 78, 81	3eqtrd 2771	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → ((2 · 𝑘) · π) = (𝑘 · 𝑇))
83	14	mullidi 11235	. . . . . . . . . . . . . . . . . 18 ⊢ (1 · π) = π
84	83	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → (1 · π) = π)
85	82, 84	oveq12d 7432	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ ℤ → (((2 · 𝑘) · π) + (1 · π)) = ((𝑘 · 𝑇) + π))
86	85	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (((2 · 𝑘) · π) + (1 · π)) = ((𝑘 · 𝑇) + π))
87	40, 43	eqeltrid 2832	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → 𝑇 ∈ ℂ)
88	16, 87	mulcld 11250	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → (𝑘 · 𝑇) ∈ ℂ)
89	88, 15	addcomd 11432	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ ℤ → ((𝑘 · 𝑇) + π) = (π + (𝑘 · 𝑇)))
90	89	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → ((𝑘 · 𝑇) + π) = (π + (𝑘 · 𝑇)))
91	75, 86, 90	3eqtrrd 2772	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (π + (𝑘 · 𝑇)) = (((2 · 𝑘) + 1) · π))
92		peano2cn 11402	. . . . . . . . . . . . . . . . 17 ⊢ ((2 · 𝑘) ∈ ℂ → ((2 · 𝑘) + 1) ∈ ℂ)
93	71, 92	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ ℤ → ((2 · 𝑘) + 1) ∈ ℂ)
94	93, 15	mulcomd 11251	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ∈ ℤ → (((2 · 𝑘) + 1) · π) = (π · ((2 · 𝑘) + 1)))
95	94	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (((2 · 𝑘) + 1) · π) = (π · ((2 · 𝑘) + 1)))
96		id 22	. . . . . . . . . . . . . . . . 17 ⊢ (((2 · 𝑘) + 1) = (𝑋 / π) → ((2 · 𝑘) + 1) = (𝑋 / π))
97	96	eqcomd 2733	. . . . . . . . . . . . . . . 16 ⊢ (((2 · 𝑘) + 1) = (𝑋 / π) → (𝑋 / π) = ((2 · 𝑘) + 1))
98	97	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (𝑋 / π) = ((2 · 𝑘) + 1))
99	27	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → 𝑋 ∈ ℂ)
100	93	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → ((2 · 𝑘) + 1) ∈ ℂ)
101	35	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → π ≠ 0)
102	99, 74, 100, 101	divmuld 12028	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → ((𝑋 / π) = ((2 · 𝑘) + 1) ↔ (π · ((2 · 𝑘) + 1)) = 𝑋))
103	98, 102	mpbid 231	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (π · ((2 · 𝑘) + 1)) = 𝑋)
104	91, 95, 103	3eqtrrd 2772	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → 𝑋 = (π + (𝑘 · 𝑇)))
105	104	oveq1d 7429	. . . . . . . . . . . 12 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (𝑋 mod 𝑇) = ((π + (𝑘 · 𝑇)) mod 𝑇))
106		modcyc 13889	. . . . . . . . . . . . . 14 ⊢ ((π ∈ ℝ ∧ 𝑇 ∈ ℝ⁺ ∧ 𝑘 ∈ ℤ) → ((π + (𝑘 · 𝑇)) mod 𝑇) = (π mod 𝑇))
107	33, 63, 106	mp3an12 1448	. . . . . . . . . . . . 13 ⊢ (𝑘 ∈ ℤ → ((π + (𝑘 · 𝑇)) mod 𝑇) = (π mod 𝑇))
108	107	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → ((π + (𝑘 · 𝑇)) mod 𝑇) = (π mod 𝑇))
109	33	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → π ∈ ℝ)
110	63	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → 𝑇 ∈ ℝ⁺)
111		0re 11232	. . . . . . . . . . . . . . 15 ⊢ 0 ∈ ℝ
112	111, 33, 34	ltleii 11353	. . . . . . . . . . . . . 14 ⊢ 0 ≤ π
113	112	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → 0 ≤ π)
114		2timesgt 44583	. . . . . . . . . . . . . . . 16 ⊢ (π ∈ ℝ⁺ → π < (2 · π))
115	5, 114	ax-mp 5	. . . . . . . . . . . . . . 15 ⊢ π < (2 · π)
116	115, 40	breqtrri 5169	. . . . . . . . . . . . . 14 ⊢ π < 𝑇
117	116	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → π < 𝑇)
118		modid 13879	. . . . . . . . . . . . 13 ⊢ (((π ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) ∧ (0 ≤ π ∧ π < 𝑇)) → (π mod 𝑇) = π)
119	109, 110, 113, 117, 118	syl22anc 838	. . . . . . . . . . . 12 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (π mod 𝑇) = π)
120	105, 108, 119	3eqtrd 2771	. . . . . . . . . . 11 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (𝑋 mod 𝑇) = π)
121	120	ex 412	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℤ → (((2 · 𝑘) + 1) = (𝑋 / π) → (𝑋 mod 𝑇) = π))
122	121	a1i 11	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ ¬ 2 ∥ (𝑋 / π)) → (𝑘 ∈ ℤ → (((2 · 𝑘) + 1) = (𝑋 / π) → (𝑋 mod 𝑇) = π)))
123	122	rexlimdv 3148	. . . . . . . 8 ⊢ (((𝑋 mod π) = 0 ∧ ¬ 2 ∥ (𝑋 / π)) → (∃𝑘 ∈ ℤ ((2 · 𝑘) + 1) = (𝑋 / π) → (𝑋 mod 𝑇) = π))
124	70, 123	mpd 15	. . . . . . 7 ⊢ (((𝑋 mod π) = 0 ∧ ¬ 2 ∥ (𝑋 / π)) → (𝑋 mod 𝑇) = π)
125	124	olcd 873	. . . . . 6 ⊢ (((𝑋 mod π) = 0 ∧ ¬ 2 ∥ (𝑋 / π)) → ((𝑋 mod 𝑇) = 0 ∨ (𝑋 mod 𝑇) = π))
126	67, 125	pm2.61dan 812	. . . . 5 ⊢ ((𝑋 mod π) = 0 → ((𝑋 mod 𝑇) = 0 ∨ (𝑋 mod 𝑇) = π))
127		0xr 11277	. . . . . . . 8 ⊢ 0 ∈ ℝ^*
128	33	rexri 11288	. . . . . . . 8 ⊢ π ∈ ℝ^*
129		iocgtlb 44800	. . . . . . . 8 ⊢ ((0 ∈ ℝ^* ∧ π ∈ ℝ^* ∧ (𝑋 mod 𝑇) ∈ (0(,]π)) → 0 < (𝑋 mod 𝑇))
130	127, 128, 129	mp3an12 1448	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) ∈ (0(,]π) → 0 < (𝑋 mod 𝑇))
131	130	gt0ne0d 11794	. . . . . 6 ⊢ ((𝑋 mod 𝑇) ∈ (0(,]π) → (𝑋 mod 𝑇) ≠ 0)
132	131	neneqd 2940	. . . . 5 ⊢ ((𝑋 mod 𝑇) ∈ (0(,]π) → ¬ (𝑋 mod 𝑇) = 0)
133		pm2.53 850	. . . . . 6 ⊢ (((𝑋 mod 𝑇) = 0 ∨ (𝑋 mod 𝑇) = π) → (¬ (𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) = π))
134	133	imp 406	. . . . 5 ⊢ ((((𝑋 mod 𝑇) = 0 ∨ (𝑋 mod 𝑇) = π) ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) = π)
135	126, 132, 134	syl2anr 596	. . . 4 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod π) = 0) → (𝑋 mod 𝑇) = π)
136	127	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → 0 ∈ ℝ^*)
137	128	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → π ∈ ℝ^*)
138		modcl 13856	. . . . . . . . . . . . . . 15 ⊢ ((𝑋 ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) → (𝑋 mod 𝑇) ∈ ℝ)
139	4, 63, 138	mp2an 691	. . . . . . . . . . . . . 14 ⊢ (𝑋 mod 𝑇) ∈ ℝ
140	139	rexri 11288	. . . . . . . . . . . . 13 ⊢ (𝑋 mod 𝑇) ∈ ℝ^*
141	140	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → (𝑋 mod 𝑇) ∈ ℝ^*)
142		id 22	. . . . . . . . . . . . 13 ⊢ ((𝑋 mod 𝑇) = π → (𝑋 mod 𝑇) = π)
143	34, 142	breqtrrid 5180	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → 0 < (𝑋 mod 𝑇))
144	33	eqlei2 11341	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → (𝑋 mod 𝑇) ≤ π)
145	136, 137, 141, 143, 144	eliocd 44805	. . . . . . . . . . 11 ⊢ ((𝑋 mod 𝑇) = π → (𝑋 mod 𝑇) ∈ (0(,]π))
146	145	iftrued 4532	. . . . . . . . . 10 ⊢ ((𝑋 mod 𝑇) = π → if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) = 1)
147	146	adantl 481	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = π) → if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) = 1)
148		oveq1 7421	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑋 → (𝑥 mod 𝑇) = (𝑋 mod 𝑇))
149	148	breq1d 5152	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑋 → ((𝑥 mod 𝑇) < π ↔ (𝑋 mod 𝑇) < π))
150	149	ifbid 4547	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑋 → if((𝑥 mod 𝑇) < π, 1, -1) = if((𝑋 mod 𝑇) < π, 1, -1))
151		fourierswlem.f	. . . . . . . . . . . . 13 ⊢ 𝐹 = (𝑥 ∈ ℝ ↦ if((𝑥 mod 𝑇) < π, 1, -1))
152		1ex 11226	. . . . . . . . . . . . . 14 ⊢ 1 ∈ V
153		negex 11474	. . . . . . . . . . . . . 14 ⊢ -1 ∈ V
154	152, 153	ifex 4574	. . . . . . . . . . . . 13 ⊢ if((𝑋 mod 𝑇) < π, 1, -1) ∈ V
155	150, 151, 154	fvmpt 6999	. . . . . . . . . . . 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 11366	. . . . . . . . . . . . 13 ⊢ ((𝑋 mod 𝑇) < π → (𝑋 mod 𝑇) ≠ π)
160	159	necon2bi 2966	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → ¬ (𝑋 mod 𝑇) < π)
161	160	iffalsed 4535	. . . . . . . . . . 11 ⊢ ((𝑋 mod 𝑇) = π → if((𝑋 mod 𝑇) < π, 1, -1) = -1)
162	156, 161	eqtrid 2779	. . . . . . . . . 10 ⊢ ((𝑋 mod 𝑇) = π → (𝐹‘𝑋) = -1)
163	162	adantl 481	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = π) → (𝐹‘𝑋) = -1)
164	147, 163	oveq12d 7432	. . . . . . . 8 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = π) → (if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) = (1 + -1))
165		1pneg1e0 12347	. . . . . . . 8 ⊢ (1 + -1) = 0
166	164, 165	eqtrdi 2783	. . . . . . 7 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = π) → (if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) = 0)
167	166	oveq1d 7429	. . . . . 6 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = π) → ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2) = (0 / 2))
168	167	adantll 713	. . . . 5 ⊢ ((((𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod π) = 0) ∧ (𝑋 mod 𝑇) = π) → ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2) = (0 / 2))
169		2cn 12303	. . . . . . 7 ⊢ 2 ∈ ℂ
170	169, 44	div0i 11964	. . . . . 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 4530	. . . . . . 7 ⊢ ((𝑋 mod π) = 0 → if((𝑋 mod π) = 0, 0, (𝐹‘𝑋)) = 0)
174	172, 173	eqtr2id 2780	. . . . . 6 ⊢ ((𝑋 mod π) = 0 → 0 = 𝑌)
175	174	ad2antlr 726	. . . . 5 ⊢ ((((𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod π) = 0) ∧ (𝑋 mod 𝑇) = π) → 0 = 𝑌)
176	168, 171, 175	3eqtrrd 2772	. . . 4 ⊢ ((((𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod π) = 0) ∧ (𝑋 mod 𝑇) = π) → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
177	135, 176	mpdan 686	. . 3 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod π) = 0) → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
178		iftrue 4530	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) ∈ (0(,]π) → if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) = 1)
179	178	adantr 480	. . . . . 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 44801	. . . . . . . . . 10 ⊢ ((0 ∈ ℝ^* ∧ π ∈ ℝ^* ∧ (𝑋 mod 𝑇) ∈ (0(,]π)) → (𝑋 mod 𝑇) ≤ π)
183	127, 128, 182	mp3an12 1448	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) ∈ (0(,]π) → (𝑋 mod 𝑇) ≤ π)
184	183	adantr 480	. . . . . . . 8 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → (𝑋 mod 𝑇) ≤ π)
185		ax-1cn 11182	. . . . . . . . . . . . . . . . . . . 20 ⊢ 1 ∈ ℂ
186	185, 14	mulcomi 11238	. . . . . . . . . . . . . . . . . . 19 ⊢ (1 · π) = (π · 1)
187	83, 186	eqtr3i 2757	. . . . . . . . . . . . . . . . . 18 ⊢ π = (π · 1)
188	187	oveq1i 7424	. . . . . . . . . . . . . . . . 17 ⊢ (π + (π · (2 · (⌊‘(𝑋 / 𝑇))))) = ((π · 1) + (π · (2 · (⌊‘(𝑋 / 𝑇)))))
189	169, 14	mulcomi 11238	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (2 · π) = (π · 2)
190	40, 189	eqtri 2755	. . . . . . . . . . . . . . . . . . . 20 ⊢ 𝑇 = (π · 2)
191	190	oveq1i 7424	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑇 · (⌊‘(𝑋 / 𝑇))) = ((π · 2) · (⌊‘(𝑋 / 𝑇)))
192	111, 62	gtneii 11342	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 𝑇 ≠ 0
193	4, 59, 192	redivcli 11997	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑋 / 𝑇) ∈ ℝ
194		flcl 13778	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑋 / 𝑇) ∈ ℝ → (⌊‘(𝑋 / 𝑇)) ∈ ℤ)
195	193, 194	ax-mp 5	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (⌊‘(𝑋 / 𝑇)) ∈ ℤ
196		zcn 12579	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((⌊‘(𝑋 / 𝑇)) ∈ ℤ → (⌊‘(𝑋 / 𝑇)) ∈ ℂ)
197	195, 196	ax-mp 5	. . . . . . . . . . . . . . . . . . . 20 ⊢ (⌊‘(𝑋 / 𝑇)) ∈ ℂ
198	14, 169, 197	mulassi 11241	. . . . . . . . . . . . . . . . . . 19 ⊢ ((π · 2) · (⌊‘(𝑋 / 𝑇))) = (π · (2 · (⌊‘(𝑋 / 𝑇))))
199	191, 198	eqtri 2755	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑇 · (⌊‘(𝑋 / 𝑇))) = (π · (2 · (⌊‘(𝑋 / 𝑇))))
200	199	oveq2i 7425	. . . . . . . . . . . . . . . . 17 ⊢ (π + (𝑇 · (⌊‘(𝑋 / 𝑇)))) = (π + (π · (2 · (⌊‘(𝑋 / 𝑇)))))
201	169, 197	mulcli 11237	. . . . . . . . . . . . . . . . . 18 ⊢ (2 · (⌊‘(𝑋 / 𝑇))) ∈ ℂ
202	14, 185, 201	adddii 11242	. . . . . . . . . . . . . . . . 17 ⊢ (π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))) = ((π · 1) + (π · (2 · (⌊‘(𝑋 / 𝑇)))))
203	188, 200, 202	3eqtr4ri 2766	. . . . . . . . . . . . . . . 16 ⊢ (π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))) = (π + (𝑇 · (⌊‘(𝑋 / 𝑇))))
204	203	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (π = (𝑋 mod 𝑇) → (π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))) = (π + (𝑇 · (⌊‘(𝑋 / 𝑇)))))
205		id 22	. . . . . . . . . . . . . . . . 17 ⊢ (π = (𝑋 mod 𝑇) → π = (𝑋 mod 𝑇))
206		modval 13854	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑋 ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) → (𝑋 mod 𝑇) = (𝑋 − (𝑇 · (⌊‘(𝑋 / 𝑇)))))
207	4, 63, 206	mp2an 691	. . . . . . . . . . . . . . . . 17 ⊢ (𝑋 mod 𝑇) = (𝑋 − (𝑇 · (⌊‘(𝑋 / 𝑇))))
208	205, 207	eqtrdi 2783	. . . . . . . . . . . . . . . 16 ⊢ (π = (𝑋 mod 𝑇) → π = (𝑋 − (𝑇 · (⌊‘(𝑋 / 𝑇)))))
209	208	oveq1d 7429	. . . . . . . . . . . . . . 15 ⊢ (π = (𝑋 mod 𝑇) → (π + (𝑇 · (⌊‘(𝑋 / 𝑇)))) = ((𝑋 − (𝑇 · (⌊‘(𝑋 / 𝑇)))) + (𝑇 · (⌊‘(𝑋 / 𝑇)))))
210	27	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (π = (𝑋 mod 𝑇) → 𝑋 ∈ ℂ)
211	59	recni 11244	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑇 ∈ ℂ
212	211, 197	mulcli 11237	. . . . . . . . . . . . . . . . 17 ⊢ (𝑇 · (⌊‘(𝑋 / 𝑇))) ∈ ℂ
213	212	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (π = (𝑋 mod 𝑇) → (𝑇 · (⌊‘(𝑋 / 𝑇))) ∈ ℂ)
214	210, 213	npcand 11591	. . . . . . . . . . . . . . 15 ⊢ (π = (𝑋 mod 𝑇) → ((𝑋 − (𝑇 · (⌊‘(𝑋 / 𝑇)))) + (𝑇 · (⌊‘(𝑋 / 𝑇)))) = 𝑋)
215	204, 209, 214	3eqtrrd 2772	. . . . . . . . . . . . . 14 ⊢ (π = (𝑋 mod 𝑇) → 𝑋 = (π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))))
216	215	oveq1d 7429	. . . . . . . . . . . . 13 ⊢ (π = (𝑋 mod 𝑇) → (𝑋 / π) = ((π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))) / π))
217	185, 201	addcli 11236	. . . . . . . . . . . . . 14 ⊢ (1 + (2 · (⌊‘(𝑋 / 𝑇)))) ∈ ℂ
218	217, 14, 35	divcan3i 11976	. . . . . . . . . . . . 13 ⊢ ((π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))) / π) = (1 + (2 · (⌊‘(𝑋 / 𝑇))))
219	216, 218	eqtrdi 2783	. . . . . . . . . . . 12 ⊢ (π = (𝑋 mod 𝑇) → (𝑋 / π) = (1 + (2 · (⌊‘(𝑋 / 𝑇)))))
220		1z 12608	. . . . . . . . . . . . . 14 ⊢ 1 ∈ ℤ
221		zmulcl 12627	. . . . . . . . . . . . . . 15 ⊢ ((2 ∈ ℤ ∧ (⌊‘(𝑋 / 𝑇)) ∈ ℤ) → (2 · (⌊‘(𝑋 / 𝑇))) ∈ ℤ)
222	2, 195, 221	mp2an 691	. . . . . . . . . . . . . 14 ⊢ (2 · (⌊‘(𝑋 / 𝑇))) ∈ ℤ
223		zaddcl 12618	. . . . . . . . . . . . . 14 ⊢ ((1 ∈ ℤ ∧ (2 · (⌊‘(𝑋 / 𝑇))) ∈ ℤ) → (1 + (2 · (⌊‘(𝑋 / 𝑇)))) ∈ ℤ)
224	220, 222, 223	mp2an 691	. . . . . . . . . . . . 13 ⊢ (1 + (2 · (⌊‘(𝑋 / 𝑇)))) ∈ ℤ
225	224	a1i 11	. . . . . . . . . . . 12 ⊢ (π = (𝑋 mod 𝑇) → (1 + (2 · (⌊‘(𝑋 / 𝑇)))) ∈ ℤ)
226	219, 225	eqeltrd 2828	. . . . . . . . . . 11 ⊢ (π = (𝑋 mod 𝑇) → (𝑋 / π) ∈ ℤ)
227	226, 7	sylibr 233	. . . . . . . . . 10 ⊢ (π = (𝑋 mod 𝑇) → (𝑋 mod π) = 0)
228	227	necon3bi 2962	. . . . . . . . 9 ⊢ (¬ (𝑋 mod π) = 0 → π ≠ (𝑋 mod 𝑇))
229	228	adantl 481	. . . . . . . 8 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → π ≠ (𝑋 mod 𝑇))
230	180, 181, 184, 229	leneltd 11384	. . . . . . 7 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → (𝑋 mod 𝑇) < π)
231		iftrue 4530	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) < π → if((𝑋 mod 𝑇) < π, 1, -1) = 1)
232	156, 231	eqtrid 2779	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) < π → (𝐹‘𝑋) = 1)
233	230, 232	syl 17	. . . . . 6 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → (𝐹‘𝑋) = 1)
234	179, 233	oveq12d 7432	. . . . 5 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → (if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) = (1 + 1))
235	234	oveq1d 7429	. . . 4 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2) = ((1 + 1) / 2))
236		1p1e2 12353	. . . . . . 7 ⊢ (1 + 1) = 2
237	236	oveq1i 7424	. . . . . 6 ⊢ ((1 + 1) / 2) = (2 / 2)
238		2div2e1 12369	. . . . . 6 ⊢ (2 / 2) = 1
239	237, 238	eqtr2i 2756	. . . . 5 ⊢ 1 = ((1 + 1) / 2)
240	233, 239	eqtr2di 2784	. . . 4 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → ((1 + 1) / 2) = (𝐹‘𝑋))
241		iffalse 4533	. . . . . 6 ⊢ (¬ (𝑋 mod π) = 0 → if((𝑋 mod π) = 0, 0, (𝐹‘𝑋)) = (𝐹‘𝑋))
242	172, 241	eqtr2id 2780	. . . . 5 ⊢ (¬ (𝑋 mod π) = 0 → (𝐹‘𝑋) = 𝑌)
243	242	adantl 481	. . . 4 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → (𝐹‘𝑋) = 𝑌)
244	235, 240, 243	3eqtrrd 2772	. . 3 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
245	177, 244	pm2.61dan 812	. 2 ⊢ ((𝑋 mod 𝑇) ∈ (0(,]π) → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
246	131	necon2bi 2966	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) = 0 → ¬ (𝑋 mod 𝑇) ∈ (0(,]π))
247	246	iffalsed 4535	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) = 0 → if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) = -1)
248		id 22	. . . . . . . . . 10 ⊢ ((𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) = 0)
249	248, 34	eqbrtrdi 5181	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) < π)
250	249	iftrued 4532	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) = 0 → if((𝑋 mod 𝑇) < π, 1, -1) = 1)
251	156, 250	eqtrid 2779	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) = 0 → (𝐹‘𝑋) = 1)
252	247, 251	oveq12d 7432	. . . . . 6 ⊢ ((𝑋 mod 𝑇) = 0 → (if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) = (-1 + 1))
253	252	oveq1d 7429	. . . . 5 ⊢ ((𝑋 mod 𝑇) = 0 → ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2) = ((-1 + 1) / 2))
254		neg1cn 12342	. . . . . . . . 9 ⊢ -1 ∈ ℂ
255	185, 254, 165	addcomli 11422	. . . . . . . 8 ⊢ (-1 + 1) = 0
256	255	oveq1i 7424	. . . . . . 7 ⊢ ((-1 + 1) / 2) = (0 / 2)
257	256, 170	eqtri 2755	. . . . . 6 ⊢ ((-1 + 1) / 2) = 0
258	257	a1i 11	. . . . 5 ⊢ ((𝑋 mod 𝑇) = 0 → ((-1 + 1) / 2) = 0)
259	40	oveq2i 7425	. . . . . . . . . . . . 13 ⊢ (𝑋 / 𝑇) = (𝑋 / (2 · π))
260		2cnne0 12438	. . . . . . . . . . . . . 14 ⊢ (2 ∈ ℂ ∧ 2 ≠ 0)
261	14, 35	pm3.2i 470	. . . . . . . . . . . . . 14 ⊢ (π ∈ ℂ ∧ π ≠ 0)
262		divdiv1 11941	. . . . . . . . . . . . . 14 ⊢ ((𝑋 ∈ ℂ ∧ (2 ∈ ℂ ∧ 2 ≠ 0) ∧ (π ∈ ℂ ∧ π ≠ 0)) → ((𝑋 / 2) / π) = (𝑋 / (2 · π)))
263	27, 260, 261, 262	mp3an 1458	. . . . . . . . . . . . 13 ⊢ ((𝑋 / 2) / π) = (𝑋 / (2 · π))
264	27, 169, 14, 44, 35	divdiv32i 11985	. . . . . . . . . . . . 13 ⊢ ((𝑋 / 2) / π) = ((𝑋 / π) / 2)
265	259, 263, 264	3eqtr2i 2761	. . . . . . . . . . . 12 ⊢ (𝑋 / 𝑇) = ((𝑋 / π) / 2)
266	265	oveq2i 7425	. . . . . . . . . . 11 ⊢ (2 · (𝑋 / 𝑇)) = (2 · ((𝑋 / π) / 2))
267	27, 14, 35	divcli 11972	. . . . . . . . . . . 12 ⊢ (𝑋 / π) ∈ ℂ
268	267, 169, 44	divcan2i 11973	. . . . . . . . . . 11 ⊢ (2 · ((𝑋 / π) / 2)) = (𝑋 / π)
269	266, 268	eqtr2i 2756	. . . . . . . . . 10 ⊢ (𝑋 / π) = (2 · (𝑋 / 𝑇))
270	2	a1i 11	. . . . . . . . . . 11 ⊢ ((𝑋 / 𝑇) ∈ ℤ → 2 ∈ ℤ)
271		id 22	. . . . . . . . . . 11 ⊢ ((𝑋 / 𝑇) ∈ ℤ → (𝑋 / 𝑇) ∈ ℤ)
272	270, 271	zmulcld 12688	. . . . . . . . . 10 ⊢ ((𝑋 / 𝑇) ∈ ℤ → (2 · (𝑋 / 𝑇)) ∈ ℤ)
273	269, 272	eqeltrid 2832	. . . . . . . . 9 ⊢ ((𝑋 / 𝑇) ∈ ℤ → (𝑋 / π) ∈ ℤ)
274	65, 273	sylbi 216	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) = 0 → (𝑋 / π) ∈ ℤ)
275	274, 7	sylibr 233	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) = 0 → (𝑋 mod π) = 0)
276	275	iftrued 4532	. . . . . 6 ⊢ ((𝑋 mod 𝑇) = 0 → if((𝑋 mod π) = 0, 0, (𝐹‘𝑋)) = 0)
277	172, 276	eqtr2id 2780	. . . . 5 ⊢ ((𝑋 mod 𝑇) = 0 → 0 = 𝑌)
278	253, 258, 277	3eqtrrd 2772	. . . 4 ⊢ ((𝑋 mod 𝑇) = 0 → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
279	278	adantl 481	. . 3 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod 𝑇) = 0) → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
280	128	a1i 11	. . . . 5 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → π ∈ ℝ^*)
281	59	rexri 11288	. . . . . 6 ⊢ 𝑇 ∈ ℝ^*
282	281	a1i 11	. . . . 5 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → 𝑇 ∈ ℝ^*)
283	139	a1i 11	. . . . 5 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) ∈ ℝ)
284		pm4.56 987	. . . . . . . 8 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) ↔ ¬ ((𝑋 mod 𝑇) ∈ (0(,]π) ∨ (𝑋 mod 𝑇) = 0))
285	284	biimpi 215	. . . . . . 7 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → ¬ ((𝑋 mod 𝑇) ∈ (0(,]π) ∨ (𝑋 mod 𝑇) = 0))
286		olc 867	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) = 0 → ((𝑋 mod 𝑇) ∈ (0(,]π) ∨ (𝑋 mod 𝑇) = 0))
287	286	adantl 481	. . . . . . . 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 11233	. . . . . . . . . . . 12 ⊢ (¬ (𝑋 mod 𝑇) = 0 → 0 ∈ ℝ)
292	139	a1i 11	. . . . . . . . . . . 12 ⊢ (¬ (𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) ∈ ℝ)
293		modge0 13862	. . . . . . . . . . . . . 14 ⊢ ((𝑋 ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) → 0 ≤ (𝑋 mod 𝑇))
294	4, 63, 293	mp2an 691	. . . . . . . . . . . . 13 ⊢ 0 ≤ (𝑋 mod 𝑇)
295	294	a1i 11	. . . . . . . . . . . 12 ⊢ (¬ (𝑋 mod 𝑇) = 0 → 0 ≤ (𝑋 mod 𝑇))
296		neqne 2943	. . . . . . . . . . . 12 ⊢ (¬ (𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) ≠ 0)
297	291, 292, 295, 296	leneltd 11384	. . . . . . . . . . 11 ⊢ (¬ (𝑋 mod 𝑇) = 0 → 0 < (𝑋 mod 𝑇))
298	297	adantl 481	. . . . . . . . . 10 ⊢ (((𝑋 mod 𝑇) ≤ π ∧ ¬ (𝑋 mod 𝑇) = 0) → 0 < (𝑋 mod 𝑇))
299		simpl 482	. . . . . . . . . 10 ⊢ (((𝑋 mod 𝑇) ≤ π ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) ≤ π)
300	288, 289, 290, 298, 299	eliocd 44805	. . . . . . . . 9 ⊢ (((𝑋 mod 𝑇) ≤ π ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) ∈ (0(,]π))
301	300	orcd 872	. . . . . . . 8 ⊢ (((𝑋 mod 𝑇) ≤ π ∧ ¬ (𝑋 mod 𝑇) = 0) → ((𝑋 mod 𝑇) ∈ (0(,]π) ∨ (𝑋 mod 𝑇) = 0))
302	287, 301	pm2.61dan 812	. . . . . . 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 11377	. . . . . 6 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → (π < (𝑋 mod 𝑇) ↔ ¬ (𝑋 mod 𝑇) ≤ π))
306	303, 305	mpbird 257	. . . . 5 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → π < (𝑋 mod 𝑇))
307		modlt 13863	. . . . . . 7 ⊢ ((𝑋 ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) → (𝑋 mod 𝑇) < 𝑇)
308	4, 63, 307	mp2an 691	. . . . . 6 ⊢ (𝑋 mod 𝑇) < 𝑇
309	308	a1i 11	. . . . 5 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) < 𝑇)
310	280, 282, 283, 306, 309	eliood 44796	. . . 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 44793	. . . . . . . . . 10 ⊢ ((π ∈ ℝ^* ∧ 𝑇 ∈ ℝ^* ∧ (𝑋 mod 𝑇) ∈ (π(,)𝑇)) → π < (𝑋 mod 𝑇))
315	128, 281, 314	mp3an12 1448	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → π < (𝑋 mod 𝑇))
316	311, 312, 313, 315	gtnelioc 44789	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → ¬ (𝑋 mod 𝑇) ∈ (0(,]π))
317	316	iffalsed 4535	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) = -1)
318	139	a1i 11	. . . . . . . . . 10 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → (𝑋 mod 𝑇) ∈ ℝ)
319	312, 318, 315	ltnsymd 11379	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → ¬ (𝑋 mod 𝑇) < π)
320	319	iffalsed 4535	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → if((𝑋 mod 𝑇) < π, 1, -1) = -1)
321	156, 320	eqtrid 2779	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → (𝐹‘𝑋) = -1)
322	317, 321	oveq12d 7432	. . . . . 6 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → (if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) = (-1 + -1))
323	322	oveq1d 7429	. . . . 5 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2) = ((-1 + -1) / 2))
324		df-2 12291	. . . . . . . . . 10 ⊢ 2 = (1 + 1)
325	324	negeqi 11469	. . . . . . . . 9 ⊢ -2 = -(1 + 1)
326	185, 185	negdii 11560	. . . . . . . . 9 ⊢ -(1 + 1) = (-1 + -1)
327	325, 326	eqtr2i 2756	. . . . . . . 8 ⊢ (-1 + -1) = -2
328	327	oveq1i 7424	. . . . . . 7 ⊢ ((-1 + -1) / 2) = (-2 / 2)
329		divneg 11922	. . . . . . . 8 ⊢ ((2 ∈ ℂ ∧ 2 ∈ ℂ ∧ 2 ≠ 0) → -(2 / 2) = (-2 / 2))
330	169, 169, 44, 329	mp3an 1458	. . . . . . 7 ⊢ -(2 / 2) = (-2 / 2)
331	238	negeqi 11469	. . . . . . 7 ⊢ -(2 / 2) = -1
332	328, 330, 331	3eqtr2i 2761	. . . . . 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 11377	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → (π < (𝑋 mod 𝑇) ↔ ¬ (𝑋 mod 𝑇) ≤ π))
336	315, 335	mpbid 231	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → ¬ (𝑋 mod 𝑇) ≤ π)
337	248, 112	eqbrtrdi 5181	. . . . . . . . . 10 ⊢ ((𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) ≤ π)
338	337	adantl 481	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) ≤ π)
339	126	orcanai 1001	. . . . . . . . . 10 ⊢ (((𝑋 mod π) = 0 ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) = π)
340	339, 144	syl 17	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) ≤ π)
341	338, 340	pm2.61dan 812	. . . . . . . 8 ⊢ ((𝑋 mod π) = 0 → (𝑋 mod 𝑇) ≤ π)
342	336, 341	nsyl 140	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → ¬ (𝑋 mod π) = 0)
343	342	iffalsed 4535	. . . . . 6 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → if((𝑋 mod π) = 0, 0, (𝐹‘𝑋)) = (𝐹‘𝑋))
344	334, 343, 321	3eqtrrd 2772	. . . . 5 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → -1 = 𝑌)
345	323, 333, 344	3eqtrrd 2772	. . . 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 812	. 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 395 ∨ wo 846 = wceq 1534 ∈ wcel 2099 ≠ wne 2935 ∃wrex 3065 ifcif 4524 class class class wbr 5142 ↦ cmpt 5225 ‘cfv 6542 (class class class)co 7414 ℂcc 11122 ℝcr 11123 0cc0 11124 1c1 11125 + caddc 11127 · cmul 11129 ℝ^*cxr 11263 < clt 11264 ≤ cle 11265 − cmin 11460 -cneg 11461 / cdiv 11887 2c2 12283 ℤcz 12574 ℝ⁺crp 12992 (,)cioo 13342 (,]cioc 13343 ⌊cfl 13773 mod cmo 13852 πcpi 16028 ∥ cdvds 16216

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1790 ax-4 1804 ax-5 1906 ax-6 1964 ax-7 2004 ax-8 2101 ax-9 2109 ax-10 2130 ax-11 2147 ax-12 2164 ax-ext 2698 ax-rep 5279 ax-sep 5293 ax-nul 5300 ax-pow 5359 ax-pr 5423 ax-un 7732 ax-inf2 9650 ax-cnex 11180 ax-resscn 11181 ax-1cn 11182 ax-icn 11183 ax-addcl 11184 ax-addrcl 11185 ax-mulcl 11186 ax-mulrcl 11187 ax-mulcom 11188 ax-addass 11189 ax-mulass 11190 ax-distr 11191 ax-i2m1 11192 ax-1ne0 11193 ax-1rid 11194 ax-rnegex 11195 ax-rrecex 11196 ax-cnre 11197 ax-pre-lttri 11198 ax-pre-lttrn 11199 ax-pre-ltadd 11200 ax-pre-mulgt0 11201 ax-pre-sup 11202 ax-addf 11203

This theorem depends on definitions: df-bi 206 df-an 396 df-or 847 df-3or 1086 df-3an 1087 df-tru 1537 df-fal 1547 df-ex 1775 df-nf 1779 df-sb 2061 df-mo 2529 df-eu 2558 df-clab 2705 df-cleq 2719 df-clel 2805 df-nfc 2880 df-ne 2936 df-nel 3042 df-ral 3057 df-rex 3066 df-rmo 3371 df-reu 3372 df-rab 3428 df-v 3471 df-sbc 3775 df-csb 3890 df-dif 3947 df-un 3949 df-in 3951 df-ss 3961 df-pss 3963 df-nul 4319 df-if 4525 df-pw 4600 df-sn 4625 df-pr 4627 df-tp 4629 df-op 4631 df-uni 4904 df-int 4945 df-iun 4993 df-iin 4994 df-br 5143 df-opab 5205 df-mpt 5226 df-tr 5260 df-id 5570 df-eprel 5576 df-po 5584 df-so 5585 df-fr 5627 df-se 5628 df-we 5629 df-xp 5678 df-rel 5679 df-cnv 5680 df-co 5681 df-dm 5682 df-rn 5683 df-res 5684 df-ima 5685 df-pred 6299 df-ord 6366 df-on 6367 df-lim 6368 df-suc 6369 df-iota 6494 df-fun 6544 df-fn 6545 df-f 6546 df-f1 6547 df-fo 6548 df-f1o 6549 df-fv 6550 df-isom 6551 df-riota 7370 df-ov 7417 df-oprab 7418 df-mpo 7419 df-of 7677 df-om 7863 df-1st 7985 df-2nd 7986 df-supp 8158 df-frecs 8278 df-wrecs 8309 df-recs 8383 df-rdg 8422 df-1o 8478 df-2o 8479 df-er 8716 df-map 8836 df-pm 8837 df-ixp 8906 df-en 8954 df-dom 8955 df-sdom 8956 df-fin 8957 df-fsupp 9376 df-fi 9420 df-sup 9451 df-inf 9452 df-oi 9519 df-card 9948 df-pnf 11266 df-mnf 11267 df-xr 11268 df-ltxr 11269 df-le 11270 df-sub 11462 df-neg 11463 df-div 11888 df-nn 12229 df-2 12291 df-3 12292 df-4 12293 df-5 12294 df-6 12295 df-7 12296 df-8 12297 df-9 12298 df-n0 12489 df-z 12575 df-dec 12694 df-uz 12839 df-q 12949 df-rp 12993 df-xneg 13110 df-xadd 13111 df-xmul 13112 df-ioo 13346 df-ioc 13347 df-ico 13348 df-icc 13349 df-fz 13503 df-fzo 13646 df-fl 13775 df-mod 13853 df-seq 13985 df-exp 14045 df-fac 14251 df-bc 14280 df-hash 14308 df-shft 15032 df-cj 15064 df-re 15065 df-im 15066 df-sqrt 15200 df-abs 15201 df-limsup 15433 df-clim 15450 df-rlim 15451 df-sum 15651 df-ef 16029 df-sin 16031 df-cos 16032 df-pi 16034 df-dvds 16217 df-struct 17101 df-sets 17118 df-slot 17136 df-ndx 17148 df-base 17166 df-ress 17195 df-plusg 17231 df-mulr 17232 df-starv 17233 df-sca 17234 df-vsca 17235 df-ip 17236 df-tset 17237 df-ple 17238 df-ds 17240 df-unif 17241 df-hom 17242 df-cco 17243 df-rest 17389 df-topn 17390 df-0g 17408 df-gsum 17409 df-topgen 17410 df-pt 17411 df-prds 17414 df-xrs 17469 df-qtop 17474 df-imas 17475 df-xps 17477 df-mre 17551 df-mrc 17552 df-acs 17554 df-mgm 18585 df-sgrp 18664 df-mnd 18680 df-submnd 18726 df-mulg 19008 df-cntz 19252 df-cmn 19721 df-psmet 21251 df-xmet 21252 df-met 21253 df-bl 21254 df-mopn 21255 df-fbas 21256 df-fg 21257 df-cnfld 21260 df-top 22770 df-topon 22787 df-topsp 22809 df-bases 22823 df-cld 22897 df-ntr 22898 df-cls 22899 df-nei 22976 df-lp 23014 df-perf 23015 df-cn 23105 df-cnp 23106 df-haus 23193 df-tx 23440 df-hmeo 23633 df-fil 23724 df-fm 23816 df-flim 23817 df-flf 23818 df-xms 24200 df-ms 24201 df-tms 24202 df-cncf 24772 df-limc 25769 df-dv 25770

This theorem is referenced by: fouriersw 45532

W3C validator