Metamath Proof Explorer


Theorem fourierdlem71

Description: A periodic piecewise continuous function, possibly undefined on a finite set in each periodic interval, is bounded. (Contributed by Glauco Siliprandi, 11-Dec-2019)

Ref Expression
Hypotheses fourierdlem71.dmf ⊢ φ → dom ⁡ F ⊆ ℝ
fourierdlem71.f ⊢ φ → F : dom ⁡ F ⟶ ℝ
fourierdlem71.a ⊢ φ → A ∈ ℝ
fourierdlem71.b ⊢ φ → B ∈ ℝ
fourierdlem71.altb ⊢ φ → A < B
fourierdlem71.t ⊢ T = B − A
fourierdlem71.7 ⊢ φ → M ∈ ℕ
fourierdlem71.q ⊢ φ → Q : 0 … M ⟶ ℝ
fourierdlem71.q0 ⊢ φ → Q ⁡ 0 = A
fourierdlem71.10 ⊢ φ → Q ⁡ M = B
fourierdlem71.fcn ⊢ φ ∧ i ∈ 0 ..^ M → F ↾ Q ⁡ i Q ⁡ i + 1 : Q ⁡ i Q ⁡ i + 1 ⟶cn ℂ
fourierdlem71.r ⊢ φ ∧ i ∈ 0 ..^ M → R ∈ F ↾ Q ⁡ i Q ⁡ i + 1 lim ℂ Q ⁡ i
fourierdlem71.l ⊢ φ ∧ i ∈ 0 ..^ M → L ∈ F ↾ Q ⁡ i Q ⁡ i + 1 lim ℂ Q ⁡ i + 1
fourierdlem71.xpt ⊢ φ ∧ x ∈ dom ⁡ F ∧ k ∈ ℤ → x + k ⁢ T ∈ dom ⁡ F
fourierdlem71.fxpt ⊢ φ ∧ x ∈ dom ⁡ F ∧ k ∈ ℤ → F ⁡ x + k ⁢ T = F ⁡ x
fourierdlem71.i ⊢ I = i ∈ 0 ..^ M ⟼ Q ⁡ i Q ⁡ i + 1
fourierdlem71.e ⊢ E = x ∈ ℝ ⟼ x + B − x T ⁢ T
Assertion fourierdlem71 ⊢ φ → ∃ y ∈ ℝ ∀ x ∈ dom ⁡ F F ⁡ x ≤ y

Proof

