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 46186

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 12647	. . . . . . . . . . . 12 ⊢ 2 ∈ ℤ
3	2	a1i 11	. . . . . . . . . . 11 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → 2 ∈ ℤ)
4		fourierswlem.x	. . . . . . . . . . . . . 14 ⊢ 𝑋 ∈ ℝ
5		pirp 26518	. . . . . . . . . . . . . 14 ⊢ π ∈ ℝ⁺
6		mod0 13913	. . . . . . . . . . . . . 14 ⊢ ((𝑋 ∈ ℝ ∧ π ∈ ℝ⁺) → ((𝑋 mod π) = 0 ↔ (𝑋 / π) ∈ ℤ))
7	4, 5, 6	mp2an 692	. . . . . . . . . . . . 13 ⊢ ((𝑋 mod π) = 0 ↔ (𝑋 / π) ∈ ℤ)
8	7	biimpi 216	. . . . . . . . . . . 12 ⊢ ((𝑋 mod π) = 0 → (𝑋 / π) ∈ ℤ)
9	8	adantr 480	. . . . . . . . . . 11 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (𝑋 / π) ∈ ℤ)
10		divides 16289	. . . . . . . . . . 11 ⊢ ((2 ∈ ℤ ∧ (𝑋 / π) ∈ ℤ) → (2 ∥ (𝑋 / π) ↔ ∃𝑘 ∈ ℤ (𝑘 · 2) = (𝑋 / π)))
11	3, 9, 10	syl2anc 584	. . . . . . . . . 10 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (2 ∥ (𝑋 / π) ↔ ∃𝑘 ∈ ℤ (𝑘 · 2) = (𝑋 / π)))
12	1, 11	mpbid 232	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → ∃𝑘 ∈ ℤ (𝑘 · 2) = (𝑋 / π))
13		2cnd 12342	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → 2 ∈ ℂ)
14		picn 26516	. . . . . . . . . . . . . . . . . . . 20 ⊢ π ∈ ℂ
15	14	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → π ∈ ℂ)
16		zcn 12616	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → 𝑘 ∈ ℂ)
17	13, 15, 16	mulassd 11282	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → ((2 · π) · 𝑘) = (2 · (π · 𝑘)))
18	15, 16	mulcld 11279	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → (π · 𝑘) ∈ ℂ)
19	13, 18	mulcomd 11280	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → (2 · (π · 𝑘)) = ((π · 𝑘) · 2))
20	17, 19	eqtrd 2775	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → ((2 · π) · 𝑘) = ((π · 𝑘) · 2))
21	20	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → ((2 · π) · 𝑘) = ((π · 𝑘) · 2))
22	15, 16, 13	mulassd 11282	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → ((π · 𝑘) · 2) = (π · (𝑘 · 2)))
23	22	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → ((π · 𝑘) · 2) = (π · (𝑘 · 2)))
24		id 22	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑘 · 2) = (𝑋 / π) → (𝑘 · 2) = (𝑋 / π))
25	24	eqcomd 2741	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 · 2) = (𝑋 / π) → (𝑋 / π) = (𝑘 · 2))
26	25	adantl 481	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (𝑋 / π) = (𝑘 · 2))
27	4	recni 11273	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑋 ∈ ℂ
28	27	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 𝑋 ∈ ℂ)
29	14	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → π ∈ ℂ)
30	16	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 𝑘 ∈ ℂ)
31		2cnd 12342	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 2 ∈ ℂ)
32	30, 31	mulcld 11279	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (𝑘 · 2) ∈ ℂ)
33		pire 26515	. . . . . . . . . . . . . . . . . . . 20 ⊢ π ∈ ℝ
34		pipos 26517	. . . . . . . . . . . . . . . . . . . 20 ⊢ 0 < π
35	33, 34	gt0ne0ii 11797	. . . . . . . . . . . . . . . . . . 19 ⊢ π ≠ 0
36	35	a1i 11	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → π ≠ 0)
37	28, 29, 32, 36	divmuld 12063	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → ((𝑋 / π) = (𝑘 · 2) ↔ (π · (𝑘 · 2)) = 𝑋))
38	26, 37	mpbid 232	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (π · (𝑘 · 2)) = 𝑋)
39	21, 23, 38	3eqtrrd 2780	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 𝑋 = ((2 · π) · 𝑘))
40		fourierswlem.t	. . . . . . . . . . . . . . . 16 ⊢ 𝑇 = (2 · π)
41	40	a1i 11	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 𝑇 = (2 · π))
42	39, 41	oveq12d 7449	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (𝑋 / 𝑇) = (((2 · π) · 𝑘) / (2 · π)))
43	13, 15	mulcld 11279	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ ℤ → (2 · π) ∈ ℂ)
44		2ne0 12368	. . . . . . . . . . . . . . . . . 18 ⊢ 2 ≠ 0
45	44	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → 2 ≠ 0)
46	35	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → π ≠ 0)
47	13, 15, 45, 46	mulne0d 11913	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ ℤ → (2 · π) ≠ 0)
48	16, 43, 47	divcan3d 12046	. . . . . . . . . . . . . . 15 ⊢ (𝑘 ∈ ℤ → (((2 · π) · 𝑘) / (2 · π)) = 𝑘)
49	48	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (((2 · π) · 𝑘) / (2 · π)) = 𝑘)
50	42, 49	eqtrd 2775	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (𝑋 / 𝑇) = 𝑘)
51		simpl 482	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → 𝑘 ∈ ℤ)
52	50, 51	eqeltrd 2839	. . . . . . . . . . . 12 ⊢ ((𝑘 ∈ ℤ ∧ (𝑘 · 2) = (𝑋 / π)) → (𝑋 / 𝑇) ∈ ℤ)
53	52	ex 412	. . . . . . . . . . 11 ⊢ (𝑘 ∈ ℤ → ((𝑘 · 2) = (𝑋 / π) → (𝑋 / 𝑇) ∈ ℤ))
54	53	a1i 11	. . . . . . . . . 10 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (𝑘 ∈ ℤ → ((𝑘 · 2) = (𝑋 / π) → (𝑋 / 𝑇) ∈ ℤ)))
55	54	rexlimdv 3151	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (∃𝑘 ∈ ℤ (𝑘 · 2) = (𝑋 / π) → (𝑋 / 𝑇) ∈ ℤ))
56	12, 55	mpd 15	. . . . . . . 8 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (𝑋 / 𝑇) ∈ ℤ)
57		2re 12338	. . . . . . . . . . . 12 ⊢ 2 ∈ ℝ
58	57, 33	remulcli 11275	. . . . . . . . . . 11 ⊢ (2 · π) ∈ ℝ
59	40, 58	eqeltri 2835	. . . . . . . . . 10 ⊢ 𝑇 ∈ ℝ
60		2pos 12367	. . . . . . . . . . . 12 ⊢ 0 < 2
61	57, 33, 60, 34	mulgt0ii 11392	. . . . . . . . . . 11 ⊢ 0 < (2 · π)
62	61, 40	breqtrri 5175	. . . . . . . . . 10 ⊢ 0 < 𝑇
63	59, 62	elrpii 13035	. . . . . . . . 9 ⊢ 𝑇 ∈ ℝ⁺
64		mod0 13913	. . . . . . . . 9 ⊢ ((𝑋 ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) → ((𝑋 mod 𝑇) = 0 ↔ (𝑋 / 𝑇) ∈ ℤ))
65	4, 63, 64	mp2an 692	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) = 0 ↔ (𝑋 / 𝑇) ∈ ℤ)
66	56, 65	sylibr 234	. . . . . . 7 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → (𝑋 mod 𝑇) = 0)
67	66	orcd 873	. . . . . 6 ⊢ (((𝑋 mod π) = 0 ∧ 2 ∥ (𝑋 / π)) → ((𝑋 mod 𝑇) = 0 ∨ (𝑋 mod 𝑇) = π))
68		odd2np1 16375	. . . . . . . . . 10 ⊢ ((𝑋 / π) ∈ ℤ → (¬ 2 ∥ (𝑋 / π) ↔ ∃𝑘 ∈ ℤ ((2 · 𝑘) + 1) = (𝑋 / π)))
69	7, 68	sylbi 217	. . . . . . . . 9 ⊢ ((𝑋 mod π) = 0 → (¬ 2 ∥ (𝑋 / π) ↔ ∃𝑘 ∈ ℤ ((2 · 𝑘) + 1) = (𝑋 / π)))
70	69	biimpa 476	. . . . . . . 8 ⊢ (((𝑋 mod π) = 0 ∧ ¬ 2 ∥ (𝑋 / π)) → ∃𝑘 ∈ ℤ ((2 · 𝑘) + 1) = (𝑋 / π))
71	13, 16	mulcld 11279	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → (2 · 𝑘) ∈ ℂ)
72	71	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (2 · 𝑘) ∈ ℂ)
73		1cnd 11254	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → 1 ∈ ℂ)
74	14	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → π ∈ ℂ)
75	72, 73, 74	adddird 11284	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (((2 · 𝑘) + 1) · π) = (((2 · 𝑘) · π) + (1 · π)))
76	13, 16	mulcomd 11280	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → (2 · 𝑘) = (𝑘 · 2))
77	76	oveq1d 7446	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → ((2 · 𝑘) · π) = ((𝑘 · 2) · π))
78	16, 13, 15	mulassd 11282	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → ((𝑘 · 2) · π) = (𝑘 · (2 · π)))
79	40	eqcomi 2744	. . . . . . . . . . . . . . . . . . . 20 ⊢ (2 · π) = 𝑇
80	79	a1i 11	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑘 ∈ ℤ → (2 · π) = 𝑇)
81	80	oveq2d 7447	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → (𝑘 · (2 · π)) = (𝑘 · 𝑇))
82	77, 78, 81	3eqtrd 2779	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → ((2 · 𝑘) · π) = (𝑘 · 𝑇))
83	14	mullidi 11264	. . . . . . . . . . . . . . . . . 18 ⊢ (1 · π) = π
84	83	a1i 11	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → (1 · π) = π)
85	82, 84	oveq12d 7449	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ ℤ → (((2 · 𝑘) · π) + (1 · π)) = ((𝑘 · 𝑇) + π))
86	85	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (((2 · 𝑘) · π) + (1 · π)) = ((𝑘 · 𝑇) + π))
87	40, 43	eqeltrid 2843	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑘 ∈ ℤ → 𝑇 ∈ ℂ)
88	16, 87	mulcld 11279	. . . . . . . . . . . . . . . . 17 ⊢ (𝑘 ∈ ℤ → (𝑘 · 𝑇) ∈ ℂ)
89	88, 15	addcomd 11461	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ ℤ → ((𝑘 · 𝑇) + π) = (π + (𝑘 · 𝑇)))
90	89	adantr 480	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → ((𝑘 · 𝑇) + π) = (π + (𝑘 · 𝑇)))
91	75, 86, 90	3eqtrrd 2780	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (π + (𝑘 · 𝑇)) = (((2 · 𝑘) + 1) · π))
92		peano2cn 11431	. . . . . . . . . . . . . . . . 17 ⊢ ((2 · 𝑘) ∈ ℂ → ((2 · 𝑘) + 1) ∈ ℂ)
93	71, 92	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝑘 ∈ ℤ → ((2 · 𝑘) + 1) ∈ ℂ)
94	93, 15	mulcomd 11280	. . . . . . . . . . . . . . 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 2741	. . . . . . . . . . . . . . . 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 12063	. . . . . . . . . . . . . . 15 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → ((𝑋 / π) = ((2 · 𝑘) + 1) ↔ (π · ((2 · 𝑘) + 1)) = 𝑋))
103	98, 102	mpbid 232	. . . . . . . . . . . . . 14 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (π · ((2 · 𝑘) + 1)) = 𝑋)
104	91, 95, 103	3eqtrrd 2780	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → 𝑋 = (π + (𝑘 · 𝑇)))
105	104	oveq1d 7446	. . . . . . . . . . . 12 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (𝑋 mod 𝑇) = ((π + (𝑘 · 𝑇)) mod 𝑇))
106		modcyc 13943	. . . . . . . . . . . . . 14 ⊢ ((π ∈ ℝ ∧ 𝑇 ∈ ℝ⁺ ∧ 𝑘 ∈ ℤ) → ((π + (𝑘 · 𝑇)) mod 𝑇) = (π mod 𝑇))
107	33, 63, 106	mp3an12 1450	. . . . . . . . . . . . 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 11261	. . . . . . . . . . . . . . 15 ⊢ 0 ∈ ℝ
112	111, 33, 34	ltleii 11382	. . . . . . . . . . . . . 14 ⊢ 0 ≤ π
113	112	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → 0 ≤ π)
114		2timesgt 45239	. . . . . . . . . . . . . . . 16 ⊢ (π ∈ ℝ⁺ → π < (2 · π))
115	5, 114	ax-mp 5	. . . . . . . . . . . . . . 15 ⊢ π < (2 · π)
116	115, 40	breqtrri 5175	. . . . . . . . . . . . . 14 ⊢ π < 𝑇
117	116	a1i 11	. . . . . . . . . . . . 13 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → π < 𝑇)
118		modid 13933	. . . . . . . . . . . . 13 ⊢ (((π ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) ∧ (0 ≤ π ∧ π < 𝑇)) → (π mod 𝑇) = π)
119	109, 110, 113, 117, 118	syl22anc 839	. . . . . . . . . . . 12 ⊢ ((𝑘 ∈ ℤ ∧ ((2 · 𝑘) + 1) = (𝑋 / π)) → (π mod 𝑇) = π)
120	105, 108, 119	3eqtrd 2779	. . . . . . . . . . 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 3151	. . . . . . . 8 ⊢ (((𝑋 mod π) = 0 ∧ ¬ 2 ∥ (𝑋 / π)) → (∃𝑘 ∈ ℤ ((2 · 𝑘) + 1) = (𝑋 / π) → (𝑋 mod 𝑇) = π))
124	70, 123	mpd 15	. . . . . . 7 ⊢ (((𝑋 mod π) = 0 ∧ ¬ 2 ∥ (𝑋 / π)) → (𝑋 mod 𝑇) = π)
125	124	olcd 874	. . . . . 6 ⊢ (((𝑋 mod π) = 0 ∧ ¬ 2 ∥ (𝑋 / π)) → ((𝑋 mod 𝑇) = 0 ∨ (𝑋 mod 𝑇) = π))
126	67, 125	pm2.61dan 813	. . . . 5 ⊢ ((𝑋 mod π) = 0 → ((𝑋 mod 𝑇) = 0 ∨ (𝑋 mod 𝑇) = π))
127		0xr 11306	. . . . . . . 8 ⊢ 0 ∈ ℝ^*
128	33	rexri 11317	. . . . . . . 8 ⊢ π ∈ ℝ^*
129		iocgtlb 45455	. . . . . . . 8 ⊢ ((0 ∈ ℝ^* ∧ π ∈ ℝ^* ∧ (𝑋 mod 𝑇) ∈ (0(,]π)) → 0 < (𝑋 mod 𝑇))
130	127, 128, 129	mp3an12 1450	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) ∈ (0(,]π) → 0 < (𝑋 mod 𝑇))
131	130	gt0ne0d 11825	. . . . . 6 ⊢ ((𝑋 mod 𝑇) ∈ (0(,]π) → (𝑋 mod 𝑇) ≠ 0)
132	131	neneqd 2943	. . . . 5 ⊢ ((𝑋 mod 𝑇) ∈ (0(,]π) → ¬ (𝑋 mod 𝑇) = 0)
133		pm2.53 851	. . . . . 6 ⊢ (((𝑋 mod 𝑇) = 0 ∨ (𝑋 mod 𝑇) = π) → (¬ (𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) = π))
134	133	imp 406	. . . . 5 ⊢ ((((𝑋 mod 𝑇) = 0 ∨ (𝑋 mod 𝑇) = π) ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) = π)
135	126, 132, 134	syl2anr 597	. . . 4 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod π) = 0) → (𝑋 mod 𝑇) = π)
136	127	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → 0 ∈ ℝ^*)
137	128	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → π ∈ ℝ^*)
138		modcl 13910	. . . . . . . . . . . . . . 15 ⊢ ((𝑋 ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) → (𝑋 mod 𝑇) ∈ ℝ)
139	4, 63, 138	mp2an 692	. . . . . . . . . . . . . 14 ⊢ (𝑋 mod 𝑇) ∈ ℝ
140	139	rexri 11317	. . . . . . . . . . . . 13 ⊢ (𝑋 mod 𝑇) ∈ ℝ^*
141	140	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → (𝑋 mod 𝑇) ∈ ℝ^*)
142		id 22	. . . . . . . . . . . . 13 ⊢ ((𝑋 mod 𝑇) = π → (𝑋 mod 𝑇) = π)
143	34, 142	breqtrrid 5186	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → 0 < (𝑋 mod 𝑇))
144	33	eqlei2 11370	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → (𝑋 mod 𝑇) ≤ π)
145	136, 137, 141, 143, 144	eliocd 45460	. . . . . . . . . . 11 ⊢ ((𝑋 mod 𝑇) = π → (𝑋 mod 𝑇) ∈ (0(,]π))
146	145	iftrued 4539	. . . . . . . . . 10 ⊢ ((𝑋 mod 𝑇) = π → if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) = 1)
147	146	adantl 481	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = π) → if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) = 1)
148		oveq1 7438	. . . . . . . . . . . . . . 15 ⊢ (𝑥 = 𝑋 → (𝑥 mod 𝑇) = (𝑋 mod 𝑇))
149	148	breq1d 5158	. . . . . . . . . . . . . 14 ⊢ (𝑥 = 𝑋 → ((𝑥 mod 𝑇) < π ↔ (𝑋 mod 𝑇) < π))
150	149	ifbid 4554	. . . . . . . . . . . . 13 ⊢ (𝑥 = 𝑋 → if((𝑥 mod 𝑇) < π, 1, -1) = if((𝑋 mod 𝑇) < π, 1, -1))
151		fourierswlem.f	. . . . . . . . . . . . 13 ⊢ 𝐹 = (𝑥 ∈ ℝ ↦ if((𝑥 mod 𝑇) < π, 1, -1))
152		1ex 11255	. . . . . . . . . . . . . 14 ⊢ 1 ∈ V
153		negex 11504	. . . . . . . . . . . . . 14 ⊢ -1 ∈ V
154	152, 153	ifex 4581	. . . . . . . . . . . . 13 ⊢ if((𝑋 mod 𝑇) < π, 1, -1) ∈ V
155	150, 151, 154	fvmpt 7016	. . . . . . . . . . . 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 11395	. . . . . . . . . . . . 13 ⊢ ((𝑋 mod 𝑇) < π → (𝑋 mod 𝑇) ≠ π)
160	159	necon2bi 2969	. . . . . . . . . . . 12 ⊢ ((𝑋 mod 𝑇) = π → ¬ (𝑋 mod 𝑇) < π)
161	160	iffalsed 4542	. . . . . . . . . . 11 ⊢ ((𝑋 mod 𝑇) = π → if((𝑋 mod 𝑇) < π, 1, -1) = -1)
162	156, 161	eqtrid 2787	. . . . . . . . . 10 ⊢ ((𝑋 mod 𝑇) = π → (𝐹‘𝑋) = -1)
163	162	adantl 481	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = π) → (𝐹‘𝑋) = -1)
164	147, 163	oveq12d 7449	. . . . . . . 8 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = π) → (if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) = (1 + -1))
165		1pneg1e0 12383	. . . . . . . 8 ⊢ (1 + -1) = 0
166	164, 165	eqtrdi 2791	. . . . . . 7 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = π) → (if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) = 0)
167	166	oveq1d 7446	. . . . . 6 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = π) → ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2) = (0 / 2))
168	167	adantll 714	. . . . 5 ⊢ ((((𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod π) = 0) ∧ (𝑋 mod 𝑇) = π) → ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2) = (0 / 2))
169		2cn 12339	. . . . . . 7 ⊢ 2 ∈ ℂ
170	169, 44	div0i 11999	. . . . . 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 4537	. . . . . . 7 ⊢ ((𝑋 mod π) = 0 → if((𝑋 mod π) = 0, 0, (𝐹‘𝑋)) = 0)
174	172, 173	eqtr2id 2788	. . . . . 6 ⊢ ((𝑋 mod π) = 0 → 0 = 𝑌)
175	174	ad2antlr 727	. . . . 5 ⊢ ((((𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod π) = 0) ∧ (𝑋 mod 𝑇) = π) → 0 = 𝑌)
176	168, 171, 175	3eqtrrd 2780	. . . 4 ⊢ ((((𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod π) = 0) ∧ (𝑋 mod 𝑇) = π) → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
177	135, 176	mpdan 687	. . 3 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ (𝑋 mod π) = 0) → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
178		iftrue 4537	. . . . . . 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 45456	. . . . . . . . . 10 ⊢ ((0 ∈ ℝ^* ∧ π ∈ ℝ^* ∧ (𝑋 mod 𝑇) ∈ (0(,]π)) → (𝑋 mod 𝑇) ≤ π)
183	127, 128, 182	mp3an12 1450	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) ∈ (0(,]π) → (𝑋 mod 𝑇) ≤ π)
184	183	adantr 480	. . . . . . . 8 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → (𝑋 mod 𝑇) ≤ π)
185		ax-1cn 11211	. . . . . . . . . . . . . . . . . . . 20 ⊢ 1 ∈ ℂ
186	185, 14	mulcomi 11267	. . . . . . . . . . . . . . . . . . 19 ⊢ (1 · π) = (π · 1)
187	83, 186	eqtr3i 2765	. . . . . . . . . . . . . . . . . 18 ⊢ π = (π · 1)
188	187	oveq1i 7441	. . . . . . . . . . . . . . . . 17 ⊢ (π + (π · (2 · (⌊‘(𝑋 / 𝑇))))) = ((π · 1) + (π · (2 · (⌊‘(𝑋 / 𝑇)))))
189	169, 14	mulcomi 11267	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (2 · π) = (π · 2)
190	40, 189	eqtri 2763	. . . . . . . . . . . . . . . . . . . 20 ⊢ 𝑇 = (π · 2)
191	190	oveq1i 7441	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑇 · (⌊‘(𝑋 / 𝑇))) = ((π · 2) · (⌊‘(𝑋 / 𝑇)))
192	111, 62	gtneii 11371	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ 𝑇 ≠ 0
193	4, 59, 192	redivcli 12032	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑋 / 𝑇) ∈ ℝ
194		flcl 13832	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑋 / 𝑇) ∈ ℝ → (⌊‘(𝑋 / 𝑇)) ∈ ℤ)
195	193, 194	ax-mp 5	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (⌊‘(𝑋 / 𝑇)) ∈ ℤ
196		zcn 12616	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((⌊‘(𝑋 / 𝑇)) ∈ ℤ → (⌊‘(𝑋 / 𝑇)) ∈ ℂ)
197	195, 196	ax-mp 5	. . . . . . . . . . . . . . . . . . . 20 ⊢ (⌊‘(𝑋 / 𝑇)) ∈ ℂ
198	14, 169, 197	mulassi 11270	. . . . . . . . . . . . . . . . . . 19 ⊢ ((π · 2) · (⌊‘(𝑋 / 𝑇))) = (π · (2 · (⌊‘(𝑋 / 𝑇))))
199	191, 198	eqtri 2763	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑇 · (⌊‘(𝑋 / 𝑇))) = (π · (2 · (⌊‘(𝑋 / 𝑇))))
200	199	oveq2i 7442	. . . . . . . . . . . . . . . . 17 ⊢ (π + (𝑇 · (⌊‘(𝑋 / 𝑇)))) = (π + (π · (2 · (⌊‘(𝑋 / 𝑇)))))
201	169, 197	mulcli 11266	. . . . . . . . . . . . . . . . . 18 ⊢ (2 · (⌊‘(𝑋 / 𝑇))) ∈ ℂ
202	14, 185, 201	adddii 11271	. . . . . . . . . . . . . . . . 17 ⊢ (π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))) = ((π · 1) + (π · (2 · (⌊‘(𝑋 / 𝑇)))))
203	188, 200, 202	3eqtr4ri 2774	. . . . . . . . . . . . . . . 16 ⊢ (π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))) = (π + (𝑇 · (⌊‘(𝑋 / 𝑇))))
204	203	a1i 11	. . . . . . . . . . . . . . 15 ⊢ (π = (𝑋 mod 𝑇) → (π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))) = (π + (𝑇 · (⌊‘(𝑋 / 𝑇)))))
205		id 22	. . . . . . . . . . . . . . . . 17 ⊢ (π = (𝑋 mod 𝑇) → π = (𝑋 mod 𝑇))
206		modval 13908	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑋 ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) → (𝑋 mod 𝑇) = (𝑋 − (𝑇 · (⌊‘(𝑋 / 𝑇)))))
207	4, 63, 206	mp2an 692	. . . . . . . . . . . . . . . . 17 ⊢ (𝑋 mod 𝑇) = (𝑋 − (𝑇 · (⌊‘(𝑋 / 𝑇))))
208	205, 207	eqtrdi 2791	. . . . . . . . . . . . . . . 16 ⊢ (π = (𝑋 mod 𝑇) → π = (𝑋 − (𝑇 · (⌊‘(𝑋 / 𝑇)))))
209	208	oveq1d 7446	. . . . . . . . . . . . . . 15 ⊢ (π = (𝑋 mod 𝑇) → (π + (𝑇 · (⌊‘(𝑋 / 𝑇)))) = ((𝑋 − (𝑇 · (⌊‘(𝑋 / 𝑇)))) + (𝑇 · (⌊‘(𝑋 / 𝑇)))))
210	27	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (π = (𝑋 mod 𝑇) → 𝑋 ∈ ℂ)
211	59	recni 11273	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑇 ∈ ℂ
212	211, 197	mulcli 11266	. . . . . . . . . . . . . . . . 17 ⊢ (𝑇 · (⌊‘(𝑋 / 𝑇))) ∈ ℂ
213	212	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ (π = (𝑋 mod 𝑇) → (𝑇 · (⌊‘(𝑋 / 𝑇))) ∈ ℂ)
214	210, 213	npcand 11622	. . . . . . . . . . . . . . 15 ⊢ (π = (𝑋 mod 𝑇) → ((𝑋 − (𝑇 · (⌊‘(𝑋 / 𝑇)))) + (𝑇 · (⌊‘(𝑋 / 𝑇)))) = 𝑋)
215	204, 209, 214	3eqtrrd 2780	. . . . . . . . . . . . . 14 ⊢ (π = (𝑋 mod 𝑇) → 𝑋 = (π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))))
216	215	oveq1d 7446	. . . . . . . . . . . . 13 ⊢ (π = (𝑋 mod 𝑇) → (𝑋 / π) = ((π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))) / π))
217	185, 201	addcli 11265	. . . . . . . . . . . . . 14 ⊢ (1 + (2 · (⌊‘(𝑋 / 𝑇)))) ∈ ℂ
218	217, 14, 35	divcan3i 12011	. . . . . . . . . . . . 13 ⊢ ((π · (1 + (2 · (⌊‘(𝑋 / 𝑇))))) / π) = (1 + (2 · (⌊‘(𝑋 / 𝑇))))
219	216, 218	eqtrdi 2791	. . . . . . . . . . . 12 ⊢ (π = (𝑋 mod 𝑇) → (𝑋 / π) = (1 + (2 · (⌊‘(𝑋 / 𝑇)))))
220		1z 12645	. . . . . . . . . . . . . 14 ⊢ 1 ∈ ℤ
221		zmulcl 12664	. . . . . . . . . . . . . . 15 ⊢ ((2 ∈ ℤ ∧ (⌊‘(𝑋 / 𝑇)) ∈ ℤ) → (2 · (⌊‘(𝑋 / 𝑇))) ∈ ℤ)
222	2, 195, 221	mp2an 692	. . . . . . . . . . . . . 14 ⊢ (2 · (⌊‘(𝑋 / 𝑇))) ∈ ℤ
223		zaddcl 12655	. . . . . . . . . . . . . 14 ⊢ ((1 ∈ ℤ ∧ (2 · (⌊‘(𝑋 / 𝑇))) ∈ ℤ) → (1 + (2 · (⌊‘(𝑋 / 𝑇)))) ∈ ℤ)
224	220, 222, 223	mp2an 692	. . . . . . . . . . . . 13 ⊢ (1 + (2 · (⌊‘(𝑋 / 𝑇)))) ∈ ℤ
225	224	a1i 11	. . . . . . . . . . . 12 ⊢ (π = (𝑋 mod 𝑇) → (1 + (2 · (⌊‘(𝑋 / 𝑇)))) ∈ ℤ)
226	219, 225	eqeltrd 2839	. . . . . . . . . . 11 ⊢ (π = (𝑋 mod 𝑇) → (𝑋 / π) ∈ ℤ)
227	226, 7	sylibr 234	. . . . . . . . . 10 ⊢ (π = (𝑋 mod 𝑇) → (𝑋 mod π) = 0)
228	227	necon3bi 2965	. . . . . . . . 9 ⊢ (¬ (𝑋 mod π) = 0 → π ≠ (𝑋 mod 𝑇))
229	228	adantl 481	. . . . . . . 8 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → π ≠ (𝑋 mod 𝑇))
230	180, 181, 184, 229	leneltd 11413	. . . . . . 7 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → (𝑋 mod 𝑇) < π)
231		iftrue 4537	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) < π → if((𝑋 mod 𝑇) < π, 1, -1) = 1)
232	156, 231	eqtrid 2787	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) < π → (𝐹‘𝑋) = 1)
233	230, 232	syl 17	. . . . . 6 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → (𝐹‘𝑋) = 1)
234	179, 233	oveq12d 7449	. . . . 5 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → (if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) = (1 + 1))
235	234	oveq1d 7446	. . . 4 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2) = ((1 + 1) / 2))
236		1p1e2 12389	. . . . . . 7 ⊢ (1 + 1) = 2
237	236	oveq1i 7441	. . . . . 6 ⊢ ((1 + 1) / 2) = (2 / 2)
238		2div2e1 12405	. . . . . 6 ⊢ (2 / 2) = 1
239	237, 238	eqtr2i 2764	. . . . 5 ⊢ 1 = ((1 + 1) / 2)
240	233, 239	eqtr2di 2792	. . . 4 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → ((1 + 1) / 2) = (𝐹‘𝑋))
241		iffalse 4540	. . . . . 6 ⊢ (¬ (𝑋 mod π) = 0 → if((𝑋 mod π) = 0, 0, (𝐹‘𝑋)) = (𝐹‘𝑋))
242	172, 241	eqtr2id 2788	. . . . 5 ⊢ (¬ (𝑋 mod π) = 0 → (𝐹‘𝑋) = 𝑌)
243	242	adantl 481	. . . 4 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → (𝐹‘𝑋) = 𝑌)
244	235, 240, 243	3eqtrrd 2780	. . 3 ⊢ (((𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod π) = 0) → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
245	177, 244	pm2.61dan 813	. 2 ⊢ ((𝑋 mod 𝑇) ∈ (0(,]π) → 𝑌 = ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2))
246	131	necon2bi 2969	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) = 0 → ¬ (𝑋 mod 𝑇) ∈ (0(,]π))
247	246	iffalsed 4542	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) = 0 → if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) = -1)
248		id 22	. . . . . . . . . 10 ⊢ ((𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) = 0)
249	248, 34	eqbrtrdi 5187	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) < π)
250	249	iftrued 4539	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) = 0 → if((𝑋 mod 𝑇) < π, 1, -1) = 1)
251	156, 250	eqtrid 2787	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) = 0 → (𝐹‘𝑋) = 1)
252	247, 251	oveq12d 7449	. . . . . 6 ⊢ ((𝑋 mod 𝑇) = 0 → (if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) = (-1 + 1))
253	252	oveq1d 7446	. . . . 5 ⊢ ((𝑋 mod 𝑇) = 0 → ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2) = ((-1 + 1) / 2))
254		neg1cn 12378	. . . . . . . . 9 ⊢ -1 ∈ ℂ
255	185, 254, 165	addcomli 11451	. . . . . . . 8 ⊢ (-1 + 1) = 0
256	255	oveq1i 7441	. . . . . . 7 ⊢ ((-1 + 1) / 2) = (0 / 2)
257	256, 170	eqtri 2763	. . . . . 6 ⊢ ((-1 + 1) / 2) = 0
258	257	a1i 11	. . . . 5 ⊢ ((𝑋 mod 𝑇) = 0 → ((-1 + 1) / 2) = 0)
259	40	oveq2i 7442	. . . . . . . . . . . . 13 ⊢ (𝑋 / 𝑇) = (𝑋 / (2 · π))
260		2cnne0 12474	. . . . . . . . . . . . . 14 ⊢ (2 ∈ ℂ ∧ 2 ≠ 0)
261	14, 35	pm3.2i 470	. . . . . . . . . . . . . 14 ⊢ (π ∈ ℂ ∧ π ≠ 0)
262		divdiv1 11976	. . . . . . . . . . . . . 14 ⊢ ((𝑋 ∈ ℂ ∧ (2 ∈ ℂ ∧ 2 ≠ 0) ∧ (π ∈ ℂ ∧ π ≠ 0)) → ((𝑋 / 2) / π) = (𝑋 / (2 · π)))
263	27, 260, 261, 262	mp3an 1460	. . . . . . . . . . . . 13 ⊢ ((𝑋 / 2) / π) = (𝑋 / (2 · π))
264	27, 169, 14, 44, 35	divdiv32i 12020	. . . . . . . . . . . . 13 ⊢ ((𝑋 / 2) / π) = ((𝑋 / π) / 2)
265	259, 263, 264	3eqtr2i 2769	. . . . . . . . . . . 12 ⊢ (𝑋 / 𝑇) = ((𝑋 / π) / 2)
266	265	oveq2i 7442	. . . . . . . . . . 11 ⊢ (2 · (𝑋 / 𝑇)) = (2 · ((𝑋 / π) / 2))
267	27, 14, 35	divcli 12007	. . . . . . . . . . . 12 ⊢ (𝑋 / π) ∈ ℂ
268	267, 169, 44	divcan2i 12008	. . . . . . . . . . 11 ⊢ (2 · ((𝑋 / π) / 2)) = (𝑋 / π)
269	266, 268	eqtr2i 2764	. . . . . . . . . 10 ⊢ (𝑋 / π) = (2 · (𝑋 / 𝑇))
270	2	a1i 11	. . . . . . . . . . 11 ⊢ ((𝑋 / 𝑇) ∈ ℤ → 2 ∈ ℤ)
271		id 22	. . . . . . . . . . 11 ⊢ ((𝑋 / 𝑇) ∈ ℤ → (𝑋 / 𝑇) ∈ ℤ)
272	270, 271	zmulcld 12726	. . . . . . . . . 10 ⊢ ((𝑋 / 𝑇) ∈ ℤ → (2 · (𝑋 / 𝑇)) ∈ ℤ)
273	269, 272	eqeltrid 2843	. . . . . . . . 9 ⊢ ((𝑋 / 𝑇) ∈ ℤ → (𝑋 / π) ∈ ℤ)
274	65, 273	sylbi 217	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) = 0 → (𝑋 / π) ∈ ℤ)
275	274, 7	sylibr 234	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) = 0 → (𝑋 mod π) = 0)
276	275	iftrued 4539	. . . . . 6 ⊢ ((𝑋 mod 𝑇) = 0 → if((𝑋 mod π) = 0, 0, (𝐹‘𝑋)) = 0)
277	172, 276	eqtr2id 2788	. . . . 5 ⊢ ((𝑋 mod 𝑇) = 0 → 0 = 𝑌)
278	253, 258, 277	3eqtrrd 2780	. . . 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 11317	. . . . . 6 ⊢ 𝑇 ∈ ℝ^*
282	281	a1i 11	. . . . 5 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → 𝑇 ∈ ℝ^*)
283	139	a1i 11	. . . . 5 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) ∈ ℝ)
284		pm4.56 990	. . . . . . . 8 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) ↔ ¬ ((𝑋 mod 𝑇) ∈ (0(,]π) ∨ (𝑋 mod 𝑇) = 0))
285	284	biimpi 216	. . . . . . 7 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → ¬ ((𝑋 mod 𝑇) ∈ (0(,]π) ∨ (𝑋 mod 𝑇) = 0))
286		olc 868	. . . . . . . . 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 11262	. . . . . . . . . . . 12 ⊢ (¬ (𝑋 mod 𝑇) = 0 → 0 ∈ ℝ)
292	139	a1i 11	. . . . . . . . . . . 12 ⊢ (¬ (𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) ∈ ℝ)
293		modge0 13916	. . . . . . . . . . . . . 14 ⊢ ((𝑋 ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) → 0 ≤ (𝑋 mod 𝑇))
294	4, 63, 293	mp2an 692	. . . . . . . . . . . . 13 ⊢ 0 ≤ (𝑋 mod 𝑇)
295	294	a1i 11	. . . . . . . . . . . 12 ⊢ (¬ (𝑋 mod 𝑇) = 0 → 0 ≤ (𝑋 mod 𝑇))
296		neqne 2946	. . . . . . . . . . . 12 ⊢ (¬ (𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) ≠ 0)
297	291, 292, 295, 296	leneltd 11413	. . . . . . . . . . 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 45460	. . . . . . . . 9 ⊢ (((𝑋 mod 𝑇) ≤ π ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) ∈ (0(,]π))
301	300	orcd 873	. . . . . . . 8 ⊢ (((𝑋 mod 𝑇) ≤ π ∧ ¬ (𝑋 mod 𝑇) = 0) → ((𝑋 mod 𝑇) ∈ (0(,]π) ∨ (𝑋 mod 𝑇) = 0))
302	287, 301	pm2.61dan 813	. . . . . . 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 11406	. . . . . 6 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → (π < (𝑋 mod 𝑇) ↔ ¬ (𝑋 mod 𝑇) ≤ π))
306	303, 305	mpbird 257	. . . . 5 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → π < (𝑋 mod 𝑇))
307		modlt 13917	. . . . . . 7 ⊢ ((𝑋 ∈ ℝ ∧ 𝑇 ∈ ℝ⁺) → (𝑋 mod 𝑇) < 𝑇)
308	4, 63, 307	mp2an 692	. . . . . 6 ⊢ (𝑋 mod 𝑇) < 𝑇
309	308	a1i 11	. . . . 5 ⊢ ((¬ (𝑋 mod 𝑇) ∈ (0(,]π) ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) < 𝑇)
310	280, 282, 283, 306, 309	eliood 45451	. . . 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 45448	. . . . . . . . . 10 ⊢ ((π ∈ ℝ^* ∧ 𝑇 ∈ ℝ^* ∧ (𝑋 mod 𝑇) ∈ (π(,)𝑇)) → π < (𝑋 mod 𝑇))
315	128, 281, 314	mp3an12 1450	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → π < (𝑋 mod 𝑇))
316	311, 312, 313, 315	gtnelioc 45444	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → ¬ (𝑋 mod 𝑇) ∈ (0(,]π))
317	316	iffalsed 4542	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) = -1)
318	139	a1i 11	. . . . . . . . . 10 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → (𝑋 mod 𝑇) ∈ ℝ)
319	312, 318, 315	ltnsymd 11408	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → ¬ (𝑋 mod 𝑇) < π)
320	319	iffalsed 4542	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → if((𝑋 mod 𝑇) < π, 1, -1) = -1)
321	156, 320	eqtrid 2787	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → (𝐹‘𝑋) = -1)
322	317, 321	oveq12d 7449	. . . . . 6 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → (if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) = (-1 + -1))
323	322	oveq1d 7446	. . . . 5 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → ((if((𝑋 mod 𝑇) ∈ (0(,]π), 1, -1) + (𝐹‘𝑋)) / 2) = ((-1 + -1) / 2))
324		df-2 12327	. . . . . . . . . 10 ⊢ 2 = (1 + 1)
325	324	negeqi 11499	. . . . . . . . 9 ⊢ -2 = -(1 + 1)
326	185, 185	negdii 11591	. . . . . . . . 9 ⊢ -(1 + 1) = (-1 + -1)
327	325, 326	eqtr2i 2764	. . . . . . . 8 ⊢ (-1 + -1) = -2
328	327	oveq1i 7441	. . . . . . 7 ⊢ ((-1 + -1) / 2) = (-2 / 2)
329		divneg 11957	. . . . . . . 8 ⊢ ((2 ∈ ℂ ∧ 2 ∈ ℂ ∧ 2 ≠ 0) → -(2 / 2) = (-2 / 2))
330	169, 169, 44, 329	mp3an 1460	. . . . . . 7 ⊢ -(2 / 2) = (-2 / 2)
331	238	negeqi 11499	. . . . . . 7 ⊢ -(2 / 2) = -1
332	328, 330, 331	3eqtr2i 2769	. . . . . 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 11406	. . . . . . . . 9 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → (π < (𝑋 mod 𝑇) ↔ ¬ (𝑋 mod 𝑇) ≤ π))
336	315, 335	mpbid 232	. . . . . . . 8 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → ¬ (𝑋 mod 𝑇) ≤ π)
337	248, 112	eqbrtrdi 5187	. . . . . . . . . 10 ⊢ ((𝑋 mod 𝑇) = 0 → (𝑋 mod 𝑇) ≤ π)
338	337	adantl 481	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) ≤ π)
339	126	orcanai 1004	. . . . . . . . . 10 ⊢ (((𝑋 mod π) = 0 ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) = π)
340	339, 144	syl 17	. . . . . . . . 9 ⊢ (((𝑋 mod π) = 0 ∧ ¬ (𝑋 mod 𝑇) = 0) → (𝑋 mod 𝑇) ≤ π)
341	338, 340	pm2.61dan 813	. . . . . . . 8 ⊢ ((𝑋 mod π) = 0 → (𝑋 mod 𝑇) ≤ π)
342	336, 341	nsyl 140	. . . . . . 7 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → ¬ (𝑋 mod π) = 0)
343	342	iffalsed 4542	. . . . . 6 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → if((𝑋 mod π) = 0, 0, (𝐹‘𝑋)) = (𝐹‘𝑋))
344	334, 343, 321	3eqtrrd 2780	. . . . 5 ⊢ ((𝑋 mod 𝑇) ∈ (π(,)𝑇) → -1 = 𝑌)
345	323, 333, 344	3eqtrrd 2780	. . . 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 813	. 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 206 ∧ wa 395 ∨ wo 847 = wceq 1537 ∈ wcel 2106 ≠ wne 2938 ∃wrex 3068 ifcif 4531 class class class wbr 5148 ↦ cmpt 5231 ‘cfv 6563 (class class class)co 7431 ℂcc 11151 ℝcr 11152 0cc0 11153 1c1 11154 + caddc 11156 · cmul 11158 ℝ^*cxr 11292 < clt 11293 ≤ cle 11294 − cmin 11490 -cneg 11491 / cdiv 11918 2c2 12319 ℤcz 12611 ℝ⁺crp 13032 (,)cioo 13384 (,]cioc 13385 ⌊cfl 13827 mod cmo 13906 πcpi 16099 ∥ cdvds 16287

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1792 ax-4 1806 ax-5 1908 ax-6 1965 ax-7 2005 ax-8 2108 ax-9 2116 ax-10 2139 ax-11 2155 ax-12 2175 ax-ext 2706 ax-rep 5285 ax-sep 5302 ax-nul 5312 ax-pow 5371 ax-pr 5438 ax-un 7754 ax-inf2 9679 ax-cnex 11209 ax-resscn 11210 ax-1cn 11211 ax-icn 11212 ax-addcl 11213 ax-addrcl 11214 ax-mulcl 11215 ax-mulrcl 11216 ax-mulcom 11217 ax-addass 11218 ax-mulass 11219 ax-distr 11220 ax-i2m1 11221 ax-1ne0 11222 ax-1rid 11223 ax-rnegex 11224 ax-rrecex 11225 ax-cnre 11226 ax-pre-lttri 11227 ax-pre-lttrn 11228 ax-pre-ltadd 11229 ax-pre-mulgt0 11230 ax-pre-sup 11231 ax-addf 11232

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1540 df-fal 1550 df-ex 1777 df-nf 1781 df-sb 2063 df-mo 2538 df-eu 2567 df-clab 2713 df-cleq 2727 df-clel 2814 df-nfc 2890 df-ne 2939 df-nel 3045 df-ral 3060 df-rex 3069 df-rmo 3378 df-reu 3379 df-rab 3434 df-v 3480 df-sbc 3792 df-csb 3909 df-dif 3966 df-un 3968 df-in 3970 df-ss 3980 df-pss 3983 df-nul 4340 df-if 4532 df-pw 4607 df-sn 4632 df-pr 4634 df-tp 4636 df-op 4638 df-uni 4913 df-int 4952 df-iun 4998 df-iin 4999 df-br 5149 df-opab 5211 df-mpt 5232 df-tr 5266 df-id 5583 df-eprel 5589 df-po 5597 df-so 5598 df-fr 5641 df-se 5642 df-we 5643 df-xp 5695 df-rel 5696 df-cnv 5697 df-co 5698 df-dm 5699 df-rn 5700 df-res 5701 df-ima 5702 df-pred 6323 df-ord 6389 df-on 6390 df-lim 6391 df-suc 6392 df-iota 6516 df-fun 6565 df-fn 6566 df-f 6567 df-f1 6568 df-fo 6569 df-f1o 6570 df-fv 6571 df-isom 6572 df-riota 7388 df-ov 7434 df-oprab 7435 df-mpo 7436 df-of 7697 df-om 7888 df-1st 8013 df-2nd 8014 df-supp 8185 df-frecs 8305 df-wrecs 8336 df-recs 8410 df-rdg 8449 df-1o 8505 df-2o 8506 df-er 8744 df-map 8867 df-pm 8868 df-ixp 8937 df-en 8985 df-dom 8986 df-sdom 8987 df-fin 8988 df-fsupp 9400 df-fi 9449 df-sup 9480 df-inf 9481 df-oi 9548 df-card 9977 df-pnf 11295 df-mnf 11296 df-xr 11297 df-ltxr 11298 df-le 11299 df-sub 11492 df-neg 11493 df-div 11919 df-nn 12265 df-2 12327 df-3 12328 df-4 12329 df-5 12330 df-6 12331 df-7 12332 df-8 12333 df-9 12334 df-n0 12525 df-z 12612 df-dec 12732 df-uz 12877 df-q 12989 df-rp 13033 df-xneg 13152 df-xadd 13153 df-xmul 13154 df-ioo 13388 df-ioc 13389 df-ico 13390 df-icc 13391 df-fz 13545 df-fzo 13692 df-fl 13829 df-mod 13907 df-seq 14040 df-exp 14100 df-fac 14310 df-bc 14339 df-hash 14367 df-shft 15103 df-cj 15135 df-re 15136 df-im 15137 df-sqrt 15271 df-abs 15272 df-limsup 15504 df-clim 15521 df-rlim 15522 df-sum 15720 df-ef 16100 df-sin 16102 df-cos 16103 df-pi 16105 df-dvds 16288 df-struct 17181 df-sets 17198 df-slot 17216 df-ndx 17228 df-base 17246 df-ress 17275 df-plusg 17311 df-mulr 17312 df-starv 17313 df-sca 17314 df-vsca 17315 df-ip 17316 df-tset 17317 df-ple 17318 df-ds 17320 df-unif 17321 df-hom 17322 df-cco 17323 df-rest 17469 df-topn 17470 df-0g 17488 df-gsum 17489 df-topgen 17490 df-pt 17491 df-prds 17494 df-xrs 17549 df-qtop 17554 df-imas 17555 df-xps 17557 df-mre 17631 df-mrc 17632 df-acs 17634 df-mgm 18666 df-sgrp 18745 df-mnd 18761 df-submnd 18810 df-mulg 19099 df-cntz 19348 df-cmn 19815 df-psmet 21374 df-xmet 21375 df-met 21376 df-bl 21377 df-mopn 21378 df-fbas 21379 df-fg 21380 df-cnfld 21383 df-top 22916 df-topon 22933 df-topsp 22955 df-bases 22969 df-cld 23043 df-ntr 23044 df-cls 23045 df-nei 23122 df-lp 23160 df-perf 23161 df-cn 23251 df-cnp 23252 df-haus 23339 df-tx 23586 df-hmeo 23779 df-fil 23870 df-fm 23962 df-flim 23963 df-flf 23964 df-xms 24346 df-ms 24347 df-tms 24348 df-cncf 24918 df-limc 25916 df-dv 25917

This theorem is referenced by: fouriersw 46187

W3C validator