Step Hyp Ref Expression
1 fourierdlem71.dmf ⊢ φ → dom ⁡ F ⊆ ℝ
2 fourierdlem71.f ⊢ φ → F : dom ⁡ F ⟶ ℝ
3 fourierdlem71.a ⊢ φ → A ∈ ℝ
4 fourierdlem71.b ⊢ φ → B ∈ ℝ
5 fourierdlem71.altb ⊢ φ → A < B
6 fourierdlem71.t ⊢ T = B − A
7 fourierdlem71.7 ⊢ φ → M ∈ ℕ
8 fourierdlem71.q ⊢ φ → Q : 0 … M ⟶ ℝ
9 fourierdlem71.q0 ⊢ φ → Q ⁡ 0 = A
10 fourierdlem71.10 ⊢ φ → Q ⁡ M = B
11 fourierdlem71.fcn ⊢ φ ∧ i ∈ 0 ..^ M → F ↾ Q ⁡ i Q ⁡ i + 1 : Q ⁡ i Q ⁡ i + 1 ⟶cn ℂ
12 fourierdlem71.r ⊢ φ ∧ i ∈ 0 ..^ M → R ∈ F ↾ Q ⁡ i Q ⁡ i + 1 lim ℂ Q ⁡ i
13 fourierdlem71.l ⊢ φ ∧ i ∈ 0 ..^ M → L ∈ F ↾ Q ⁡ i Q ⁡ i + 1 lim ℂ Q ⁡ i + 1
14 fourierdlem71.xpt ⊢ φ ∧ x ∈ dom ⁡ F ∧ k ∈ ℤ → x + k ⁢ T ∈ dom ⁡ F
15 fourierdlem71.fxpt ⊢ φ ∧ x ∈ dom ⁡ F ∧ k ∈ ℤ → F ⁡ x + k ⁢ T = F ⁡ x
16 fourierdlem71.i ⊢ I = i ∈ 0 ..^ M ⟼ Q ⁡ i Q ⁡ i + 1
17 fourierdlem71.e ⊢ E = x ∈ ℝ ⟼ x + B − x T ⁢ T
18 prfi ⊢ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I ∈ Fin
19 18 a1i ⊢ φ → ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I ∈ Fin
20 2 adantr ⊢ φ ∧ x ∈ ⋃ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I → F : dom ⁡ F ⟶ ℝ
21 simpl ⊢ φ ∧ x ∈ ⋃ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I → φ
22 simpr ⊢ φ ∧ x ∈ ⋃ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I → x ∈ ⋃ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I
23 ovex ⊢ 0 … M ∈ V
24 23 a1i ⊢ φ → 0 … M ∈ V
25 8 24 fexd ⊢ φ → Q ∈ V
26 rnexg ⊢ Q ∈ V → ran ⁡ Q ∈ V
27 inex1g ⊢ ran ⁡ Q ∈ V → ran ⁡ Q ∩ dom ⁡ F ∈ V
28 25 26 27 3syl ⊢ φ → ran ⁡ Q ∩ dom ⁡ F ∈ V
29 28 adantr ⊢ φ ∧ x ∈ ⋃ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I → ran ⁡ Q ∩ dom ⁡ F ∈ V
30 ovex ⊢ 0 ..^ M ∈ V
31 30 mptex ⊢ i ∈ 0 ..^ M ⟼ Q ⁡ i Q ⁡ i + 1 ∈ V
32 16 31 eqeltri ⊢ I ∈ V
33 32 rnex ⊢ ran ⁡ I ∈ V
34 33 a1i ⊢ φ → ran ⁡ I ∈ V
35 34 uniexd ⊢ φ → ⋃ ran ⁡ I ∈ V
36 35 adantr ⊢ φ ∧ x ∈ ⋃ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I → ⋃ ran ⁡ I ∈ V
37 uniprg ⊢ ran ⁡ Q ∩ dom ⁡ F ∈ V ∧ ⋃ ran ⁡ I ∈ V → ⋃ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I = ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I
38 29 36 37 syl2anc ⊢ φ ∧ x ∈ ⋃ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I → ⋃ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I = ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I
39 22 38 eleqtrd ⊢ φ ∧ x ∈ ⋃ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I → x ∈ ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I
40 elinel2 ⊢ x ∈ ran ⁡ Q ∩ dom ⁡ F → x ∈ dom ⁡ F
41 40 adantl ⊢ φ ∧ x ∈ ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I ∧ x ∈ ran ⁡ Q ∩ dom ⁡ F → x ∈ dom ⁡ F
42 simpll ⊢ φ ∧ x ∈ ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I ∧ ¬ x ∈ ran ⁡ Q ∩ dom ⁡ F → φ
43 elunnel1 ⊢ x ∈ ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I ∧ ¬ x ∈ ran ⁡ Q ∩ dom ⁡ F → x ∈ ⋃ ran ⁡ I
44 43 adantll ⊢ φ ∧ x ∈ ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I ∧ ¬ x ∈ ran ⁡ Q ∩ dom ⁡ F → x ∈ ⋃ ran ⁡ I
45 16 funmpt2 ⊢ Fun ⁡ I
46 elunirn ⊢ Fun ⁡ I → x ∈ ⋃ ran ⁡ I ↔ ∃ i ∈ dom ⁡ I x ∈ I ⁡ i
47 45 46 ax-mp ⊢ x ∈ ⋃ ran ⁡ I ↔ ∃ i ∈ dom ⁡ I x ∈ I ⁡ i
48 47 bilani ⊢ φ ∧ x ∈ ⋃ ran ⁡ I → ∃ i ∈ dom ⁡ I x ∈ I ⁡ i
49 id ⊢ i ∈ dom ⁡ I → i ∈ dom ⁡ I
50 ovex ⊢ Q ⁡ i Q ⁡ i + 1 ∈ V
51 50 16 dmmpti ⊢ dom ⁡ I = 0 ..^ M
52 49 51 eleqtrdi ⊢ i ∈ dom ⁡ I → i ∈ 0 ..^ M
53 52 adantl ⊢ φ ∧ i ∈ dom ⁡ I → i ∈ 0 ..^ M
54 50 a1i ⊢ φ ∧ i ∈ dom ⁡ I → Q ⁡ i Q ⁡ i + 1 ∈ V
55 16 fvmpt2 ⊢ i ∈ 0 ..^ M ∧ Q ⁡ i Q ⁡ i + 1 ∈ V → I ⁡ i = Q ⁡ i Q ⁡ i + 1
56 53 54 55 syl2anc ⊢ φ ∧ i ∈ dom ⁡ I → I ⁡ i = Q ⁡ i Q ⁡ i + 1
57 cncff ⊢ F ↾ Q ⁡ i Q ⁡ i + 1 : Q ⁡ i Q ⁡ i + 1 ⟶cn ℂ → F ↾ Q ⁡ i Q ⁡ i + 1 : Q ⁡ i Q ⁡ i + 1 ⟶ ℂ
58 fdm ⊢ F ↾ Q ⁡ i Q ⁡ i + 1 : Q ⁡ i Q ⁡ i + 1 ⟶ ℂ → dom ⁡ F ↾ Q ⁡ i Q ⁡ i + 1 = Q ⁡ i Q ⁡ i + 1
59 11 57 58 3syl ⊢ φ ∧ i ∈ 0 ..^ M → dom ⁡ F ↾ Q ⁡ i Q ⁡ i + 1 = Q ⁡ i Q ⁡ i + 1
60 52 59 sylan2 ⊢ φ ∧ i ∈ dom ⁡ I → dom ⁡ F ↾ Q ⁡ i Q ⁡ i + 1 = Q ⁡ i Q ⁡ i + 1
61 ssdmres ⊢ Q ⁡ i Q ⁡ i + 1 ⊆ dom ⁡ F ↔ dom ⁡ F ↾ Q ⁡ i Q ⁡ i + 1 = Q ⁡ i Q ⁡ i + 1
62 60 61 sylibr ⊢ φ ∧ i ∈ dom ⁡ I → Q ⁡ i Q ⁡ i + 1 ⊆ dom ⁡ F
63 56 62 eqsstrd ⊢ φ ∧ i ∈ dom ⁡ I → I ⁡ i ⊆ dom ⁡ F
64 63 3adant3 ⊢ φ ∧ i ∈ dom ⁡ I ∧ x ∈ I ⁡ i → I ⁡ i ⊆ dom ⁡ F
65 simp3 ⊢ φ ∧ i ∈ dom ⁡ I ∧ x ∈ I ⁡ i → x ∈ I ⁡ i
66 64 65 sseldd ⊢ φ ∧ i ∈ dom ⁡ I ∧ x ∈ I ⁡ i → x ∈ dom ⁡ F
67 66 3exp ⊢ φ → i ∈ dom ⁡ I → x ∈ I ⁡ i → x ∈ dom ⁡ F
68 67 adantr ⊢ φ ∧ x ∈ ⋃ ran ⁡ I → i ∈ dom ⁡ I → x ∈ I ⁡ i → x ∈ dom ⁡ F
69 68 rexlimdv ⊢ φ ∧ x ∈ ⋃ ran ⁡ I → ∃ i ∈ dom ⁡ I x ∈ I ⁡ i → x ∈ dom ⁡ F
70 48 69 mpd ⊢ φ ∧ x ∈ ⋃ ran ⁡ I → x ∈ dom ⁡ F
71 42 44 70 syl2anc ⊢ φ ∧ x ∈ ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I ∧ ¬ x ∈ ran ⁡ Q ∩ dom ⁡ F → x ∈ dom ⁡ F
72 41 71 pm2.61dan ⊢ φ ∧ x ∈ ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I → x ∈ dom ⁡ F
73 21 39 72 syl2anc ⊢ φ ∧ x ∈ ⋃ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I → x ∈ dom ⁡ F
74 20 73 ffvelcdmd ⊢ φ ∧ x ∈ ⋃ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I → F ⁡ x ∈ ℝ
75 74 recnd ⊢ φ ∧ x ∈ ⋃ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I → F ⁡ x ∈ ℂ
76 75 abscld ⊢ φ ∧ x ∈ ⋃ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I → F ⁡ x ∈ ℝ
77 simpr ⊢ φ ∧ w = ran ⁡ Q ∩ dom ⁡ F → w = ran ⁡ Q ∩ dom ⁡ F
78 fzfid ⊢ φ → 0 … M ∈ Fin
79 rnffi ⊢ Q : 0 … M ⟶ ℝ ∧ 0 … M ∈ Fin → ran ⁡ Q ∈ Fin
80 8 78 79 syl2anc ⊢ φ → ran ⁡ Q ∈ Fin
81 infi ⊢ ran ⁡ Q ∈ Fin → ran ⁡ Q ∩ dom ⁡ F ∈ Fin
82 80 81 syl ⊢ φ → ran ⁡ Q ∩ dom ⁡ F ∈ Fin
83 82 adantr ⊢ φ ∧ w = ran ⁡ Q ∩ dom ⁡ F → ran ⁡ Q ∩ dom ⁡ F ∈ Fin
84 77 83 eqeltrd ⊢ φ ∧ w = ran ⁡ Q ∩ dom ⁡ F → w ∈ Fin
85 simpll ⊢ φ ∧ w = ran ⁡ Q ∩ dom ⁡ F ∧ x ∈ w → φ
86 simpr ⊢ w = ran ⁡ Q ∩ dom ⁡ F ∧ x ∈ w → x ∈ w
87 simpl ⊢ w = ran ⁡ Q ∩ dom ⁡ F ∧ x ∈ w → w = ran ⁡ Q ∩ dom ⁡ F
88 86 87 eleqtrd ⊢ w = ran ⁡ Q ∩ dom ⁡ F ∧ x ∈ w → x ∈ ran ⁡ Q ∩ dom ⁡ F
89 88 adantll ⊢ φ ∧ w = ran ⁡ Q ∩ dom ⁡ F ∧ x ∈ w → x ∈ ran ⁡ Q ∩ dom ⁡ F
90 2 adantr ⊢ φ ∧ x ∈ ran ⁡ Q ∩ dom ⁡ F → F : dom ⁡ F ⟶ ℝ
91 40 adantl ⊢ φ ∧ x ∈ ran ⁡ Q ∩ dom ⁡ F → x ∈ dom ⁡ F
92 90 91 ffvelcdmd ⊢ φ ∧ x ∈ ran ⁡ Q ∩ dom ⁡ F → F ⁡ x ∈ ℝ
93 92 recnd ⊢ φ ∧ x ∈ ran ⁡ Q ∩ dom ⁡ F → F ⁡ x ∈ ℂ
94 93 abscld ⊢ φ ∧ x ∈ ran ⁡ Q ∩ dom ⁡ F → F ⁡ x ∈ ℝ
95 85 89 94 syl2anc ⊢ φ ∧ w = ran ⁡ Q ∩ dom ⁡ F ∧ x ∈ w → F ⁡ x ∈ ℝ
96 95 ralrimiva ⊢ φ ∧ w = ran ⁡ Q ∩ dom ⁡ F → ∀ x ∈ w F ⁡ x ∈ ℝ
97 fimaxre3 ⊢ w ∈ Fin ∧ ∀ x ∈ w F ⁡ x ∈ ℝ → ∃ y ∈ ℝ ∀ x ∈ w F ⁡ x ≤ y
98 84 96 97 syl2anc ⊢ φ ∧ w = ran ⁡ Q ∩ dom ⁡ F → ∃ y ∈ ℝ ∀ x ∈ w F ⁡ x ≤ y
99 98 adantlr ⊢ φ ∧ w ∈ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I ∧ w = ran ⁡ Q ∩ dom ⁡ F → ∃ y ∈ ℝ ∀ x ∈ w F ⁡ x ≤ y
100 simpll ⊢ φ ∧ w ∈ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I ∧ ¬ w = ran ⁡ Q ∩ dom ⁡ F → φ
101 neqne ⊢ ¬ w = ran ⁡ Q ∩ dom ⁡ F → w ≠ ran ⁡ Q ∩ dom ⁡ F
102 elprn1 ⊢ w ∈ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I ∧ w ≠ ran ⁡ Q ∩ dom ⁡ F → w = ⋃ ran ⁡ I
103 101 102 sylan2 ⊢ w ∈ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I ∧ ¬ w = ran ⁡ Q ∩ dom ⁡ F → w = ⋃ ran ⁡ I
104 103 adantll ⊢ φ ∧ w ∈ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I ∧ ¬ w = ran ⁡ Q ∩ dom ⁡ F → w = ⋃ ran ⁡ I
105 fzofi ⊢ 0 ..^ M ∈ Fin
106 16 rnmptfi ⊢ 0 ..^ M ∈ Fin → ran ⁡ I ∈ Fin
107 105 106 ax-mp ⊢ ran ⁡ I ∈ Fin
108 107 a1i ⊢ φ ∧ w = ⋃ ran ⁡ I → ran ⁡ I ∈ Fin
109 2 adantr ⊢ φ ∧ x ∈ ⋃ ran ⁡ I → F : dom ⁡ F ⟶ ℝ
110 109 70 ffvelcdmd ⊢ φ ∧ x ∈ ⋃ ran ⁡ I → F ⁡ x ∈ ℝ
111 110 recnd ⊢ φ ∧ x ∈ ⋃ ran ⁡ I → F ⁡ x ∈ ℂ
112 111 adantlr ⊢ φ ∧ w = ⋃ ran ⁡ I ∧ x ∈ ⋃ ran ⁡ I → F ⁡ x ∈ ℂ
113 112 abscld ⊢ φ ∧ w = ⋃ ran ⁡ I ∧ x ∈ ⋃ ran ⁡ I → F ⁡ x ∈ ℝ
114 50 16 fnmpti ⊢ I Fn 0 ..^ M
115 fvelrnb ⊢ I Fn 0 ..^ M → t ∈ ran ⁡ I ↔ ∃ i ∈ 0 ..^ M I ⁡ i = t
116 114 115 ax-mp ⊢ t ∈ ran ⁡ I ↔ ∃ i ∈ 0 ..^ M I ⁡ i = t
117 116 bilani ⊢ φ ∧ t ∈ ran ⁡ I → ∃ i ∈ 0 ..^ M I ⁡ i = t
118 8 adantr ⊢ φ ∧ i ∈ 0 ..^ M → Q : 0 … M ⟶ ℝ
119 elfzofz ⊢ i ∈ 0 ..^ M → i ∈ 0 … M
120 119 adantl ⊢ φ ∧ i ∈ 0 ..^ M → i ∈ 0 … M
121 118 120 ffvelcdmd ⊢ φ ∧ i ∈ 0 ..^ M → Q ⁡ i ∈ ℝ
122 fzofzp1 ⊢ i ∈ 0 ..^ M → i + 1 ∈ 0 … M
123 122 adantl ⊢ φ ∧ i ∈ 0 ..^ M → i + 1 ∈ 0 … M
124 118 123 ffvelcdmd ⊢ φ ∧ i ∈ 0 ..^ M → Q ⁡ i + 1 ∈ ℝ
125 121 124 11 13 12 cncfioobd ⊢ φ ∧ i ∈ 0 ..^ M → ∃ b ∈ ℝ ∀ x ∈ Q ⁡ i Q ⁡ i + 1 F ↾ Q ⁡ i Q ⁡ i + 1 ⁡ x ≤ b
126 125 3adant3 ⊢ φ ∧ i ∈ 0 ..^ M ∧ I ⁡ i = t → ∃ b ∈ ℝ ∀ x ∈ Q ⁡ i Q ⁡ i + 1 F ↾ Q ⁡ i Q ⁡ i + 1 ⁡ x ≤ b
127 fvres ⊢ x ∈ Q ⁡ i Q ⁡ i + 1 → F ↾ Q ⁡ i Q ⁡ i + 1 ⁡ x = F ⁡ x
128 127 fveq2d ⊢ x ∈ Q ⁡ i Q ⁡ i + 1 → F ↾ Q ⁡ i Q ⁡ i + 1 ⁡ x = F ⁡ x
129 128 breq1d ⊢ x ∈ Q ⁡ i Q ⁡ i + 1 → F ↾ Q ⁡ i Q ⁡ i + 1 ⁡ x ≤ b ↔ F ⁡ x ≤ b
130 129 adantl ⊢ φ ∧ i ∈ 0 ..^ M ∧ x ∈ Q ⁡ i Q ⁡ i + 1 → F ↾ Q ⁡ i Q ⁡ i + 1 ⁡ x ≤ b ↔ F ⁡ x ≤ b
131 130 ralbidva ⊢ φ ∧ i ∈ 0 ..^ M → ∀ x ∈ Q ⁡ i Q ⁡ i + 1 F ↾ Q ⁡ i Q ⁡ i + 1 ⁡ x ≤ b ↔ ∀ x ∈ Q ⁡ i Q ⁡ i + 1 F ⁡ x ≤ b
132 131 rexbidv ⊢ φ ∧ i ∈ 0 ..^ M → ∃ b ∈ ℝ ∀ x ∈ Q ⁡ i Q ⁡ i + 1 F ↾ Q ⁡ i Q ⁡ i + 1 ⁡ x ≤ b ↔ ∃ b ∈ ℝ ∀ x ∈ Q ⁡ i Q ⁡ i + 1 F ⁡ x ≤ b
133 132 3adant3 ⊢ φ ∧ i ∈ 0 ..^ M ∧ I ⁡ i = t → ∃ b ∈ ℝ ∀ x ∈ Q ⁡ i Q ⁡ i + 1 F ↾ Q ⁡ i Q ⁡ i + 1 ⁡ x ≤ b ↔ ∃ b ∈ ℝ ∀ x ∈ Q ⁡ i Q ⁡ i + 1 F ⁡ x ≤ b
134 50 55 mpan2 ⊢ i ∈ 0 ..^ M → I ⁡ i = Q ⁡ i Q ⁡ i + 1
135 id ⊢ I ⁡ i = t → I ⁡ i = t
136 134 135 sylan9req ⊢ i ∈ 0 ..^ M ∧ I ⁡ i = t → Q ⁡ i Q ⁡ i + 1 = t
137 136 3adant1 ⊢ φ ∧ i ∈ 0 ..^ M ∧ I ⁡ i = t → Q ⁡ i Q ⁡ i + 1 = t
138 137 raleqdv ⊢ φ ∧ i ∈ 0 ..^ M ∧ I ⁡ i = t → ∀ x ∈ Q ⁡ i Q ⁡ i + 1 F ⁡ x ≤ b ↔ ∀ x ∈ t F ⁡ x ≤ b
139 138 rexbidv ⊢ φ ∧ i ∈ 0 ..^ M ∧ I ⁡ i = t → ∃ b ∈ ℝ ∀ x ∈ Q ⁡ i Q ⁡ i + 1 F ⁡ x ≤ b ↔ ∃ b ∈ ℝ ∀ x ∈ t F ⁡ x ≤ b
140 133 139 bitrd ⊢ φ ∧ i ∈ 0 ..^ M ∧ I ⁡ i = t → ∃ b ∈ ℝ ∀ x ∈ Q ⁡ i Q ⁡ i + 1 F ↾ Q ⁡ i Q ⁡ i + 1 ⁡ x ≤ b ↔ ∃ b ∈ ℝ ∀ x ∈ t F ⁡ x ≤ b
141 126 140 mpbid ⊢ φ ∧ i ∈ 0 ..^ M ∧ I ⁡ i = t → ∃ b ∈ ℝ ∀ x ∈ t F ⁡ x ≤ b
142 141 3exp ⊢ φ → i ∈ 0 ..^ M → I ⁡ i = t → ∃ b ∈ ℝ ∀ x ∈ t F ⁡ x ≤ b
143 142 adantr ⊢ φ ∧ t ∈ ran ⁡ I → i ∈ 0 ..^ M → I ⁡ i = t → ∃ b ∈ ℝ ∀ x ∈ t F ⁡ x ≤ b
144 143 rexlimdv ⊢ φ ∧ t ∈ ran ⁡ I → ∃ i ∈ 0 ..^ M I ⁡ i = t → ∃ b ∈ ℝ ∀ x ∈ t F ⁡ x ≤ b
145 117 144 mpd ⊢ φ ∧ t ∈ ran ⁡ I → ∃ b ∈ ℝ ∀ x ∈ t F ⁡ x ≤ b
146 145 adantlr ⊢ φ ∧ w = ⋃ ran ⁡ I ∧ t ∈ ran ⁡ I → ∃ b ∈ ℝ ∀ x ∈ t F ⁡ x ≤ b
147 eqimss ⊢ w = ⋃ ran ⁡ I → w ⊆ ⋃ ran ⁡ I
148 147 adantl ⊢ φ ∧ w = ⋃ ran ⁡ I → w ⊆ ⋃ ran ⁡ I
149 108 113 146 148 ssfiunibd ⊢ φ ∧ w = ⋃ ran ⁡ I → ∃ y ∈ ℝ ∀ x ∈ w F ⁡ x ≤ y
150 100 104 149 syl2anc ⊢ φ ∧ w ∈ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I ∧ ¬ w = ran ⁡ Q ∩ dom ⁡ F → ∃ y ∈ ℝ ∀ x ∈ w F ⁡ x ≤ y
151 99 150 pm2.61dan ⊢ φ ∧ w ∈ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I → ∃ y ∈ ℝ ∀ x ∈ w F ⁡ x ≤ y
152 simpr ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F ∧ x ∈ ran ⁡ Q → x ∈ ran ⁡ Q
153 elinel2 ⊢ x ∈ A B ∩ dom ⁡ F → x ∈ dom ⁡ F
154 153 ad2antlr ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F ∧ x ∈ ran ⁡ Q → x ∈ dom ⁡ F
155 152 154 elind ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F ∧ x ∈ ran ⁡ Q → x ∈ ran ⁡ Q ∩ dom ⁡ F
156 elun1 ⊢ x ∈ ran ⁡ Q ∩ dom ⁡ F → x ∈ ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I
157 155 156 syl ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F ∧ x ∈ ran ⁡ Q → x ∈ ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I
158 7 ad2antrr ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F ∧ ¬ x ∈ ran ⁡ Q → M ∈ ℕ
159 8 ad2antrr ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F ∧ ¬ x ∈ ran ⁡ Q → Q : 0 … M ⟶ ℝ
160 elinel1 ⊢ x ∈ A B ∩ dom ⁡ F → x ∈ A B
161 160 adantl ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F → x ∈ A B
162 9 eqcomd ⊢ φ → A = Q ⁡ 0
163 162 adantr ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F → A = Q ⁡ 0
164 10 eqcomd ⊢ φ → B = Q ⁡ M
165 164 adantr ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F → B = Q ⁡ M
166 163 165 oveq12d ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F → A B = Q ⁡ 0 Q ⁡ M
167 161 166 eleqtrd ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F → x ∈ Q ⁡ 0 Q ⁡ M
168 167 adantr ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F ∧ ¬ x ∈ ran ⁡ Q → x ∈ Q ⁡ 0 Q ⁡ M
169 simpr ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F ∧ ¬ x ∈ ran ⁡ Q → ¬ x ∈ ran ⁡ Q
170 fveq2 ⊢ k = j → Q ⁡ k = Q ⁡ j
171 170 breq1d ⊢ k = j → Q ⁡ k < x ↔ Q ⁡ j < x
172 171 cbvrabv ⊢ k ∈ 0 ..^ M | Q ⁡ k < x = j ∈ 0 ..^ M | Q ⁡ j < x
173 172 supeq1i ⊢ sup k ∈ 0 ..^ M | Q ⁡ k < x ℝ < = sup j ∈ 0 ..^ M | Q ⁡ j < x ℝ <
174 158 159 168 169 173 fourierdlem25 ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F ∧ ¬ x ∈ ran ⁡ Q → ∃ i ∈ 0 ..^ M x ∈ Q ⁡ i Q ⁡ i + 1
175 52 ad2antrl ⊢ φ ∧ i ∈ dom ⁡ I ∧ x ∈ I ⁡ i → i ∈ 0 ..^ M
176 simprr ⊢ φ ∧ i ∈ dom ⁡ I ∧ x ∈ I ⁡ i → x ∈ I ⁡ i
177 175 134 syl ⊢ φ ∧ i ∈ dom ⁡ I ∧ x ∈ I ⁡ i → I ⁡ i = Q ⁡ i Q ⁡ i + 1
178 176 177 eleqtrd ⊢ φ ∧ i ∈ dom ⁡ I ∧ x ∈ I ⁡ i → x ∈ Q ⁡ i Q ⁡ i + 1
179 175 178 jca ⊢ φ ∧ i ∈ dom ⁡ I ∧ x ∈ I ⁡ i → i ∈ 0 ..^ M ∧ x ∈ Q ⁡ i Q ⁡ i + 1
180 id ⊢ i ∈ 0 ..^ M → i ∈ 0 ..^ M
181 180 51 eleqtrrdi ⊢ i ∈ 0 ..^ M → i ∈ dom ⁡ I
182 181 ad2antrl ⊢ φ ∧ i ∈ 0 ..^ M ∧ x ∈ Q ⁡ i Q ⁡ i + 1 → i ∈ dom ⁡ I
183 simprr ⊢ φ ∧ i ∈ 0 ..^ M ∧ x ∈ Q ⁡ i Q ⁡ i + 1 → x ∈ Q ⁡ i Q ⁡ i + 1
184 134 eqcomd ⊢ i ∈ 0 ..^ M → Q ⁡ i Q ⁡ i + 1 = I ⁡ i
185 184 ad2antrl ⊢ φ ∧ i ∈ 0 ..^ M ∧ x ∈ Q ⁡ i Q ⁡ i + 1 → Q ⁡ i Q ⁡ i + 1 = I ⁡ i
186 183 185 eleqtrd ⊢ φ ∧ i ∈ 0 ..^ M ∧ x ∈ Q ⁡ i Q ⁡ i + 1 → x ∈ I ⁡ i
187 182 186 jca ⊢ φ ∧ i ∈ 0 ..^ M ∧ x ∈ Q ⁡ i Q ⁡ i + 1 → i ∈ dom ⁡ I ∧ x ∈ I ⁡ i
188 179 187 impbida ⊢ φ → i ∈ dom ⁡ I ∧ x ∈ I ⁡ i ↔ i ∈ 0 ..^ M ∧ x ∈ Q ⁡ i Q ⁡ i + 1
189 188 rexbidv2 ⊢ φ → ∃ i ∈ dom ⁡ I x ∈ I ⁡ i ↔ ∃ i ∈ 0 ..^ M x ∈ Q ⁡ i Q ⁡ i + 1
190 189 ad2antrr ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F ∧ ¬ x ∈ ran ⁡ Q → ∃ i ∈ dom ⁡ I x ∈ I ⁡ i ↔ ∃ i ∈ 0 ..^ M x ∈ Q ⁡ i Q ⁡ i + 1
191 174 190 mpbird ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F ∧ ¬ x ∈ ran ⁡ Q → ∃ i ∈ dom ⁡ I x ∈ I ⁡ i
192 191 47 sylibr ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F ∧ ¬ x ∈ ran ⁡ Q → x ∈ ⋃ ran ⁡ I
193 elun2 ⊢ x ∈ ⋃ ran ⁡ I → x ∈ ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I
194 192 193 syl ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F ∧ ¬ x ∈ ran ⁡ Q → x ∈ ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I
195 157 194 pm2.61dan ⊢ φ ∧ x ∈ A B ∩ dom ⁡ F → x ∈ ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I
196 195 ralrimiva ⊢ φ → ∀ x ∈ A B ∩ dom ⁡ F x ∈ ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I
197 dfss3 ⊢ A B ∩ dom ⁡ F ⊆ ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I ↔ ∀ x ∈ A B ∩ dom ⁡ F x ∈ ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I
198 196 197 sylibr ⊢ φ → A B ∩ dom ⁡ F ⊆ ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I
199 28 35 37 syl2anc ⊢ φ → ⋃ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I = ran ⁡ Q ∩ dom ⁡ F ∪ ⋃ ran ⁡ I
200 198 199 sseqtrrd ⊢ φ → A B ∩ dom ⁡ F ⊆ ⋃ ran ⁡ Q ∩ dom ⁡ F ⋃ ran ⁡ I
201 19 76 151 200 ssfiunibd ⊢ φ → ∃ y ∈ ℝ ∀ x ∈ A B ∩ dom ⁡ F F ⁡ x ≤ y
202 nfv ⊢ Ⅎ x φ
203 nfra1 ⊢ Ⅎ x ∀ x ∈ A B ∩ dom ⁡ F F ⁡ x ≤ y
204 202 203 nfan ⊢ Ⅎ x φ ∧ ∀ x ∈ A B ∩ dom ⁡ F F ⁡ x ≤ y
205 1 sselda ⊢ φ ∧ x ∈ dom ⁡ F → x ∈ ℝ
206 4 adantr ⊢ φ ∧ x ∈ dom ⁡ F → B ∈ ℝ
207 206 205 resubcld ⊢ φ ∧ x ∈ dom ⁡ F → B − x ∈ ℝ
208 4 3 resubcld ⊢ φ → B − A ∈ ℝ
209 6 208 eqeltrid ⊢ φ → T ∈ ℝ
210 209 adantr ⊢ φ ∧ x ∈ dom ⁡ F → T ∈ ℝ
211 3 4 posdifd ⊢ φ → A < B ↔ 0 < B − A
212 5 211 mpbid ⊢ φ → 0 < B − A
213 212 6 breqtrrdi ⊢ φ → 0 < T
214 213 gt0ne0d ⊢ φ → T ≠ 0
215 214 adantr ⊢ φ ∧ x ∈ dom ⁡ F → T ≠ 0
216 207 210 215 redivcld ⊢ φ ∧ x ∈ dom ⁡ F → B − x T ∈ ℝ
217 216 flcld ⊢ φ ∧ x ∈ dom ⁡ F → B − x T ∈ ℤ
218 217 zred ⊢ φ ∧ x ∈ dom ⁡ F → B − x T ∈ ℝ
219 218 210 remulcld ⊢ φ ∧ x ∈ dom ⁡ F → B − x T ⁢ T ∈ ℝ
220 205 219 readdcld ⊢ φ ∧ x ∈ dom ⁡ F → x + B − x T ⁢ T ∈ ℝ
221 17 fvmpt2 ⊢ x ∈ ℝ ∧ x + B − x T ⁢ T ∈ ℝ → E ⁡ x = x + B − x T ⁢ T
222 205 220 221 syl2anc ⊢ φ ∧ x ∈ dom ⁡ F → E ⁡ x = x + B − x T ⁢ T
223 222 fveq2d ⊢ φ ∧ x ∈ dom ⁡ F → F ⁡ E ⁡ x = F ⁡ x + B − x T ⁢ T
224 fvex ⊢ B − x T ∈ V
225 eleq1 ⊢ k = B − x T → k ∈ ℤ ↔ B − x T ∈ ℤ
226 225 anbi2d ⊢ k = B − x T → φ ∧ x ∈ dom ⁡ F ∧ k ∈ ℤ ↔ φ ∧ x ∈ dom ⁡ F ∧ B − x T ∈ ℤ
227 oveq1 ⊢ k = B − x T → k ⁢ T = B − x T ⁢ T
228 227 oveq2d ⊢ k = B − x T → x + k ⁢ T = x + B − x T ⁢ T
229 228 fveq2d ⊢ k = B − x T → F ⁡ x + k ⁢ T = F ⁡ x + B − x T ⁢ T
230 229 eqeq1d ⊢ k = B − x T → F ⁡ x + k ⁢ T = F ⁡ x ↔ F ⁡ x + B − x T ⁢ T = F ⁡ x
231 226 230 imbi12d ⊢ k = B − x T → φ ∧ x ∈ dom ⁡ F ∧ k ∈ ℤ → F ⁡ x + k ⁢ T = F ⁡ x ↔ φ ∧ x ∈ dom ⁡ F ∧ B − x T ∈ ℤ → F ⁡ x + B − x T ⁢ T = F ⁡ x
232 224 231 15 vtocl ⊢ φ ∧ x ∈ dom ⁡ F ∧ B − x T ∈ ℤ → F ⁡ x + B − x T ⁢ T = F ⁡ x
233 217 232 mpdan ⊢ φ ∧ x ∈ dom ⁡ F → F ⁡ x + B − x T ⁢ T = F ⁡ x
234 223 233 eqtr2d ⊢ φ ∧ x ∈ dom ⁡ F → F ⁡ x = F ⁡ E ⁡ x
235 234 fveq2d ⊢ φ ∧ x ∈ dom ⁡ F → F ⁡ x = F ⁡ E ⁡ x
236 235 adantlr ⊢ φ ∧ ∀ x ∈ A B ∩ dom ⁡ F F ⁡ x ≤ y ∧ x ∈ dom ⁡ F → F ⁡ x = F ⁡ E ⁡ x
237 fveq2 ⊢ x = w → F ⁡ x = F ⁡ w
238 237 fveq2d ⊢ x = w → F ⁡ x = F ⁡ w
239 238 breq1d ⊢ x = w → F ⁡ x ≤ y ↔ F ⁡ w ≤ y
240 239 cbvralvw ⊢ ∀ x ∈ A B ∩ dom ⁡ F F ⁡ x ≤ y ↔ ∀ w ∈ A B ∩ dom ⁡ F F ⁡ w ≤ y
241 240 biimpi ⊢ ∀ x ∈ A B ∩ dom ⁡ F F ⁡ x ≤ y → ∀ w ∈ A B ∩ dom ⁡ F F ⁡ w ≤ y
242 241 ad2antlr ⊢ φ ∧ ∀ x ∈ A B ∩ dom ⁡ F F ⁡ x ≤ y ∧ x ∈ dom ⁡ F → ∀ w ∈ A B ∩ dom ⁡ F F ⁡ w ≤ y
243 iocssicc ⊢ A B ⊆ A B
244 3 adantr ⊢ φ ∧ x ∈ dom ⁡ F → A ∈ ℝ
245 5 adantr ⊢ φ ∧ x ∈ dom ⁡ F → A < B
246 id ⊢ x = y → x = y
247 oveq2 ⊢ x = y → B − x = B − y
248 247 oveq1d ⊢ x = y → B − x T = B − y T
249 248 fveq2d ⊢ x = y → B − x T = B − y T
250 249 oveq1d ⊢ x = y → B − x T ⁢ T = B − y T ⁢ T
251 246 250 oveq12d ⊢ x = y → x + B − x T ⁢ T = y + B − y T ⁢ T
252 251 cbvmptv ⊢ x ∈ ℝ ⟼ x + B − x T ⁢ T = y ∈ ℝ ⟼ y + B − y T ⁢ T
253 17 252 eqtri ⊢ E = y ∈ ℝ ⟼ y + B − y T ⁢ T
254 244 206 245 6 253 fourierdlem4 ⊢ φ ∧ x ∈ dom ⁡ F → E : ℝ ⟶ A B
255 254 205 ffvelcdmd ⊢ φ ∧ x ∈ dom ⁡ F → E ⁡ x ∈ A B
256 243 255 sselid ⊢ φ ∧ x ∈ dom ⁡ F → E ⁡ x ∈ A B
257 228 eleq1d ⊢ k = B − x T → x + k ⁢ T ∈ dom ⁡ F ↔ x + B − x T ⁢ T ∈ dom ⁡ F
258 226 257 imbi12d ⊢ k = B − x T → φ ∧ x ∈ dom ⁡ F ∧ k ∈ ℤ → x + k ⁢ T ∈ dom ⁡ F ↔ φ ∧ x ∈ dom ⁡ F ∧ B − x T ∈ ℤ → x + B − x T ⁢ T ∈ dom ⁡ F
259 224 258 14 vtocl ⊢ φ ∧ x ∈ dom ⁡ F ∧ B − x T ∈ ℤ → x + B − x T ⁢ T ∈ dom ⁡ F
260 217 259 mpdan ⊢ φ ∧ x ∈ dom ⁡ F → x + B − x T ⁢ T ∈ dom ⁡ F
261 222 260 eqeltrd ⊢ φ ∧ x ∈ dom ⁡ F → E ⁡ x ∈ dom ⁡ F
262 256 261 elind ⊢ φ ∧ x ∈ dom ⁡ F → E ⁡ x ∈ A B ∩ dom ⁡ F
263 262 adantlr ⊢ φ ∧ ∀ x ∈ A B ∩ dom ⁡ F F ⁡ x ≤ y ∧ x ∈ dom ⁡ F → E ⁡ x ∈ A B ∩ dom ⁡ F
264 fveq2 ⊢ w = E ⁡ x → F ⁡ w = F ⁡ E ⁡ x
265 264 fveq2d ⊢ w = E ⁡ x → F ⁡ w = F ⁡ E ⁡ x
266 265 breq1d ⊢ w = E ⁡ x → F ⁡ w ≤ y ↔ F ⁡ E ⁡ x ≤ y
267 266 rspccva ⊢ ∀ w ∈ A B ∩ dom ⁡ F F ⁡ w ≤ y ∧ E ⁡ x ∈ A B ∩ dom ⁡ F → F ⁡ E ⁡ x ≤ y
268 242 263 267 syl2anc ⊢ φ ∧ ∀ x ∈ A B ∩ dom ⁡ F F ⁡ x ≤ y ∧ x ∈ dom ⁡ F → F ⁡ E ⁡ x ≤ y
269 236 268 eqbrtrd ⊢ φ ∧ ∀ x ∈ A B ∩ dom ⁡ F F ⁡ x ≤ y ∧ x ∈ dom ⁡ F → F ⁡ x ≤ y
270 269 ex ⊢ φ ∧ ∀ x ∈ A B ∩ dom ⁡ F F ⁡ x ≤ y → x ∈ dom ⁡ F → F ⁡ x ≤ y
271 204 270 ralrimi ⊢ φ ∧ ∀ x ∈ A B ∩ dom ⁡ F F ⁡ x ≤ y → ∀ x ∈ dom ⁡ F F ⁡ x ≤ y
272 271 ex ⊢ φ → ∀ x ∈ A B ∩ dom ⁡ F F ⁡ x ≤ y → ∀ x ∈ dom ⁡ F F ⁡ x ≤ y
273 272 reximdv ⊢ φ → ∃ y ∈ ℝ ∀ x ∈ A B ∩ dom ⁡ F F ⁡ x ≤ y → ∃ y ∈ ℝ ∀ x ∈ dom ⁡ F F ⁡ x ≤ y
274 201 273 mpd ⊢ φ → ∃ y ∈ ℝ ∀ x ∈ dom ⁡ F F ⁡ x ≤ y