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

Theorem fourierdlem51 39707
Description: 𝑋 is in the periodic partition, when the considered interval is centered at 𝑋. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
fourierdlem51.a (𝜑𝐴 ∈ ℝ)
fourierdlem51.b (𝜑𝐵 ∈ ℝ)
fourierdlem51.alt0 (𝜑𝐴 < 0)
fourierdlem51.bgt0 (𝜑 → 0 < 𝐵)
fourierdlem51.t 𝑇 = (𝐵𝐴)
fourierdlem51.cfi (𝜑𝐶 ∈ Fin)
fourierdlem51.css (𝜑𝐶 ⊆ (𝐴[,]𝐵))
fourierdlem51.bc (𝜑𝐵𝐶)
fourierdlem51.e 𝐸 = (𝑥 ∈ ℝ ↦ (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)))
fourierdlem51.x (𝜑𝑋 ∈ ℝ)
fourierdlem51.exc (𝜑 → (𝐸𝑋) ∈ 𝐶)
fourierdlem51.d 𝐷 = ({(𝐴 + 𝑋), (𝐵 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})
fourierdlem51.f 𝐹 = (℩𝑓𝑓 Isom < , < ((0...((#‘𝐷) − 1)), 𝐷))
fourierdlem51.h 𝐻 = {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}
Assertion
Ref Expression
fourierdlem51 (𝜑𝑋 ∈ ran 𝐹)
Distinct variable groups:   𝐴,𝑘,𝑥,𝑦   𝐵,𝑘,𝑥,𝑦   𝐶,𝑘,𝑥,𝑦   𝐷,𝑓   𝑘,𝐸,𝑥   𝑓,𝐹   𝑥,𝐻   𝑇,𝑘,𝑥,𝑦   𝑘,𝑋,𝑥,𝑦   𝜑,𝑓   𝜑,𝑘,𝑥
Allowed substitution hints:   𝜑(𝑦)   𝐴(𝑓)   𝐵(𝑓)   𝐶(𝑓)   𝐷(𝑥,𝑦,𝑘)   𝑇(𝑓)   𝐸(𝑦,𝑓)   𝐹(𝑥,𝑦,𝑘)   𝐻(𝑦,𝑓,𝑘)   𝑋(𝑓)

Proof of Theorem fourierdlem51
Dummy variables 𝑖 𝑗 𝑤 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fourierdlem51.a . . . . . . 7 (𝜑𝐴 ∈ ℝ)
2 fourierdlem51.x . . . . . . 7 (𝜑𝑋 ∈ ℝ)
31, 2readdcld 10021 . . . . . 6 (𝜑 → (𝐴 + 𝑋) ∈ ℝ)
4 fourierdlem51.b . . . . . . 7 (𝜑𝐵 ∈ ℝ)
54, 2readdcld 10021 . . . . . 6 (𝜑 → (𝐵 + 𝑋) ∈ ℝ)
6 0red 9993 . . . . . . . . 9 (𝜑 → 0 ∈ ℝ)
7 fourierdlem51.alt0 . . . . . . . . 9 (𝜑𝐴 < 0)
81, 6, 2, 7ltadd1dd 10590 . . . . . . . 8 (𝜑 → (𝐴 + 𝑋) < (0 + 𝑋))
92recnd 10020 . . . . . . . . 9 (𝜑𝑋 ∈ ℂ)
109addid2d 10189 . . . . . . . 8 (𝜑 → (0 + 𝑋) = 𝑋)
118, 10breqtrd 4644 . . . . . . 7 (𝜑 → (𝐴 + 𝑋) < 𝑋)
123, 2, 11ltled 10137 . . . . . 6 (𝜑 → (𝐴 + 𝑋) ≤ 𝑋)
13 fourierdlem51.bgt0 . . . . . . . . 9 (𝜑 → 0 < 𝐵)
146, 4, 2, 13ltadd1dd 10590 . . . . . . . 8 (𝜑 → (0 + 𝑋) < (𝐵 + 𝑋))
1510, 14eqbrtrrd 4642 . . . . . . 7 (𝜑𝑋 < (𝐵 + 𝑋))
162, 5, 15ltled 10137 . . . . . 6 (𝜑𝑋 ≤ (𝐵 + 𝑋))
173, 5, 2, 12, 16eliccd 39168 . . . . 5 (𝜑𝑋 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)))
184, 2resubcld 10410 . . . . . . . 8 (𝜑 → (𝐵𝑋) ∈ ℝ)
19 fourierdlem51.t . . . . . . . . 9 𝑇 = (𝐵𝐴)
204, 1resubcld 10410 . . . . . . . . 9 (𝜑 → (𝐵𝐴) ∈ ℝ)
2119, 20syl5eqel 2702 . . . . . . . 8 (𝜑𝑇 ∈ ℝ)
221, 6, 4, 7, 13lttrd 10150 . . . . . . . . . . 11 (𝜑𝐴 < 𝐵)
231, 4posdifd 10566 . . . . . . . . . . 11 (𝜑 → (𝐴 < 𝐵 ↔ 0 < (𝐵𝐴)))
2422, 23mpbid 222 . . . . . . . . . 10 (𝜑 → 0 < (𝐵𝐴))
2519eqcomi 2630 . . . . . . . . . . 11 (𝐵𝐴) = 𝑇
2625a1i 11 . . . . . . . . . 10 (𝜑 → (𝐵𝐴) = 𝑇)
2724, 26breqtrd 4644 . . . . . . . . 9 (𝜑 → 0 < 𝑇)
2827gt0ne0d 10544 . . . . . . . 8 (𝜑𝑇 ≠ 0)
2918, 21, 28redivcld 10805 . . . . . . 7 (𝜑 → ((𝐵𝑋) / 𝑇) ∈ ℝ)
3029flcld 12547 . . . . . 6 (𝜑 → (⌊‘((𝐵𝑋) / 𝑇)) ∈ ℤ)
31 fourierdlem51.e . . . . . . . . 9 𝐸 = (𝑥 ∈ ℝ ↦ (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)))
3231a1i 11 . . . . . . . 8 (𝜑𝐸 = (𝑥 ∈ ℝ ↦ (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇))))
33 id 22 . . . . . . . . . 10 (𝑥 = 𝑋𝑥 = 𝑋)
34 oveq2 6618 . . . . . . . . . . . . 13 (𝑥 = 𝑋 → (𝐵𝑥) = (𝐵𝑋))
3534oveq1d 6625 . . . . . . . . . . . 12 (𝑥 = 𝑋 → ((𝐵𝑥) / 𝑇) = ((𝐵𝑋) / 𝑇))
3635fveq2d 6157 . . . . . . . . . . 11 (𝑥 = 𝑋 → (⌊‘((𝐵𝑥) / 𝑇)) = (⌊‘((𝐵𝑋) / 𝑇)))
3736oveq1d 6625 . . . . . . . . . 10 (𝑥 = 𝑋 → ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇) = ((⌊‘((𝐵𝑋) / 𝑇)) · 𝑇))
3833, 37oveq12d 6628 . . . . . . . . 9 (𝑥 = 𝑋 → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) = (𝑋 + ((⌊‘((𝐵𝑋) / 𝑇)) · 𝑇)))
3938adantl 482 . . . . . . . 8 ((𝜑𝑥 = 𝑋) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) = (𝑋 + ((⌊‘((𝐵𝑋) / 𝑇)) · 𝑇)))
4030zred 11434 . . . . . . . . . 10 (𝜑 → (⌊‘((𝐵𝑋) / 𝑇)) ∈ ℝ)
4140, 21remulcld 10022 . . . . . . . . 9 (𝜑 → ((⌊‘((𝐵𝑋) / 𝑇)) · 𝑇) ∈ ℝ)
422, 41readdcld 10021 . . . . . . . 8 (𝜑 → (𝑋 + ((⌊‘((𝐵𝑋) / 𝑇)) · 𝑇)) ∈ ℝ)
4332, 39, 2, 42fvmptd 6250 . . . . . . 7 (𝜑 → (𝐸𝑋) = (𝑋 + ((⌊‘((𝐵𝑋) / 𝑇)) · 𝑇)))
44 fourierdlem51.exc . . . . . . 7 (𝜑 → (𝐸𝑋) ∈ 𝐶)
4543, 44eqeltrrd 2699 . . . . . 6 (𝜑 → (𝑋 + ((⌊‘((𝐵𝑋) / 𝑇)) · 𝑇)) ∈ 𝐶)
46 oveq1 6617 . . . . . . . . 9 (𝑘 = (⌊‘((𝐵𝑋) / 𝑇)) → (𝑘 · 𝑇) = ((⌊‘((𝐵𝑋) / 𝑇)) · 𝑇))
4746oveq2d 6626 . . . . . . . 8 (𝑘 = (⌊‘((𝐵𝑋) / 𝑇)) → (𝑋 + (𝑘 · 𝑇)) = (𝑋 + ((⌊‘((𝐵𝑋) / 𝑇)) · 𝑇)))
4847eleq1d 2683 . . . . . . 7 (𝑘 = (⌊‘((𝐵𝑋) / 𝑇)) → ((𝑋 + (𝑘 · 𝑇)) ∈ 𝐶 ↔ (𝑋 + ((⌊‘((𝐵𝑋) / 𝑇)) · 𝑇)) ∈ 𝐶))
4948rspcev 3298 . . . . . 6 (((⌊‘((𝐵𝑋) / 𝑇)) ∈ ℤ ∧ (𝑋 + ((⌊‘((𝐵𝑋) / 𝑇)) · 𝑇)) ∈ 𝐶) → ∃𝑘 ∈ ℤ (𝑋 + (𝑘 · 𝑇)) ∈ 𝐶)
5030, 45, 49syl2anc 692 . . . . 5 (𝜑 → ∃𝑘 ∈ ℤ (𝑋 + (𝑘 · 𝑇)) ∈ 𝐶)
51 oveq1 6617 . . . . . . . 8 (𝑦 = 𝑋 → (𝑦 + (𝑘 · 𝑇)) = (𝑋 + (𝑘 · 𝑇)))
5251eleq1d 2683 . . . . . . 7 (𝑦 = 𝑋 → ((𝑦 + (𝑘 · 𝑇)) ∈ 𝐶 ↔ (𝑋 + (𝑘 · 𝑇)) ∈ 𝐶))
5352rexbidv 3046 . . . . . 6 (𝑦 = 𝑋 → (∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶 ↔ ∃𝑘 ∈ ℤ (𝑋 + (𝑘 · 𝑇)) ∈ 𝐶))
5453elrab 3350 . . . . 5 (𝑋 ∈ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ↔ (𝑋 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∧ ∃𝑘 ∈ ℤ (𝑋 + (𝑘 · 𝑇)) ∈ 𝐶))
5517, 50, 54sylanbrc 697 . . . 4 (𝜑𝑋 ∈ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})
56 elun2 3764 . . . 4 (𝑋 ∈ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} → 𝑋 ∈ ({(𝐴 + 𝑋), (𝐵 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}))
5755, 56syl 17 . . 3 (𝜑𝑋 ∈ ({(𝐴 + 𝑋), (𝐵 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}))
58 fourierdlem51.d . . 3 𝐷 = ({(𝐴 + 𝑋), (𝐵 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})
5957, 58syl6eleqr 2709 . 2 (𝜑𝑋𝐷)
60 prfi 8187 . . . . . 6 {(𝐴 + 𝑋), (𝐵 + 𝑋)} ∈ Fin
61 snfi 7990 . . . . . . . 8 {(𝐴 + 𝑋)} ∈ Fin
62 fourierdlem51.cfi . . . . . . . . 9 (𝜑𝐶 ∈ Fin)
63 fvres 6169 . . . . . . . . . . . . . 14 (𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} → ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑥) = (𝐸𝑥))
6463adantl 482 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) → ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑥) = (𝐸𝑥))
65 oveq1 6617 . . . . . . . . . . . . . . . . . . 19 (𝑦 = 𝑥 → (𝑦 + (𝑘 · 𝑇)) = (𝑥 + (𝑘 · 𝑇)))
6665eleq1d 2683 . . . . . . . . . . . . . . . . . 18 (𝑦 = 𝑥 → ((𝑦 + (𝑘 · 𝑇)) ∈ 𝐶 ↔ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶))
6766rexbidv 3046 . . . . . . . . . . . . . . . . 17 (𝑦 = 𝑥 → (∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶 ↔ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶))
6867elrab 3350 . . . . . . . . . . . . . . . 16 (𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ↔ (𝑥 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∧ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶))
6968simprbi 480 . . . . . . . . . . . . . . 15 (𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} → ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶)
7069adantl 482 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) → ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶)
71 nfv 1840 . . . . . . . . . . . . . . . 16 𝑘𝜑
72 nfre1 3000 . . . . . . . . . . . . . . . . . 18 𝑘𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶
73 nfcv 2761 . . . . . . . . . . . . . . . . . 18 𝑘((𝐴 + 𝑋)(,](𝐵 + 𝑋))
7472, 73nfrab 3115 . . . . . . . . . . . . . . . . 17 𝑘{𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}
7574nfcri 2755 . . . . . . . . . . . . . . . 16 𝑘 𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}
7671, 75nfan 1825 . . . . . . . . . . . . . . 15 𝑘(𝜑𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})
77 nfv 1840 . . . . . . . . . . . . . . 15 𝑘(𝐸𝑥) ∈ 𝐶
78 simpl 473 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) → 𝜑)
793rexrd 10041 . . . . . . . . . . . . . . . . . . 19 (𝜑 → (𝐴 + 𝑋) ∈ ℝ*)
80 iocssre 12203 . . . . . . . . . . . . . . . . . . 19 (((𝐴 + 𝑋) ∈ ℝ* ∧ (𝐵 + 𝑋) ∈ ℝ) → ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ⊆ ℝ)
8179, 5, 80syl2anc 692 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ⊆ ℝ)
8281adantr 481 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) → ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ⊆ ℝ)
83 elrabi 3346 . . . . . . . . . . . . . . . . . 18 (𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} → 𝑥 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)))
8483adantl 482 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) → 𝑥 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)))
8582, 84sseldd 3588 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) → 𝑥 ∈ ℝ)
86 simpr 477 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
874adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑𝑥 ∈ ℝ) → 𝐵 ∈ ℝ)
8887, 86resubcld 10410 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑥 ∈ ℝ) → (𝐵𝑥) ∈ ℝ)
8921adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑥 ∈ ℝ) → 𝑇 ∈ ℝ)
9028adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑥 ∈ ℝ) → 𝑇 ≠ 0)
9188, 89, 90redivcld 10805 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑥 ∈ ℝ) → ((𝐵𝑥) / 𝑇) ∈ ℝ)
9291flcld 12547 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑥 ∈ ℝ) → (⌊‘((𝐵𝑥) / 𝑇)) ∈ ℤ)
9392zred 11434 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑥 ∈ ℝ) → (⌊‘((𝐵𝑥) / 𝑇)) ∈ ℝ)
9493, 89remulcld 10022 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑥 ∈ ℝ) → ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇) ∈ ℝ)
9586, 94readdcld 10021 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑥 ∈ ℝ) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ ℝ)
9631fvmpt2 6253 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑥 ∈ ℝ ∧ (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ ℝ) → (𝐸𝑥) = (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)))
9786, 95, 96syl2anc 692 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑥 ∈ ℝ) → (𝐸𝑥) = (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)))
9897ad2antrr 761 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝐸𝑥) = (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)))
99 simpl 473 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → ((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ))
10092ad2antrr 761 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (⌊‘((𝐵𝑥) / 𝑇)) ∈ ℤ)
101 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑 ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝑥 + (𝑘 · 𝑇)) = 𝐴)
1021rexrd 10041 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑𝐴 ∈ ℝ*)
1034rexrd 10041 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑𝐵 ∈ ℝ*)
1041, 4, 22ltled 10137 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑𝐴𝐵)
105 lbicc2 12238 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ*𝐴𝐵) → 𝐴 ∈ (𝐴[,]𝐵))
106102, 103, 104, 105syl3anc 1323 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑𝐴 ∈ (𝐴[,]𝐵))
107106adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑 ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → 𝐴 ∈ (𝐴[,]𝐵))
108101, 107eqeltrd 2698 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑 ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵))
109108ad4ant14 1290 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵))
11099, 100, 109jca31 556 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (⌊‘((𝐵𝑥) / 𝑇)) ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵)))
111 iocssicc 12211 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝐴(,]𝐵) ⊆ (𝐴[,]𝐵)
1121, 4, 22, 19, 31fourierdlem4 39661 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑𝐸:ℝ⟶(𝐴(,]𝐵))
113112ffvelrnda 6320 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝜑𝑥 ∈ ℝ) → (𝐸𝑥) ∈ (𝐴(,]𝐵))
114111, 113sseldi 3585 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑥 ∈ ℝ) → (𝐸𝑥) ∈ (𝐴[,]𝐵))
11597, 114eqeltrrd 2699 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑥 ∈ ℝ) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ (𝐴[,]𝐵))
116115ad2antrr 761 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ (𝐴[,]𝐵))
117102adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑𝑥 ∈ ℝ) → 𝐴 ∈ ℝ*)
11887rexrd 10041 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑𝑥 ∈ ℝ) → 𝐵 ∈ ℝ*)
119 iocgtlb 39166 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ* ∧ (𝐸𝑥) ∈ (𝐴(,]𝐵)) → 𝐴 < (𝐸𝑥))
120117, 118, 113, 119syl3anc 1323 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑥 ∈ ℝ) → 𝐴 < (𝐸𝑥))
121120ad2antrr 761 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → 𝐴 < (𝐸𝑥))
122 id 22 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑥 + (𝑘 · 𝑇)) = 𝐴 → (𝑥 + (𝑘 · 𝑇)) = 𝐴)
123122eqcomd 2627 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑥 + (𝑘 · 𝑇)) = 𝐴𝐴 = (𝑥 + (𝑘 · 𝑇)))
124123adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → 𝐴 = (𝑥 + (𝑘 · 𝑇)))
125121, 124, 983brtr3d 4649 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝑥 + (𝑘 · 𝑇)) < (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)))
126 zre 11333 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑘 ∈ ℤ → 𝑘 ∈ ℝ)
127126adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝜑𝑘 ∈ ℤ) → 𝑘 ∈ ℝ)
12821adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝜑𝑘 ∈ ℤ) → 𝑇 ∈ ℝ)
129127, 128remulcld 10022 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝜑𝑘 ∈ ℤ) → (𝑘 · 𝑇) ∈ ℝ)
130129adantlr 750 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) → (𝑘 · 𝑇) ∈ ℝ)
131130adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝑘 · 𝑇) ∈ ℝ)
13294ad2antrr 761 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇) ∈ ℝ)
133 simpllr 798 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → 𝑥 ∈ ℝ)
134131, 132, 133ltadd2d 10145 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → ((𝑘 · 𝑇) < ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇) ↔ (𝑥 + (𝑘 · 𝑇)) < (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇))))
135125, 134mpbird 247 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝑘 · 𝑇) < ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇))
136126ad2antlr 762 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → 𝑘 ∈ ℝ)
13793ad2antrr 761 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (⌊‘((𝐵𝑥) / 𝑇)) ∈ ℝ)
13821, 27elrpd 11821 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑𝑇 ∈ ℝ+)
139138ad3antrrr 765 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → 𝑇 ∈ ℝ+)
140136, 137, 139ltmul1d 11865 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝑘 < (⌊‘((𝐵𝑥) / 𝑇)) ↔ (𝑘 · 𝑇) < ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)))
141135, 140mpbird 247 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → 𝑘 < (⌊‘((𝐵𝑥) / 𝑇)))
142 fvex 6163 . . . . . . . . . . . . . . . . . . . . . . . . 25 (⌊‘((𝐵𝑥) / 𝑇)) ∈ V
143 eleq1 2686 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑗 = (⌊‘((𝐵𝑥) / 𝑇)) → (𝑗 ∈ ℤ ↔ (⌊‘((𝐵𝑥) / 𝑇)) ∈ ℤ))
144143anbi2d 739 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑗 = (⌊‘((𝐵𝑥) / 𝑇)) → ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ↔ (((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (⌊‘((𝐵𝑥) / 𝑇)) ∈ ℤ)))
145144anbi1d 740 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 = (⌊‘((𝐵𝑥) / 𝑇)) → (((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵)) ↔ ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (⌊‘((𝐵𝑥) / 𝑇)) ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵))))
146 oveq1 6617 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑗 = (⌊‘((𝐵𝑥) / 𝑇)) → (𝑗 · 𝑇) = ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇))
147146oveq2d 6626 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑗 = (⌊‘((𝐵𝑥) / 𝑇)) → (𝑥 + (𝑗 · 𝑇)) = (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)))
148147eleq1d 2683 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑗 = (⌊‘((𝐵𝑥) / 𝑇)) → ((𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵) ↔ (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ (𝐴[,]𝐵)))
149145, 148anbi12d 746 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑗 = (⌊‘((𝐵𝑥) / 𝑇)) → ((((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ↔ (((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (⌊‘((𝐵𝑥) / 𝑇)) ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ (𝐴[,]𝐵))))
150 breq2 4622 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑗 = (⌊‘((𝐵𝑥) / 𝑇)) → (𝑘 < 𝑗𝑘 < (⌊‘((𝐵𝑥) / 𝑇))))
151149, 150anbi12d 746 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑗 = (⌊‘((𝐵𝑥) / 𝑇)) → (((((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑘 < 𝑗) ↔ ((((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (⌊‘((𝐵𝑥) / 𝑇)) ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑘 < (⌊‘((𝐵𝑥) / 𝑇)))))
152 eqeq1 2625 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑗 = (⌊‘((𝐵𝑥) / 𝑇)) → (𝑗 = (𝑘 + 1) ↔ (⌊‘((𝐵𝑥) / 𝑇)) = (𝑘 + 1)))
153151, 152imbi12d 334 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑗 = (⌊‘((𝐵𝑥) / 𝑇)) → ((((((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑘 < 𝑗) → 𝑗 = (𝑘 + 1)) ↔ (((((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (⌊‘((𝐵𝑥) / 𝑇)) ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑘 < (⌊‘((𝐵𝑥) / 𝑇))) → (⌊‘((𝐵𝑥) / 𝑇)) = (𝑘 + 1))))
154 eleq1 2686 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑖 = 𝑘 → (𝑖 ∈ ℤ ↔ 𝑘 ∈ ℤ))
155154anbi2d 739 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑖 = 𝑘 → (((𝜑𝑥 ∈ ℝ) ∧ 𝑖 ∈ ℤ) ↔ ((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ)))
156155anbi1d 740 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑖 = 𝑘 → ((((𝜑𝑥 ∈ ℝ) ∧ 𝑖 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ↔ (((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ 𝑗 ∈ ℤ)))
157 oveq1 6617 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑖 = 𝑘 → (𝑖 · 𝑇) = (𝑘 · 𝑇))
158157oveq2d 6626 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑖 = 𝑘 → (𝑥 + (𝑖 · 𝑇)) = (𝑥 + (𝑘 · 𝑇)))
159158eleq1d 2683 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑖 = 𝑘 → ((𝑥 + (𝑖 · 𝑇)) ∈ (𝐴[,]𝐵) ↔ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵)))
160156, 159anbi12d 746 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑖 = 𝑘 → (((((𝜑𝑥 ∈ ℝ) ∧ 𝑖 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑖 · 𝑇)) ∈ (𝐴[,]𝐵)) ↔ ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵))))
161160anbi1d 740 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑖 = 𝑘 → ((((((𝜑𝑥 ∈ ℝ) ∧ 𝑖 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑖 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ↔ (((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵))))
162 breq1 4621 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑖 = 𝑘 → (𝑖 < 𝑗𝑘 < 𝑗))
163161, 162anbi12d 746 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑖 = 𝑘 → (((((((𝜑𝑥 ∈ ℝ) ∧ 𝑖 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑖 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑖 < 𝑗) ↔ ((((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑘 < 𝑗)))
164 oveq1 6617 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑖 = 𝑘 → (𝑖 + 1) = (𝑘 + 1))
165164eqeq2d 2631 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑖 = 𝑘 → (𝑗 = (𝑖 + 1) ↔ 𝑗 = (𝑘 + 1)))
166163, 165imbi12d 334 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑖 = 𝑘 → ((((((((𝜑𝑥 ∈ ℝ) ∧ 𝑖 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑖 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑖 < 𝑗) → 𝑗 = (𝑖 + 1)) ↔ (((((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑘 < 𝑗) → 𝑗 = (𝑘 + 1))))
167 simp-6l 809 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((((((𝜑𝑥 ∈ ℝ) ∧ 𝑖 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑖 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑖 < 𝑗) → 𝜑)
168167, 1syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((((((𝜑𝑥 ∈ ℝ) ∧ 𝑖 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑖 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑖 < 𝑗) → 𝐴 ∈ ℝ)
169167, 4syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((((((𝜑𝑥 ∈ ℝ) ∧ 𝑖 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑖 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑖 < 𝑗) → 𝐵 ∈ ℝ)
170167, 22syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((((((𝜑𝑥 ∈ ℝ) ∧ 𝑖 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑖 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑖 < 𝑗) → 𝐴 < 𝐵)
171 simp-6r 810 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((((((𝜑𝑥 ∈ ℝ) ∧ 𝑖 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑖 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑖 < 𝑗) → 𝑥 ∈ ℝ)
172 simp-5r 808 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((((((𝜑𝑥 ∈ ℝ) ∧ 𝑖 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑖 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑖 < 𝑗) → 𝑖 ∈ ℤ)
173 simp-4r 806 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((((((𝜑𝑥 ∈ ℝ) ∧ 𝑖 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑖 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑖 < 𝑗) → 𝑗 ∈ ℤ)
174 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((((((𝜑𝑥 ∈ ℝ) ∧ 𝑖 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑖 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑖 < 𝑗) → 𝑖 < 𝑗)
175 simpllr 798 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((((((𝜑𝑥 ∈ ℝ) ∧ 𝑖 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑖 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑖 < 𝑗) → (𝑥 + (𝑖 · 𝑇)) ∈ (𝐴[,]𝐵))
176 simplr 791 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((((((𝜑𝑥 ∈ ℝ) ∧ 𝑖 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑖 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑖 < 𝑗) → (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵))
177168, 169, 170, 19, 171, 172, 173, 174, 175, 176fourierdlem6 39663 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((((𝜑𝑥 ∈ ℝ) ∧ 𝑖 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑖 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑖 < 𝑗) → 𝑗 = (𝑖 + 1))
178166, 177chvarv 2262 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ 𝑗 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + (𝑗 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑘 < 𝑗) → 𝑗 = (𝑘 + 1))
179142, 153, 178vtocl 3248 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (⌊‘((𝐵𝑥) / 𝑇)) ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ (𝐴[,]𝐵)) ∧ 𝑘 < (⌊‘((𝐵𝑥) / 𝑇))) → (⌊‘((𝐵𝑥) / 𝑇)) = (𝑘 + 1))
180110, 116, 141, 179syl21anc 1322 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (⌊‘((𝐵𝑥) / 𝑇)) = (𝑘 + 1))
181180oveq1d 6625 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇) = ((𝑘 + 1) · 𝑇))
182181oveq2d 6626 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) = (𝑥 + ((𝑘 + 1) · 𝑇)))
183127recnd 10020 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑘 ∈ ℤ) → 𝑘 ∈ ℂ)
18421recnd 10020 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑𝑇 ∈ ℂ)
185184adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑘 ∈ ℤ) → 𝑇 ∈ ℂ)
186183, 185adddirp1d 10018 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑘 ∈ ℤ) → ((𝑘 + 1) · 𝑇) = ((𝑘 · 𝑇) + 𝑇))
187186oveq2d 6626 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑘 ∈ ℤ) → (𝑥 + ((𝑘 + 1) · 𝑇)) = (𝑥 + ((𝑘 · 𝑇) + 𝑇)))
188187adantlr 750 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) → (𝑥 + ((𝑘 + 1) · 𝑇)) = (𝑥 + ((𝑘 · 𝑇) + 𝑇)))
189188adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝑥 + ((𝑘 + 1) · 𝑇)) = (𝑥 + ((𝑘 · 𝑇) + 𝑇)))
19086recnd 10020 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝜑𝑥 ∈ ℝ) → 𝑥 ∈ ℂ)
191190adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) → 𝑥 ∈ ℂ)
192130recnd 10020 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) → (𝑘 · 𝑇) ∈ ℂ)
193184ad2antrr 761 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) → 𝑇 ∈ ℂ)
194191, 192, 193addassd 10014 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) → ((𝑥 + (𝑘 · 𝑇)) + 𝑇) = (𝑥 + ((𝑘 · 𝑇) + 𝑇)))
195194eqcomd 2627 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) → (𝑥 + ((𝑘 · 𝑇) + 𝑇)) = ((𝑥 + (𝑘 · 𝑇)) + 𝑇))
196195adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝑥 + ((𝑘 · 𝑇) + 𝑇)) = ((𝑥 + (𝑘 · 𝑇)) + 𝑇))
197 oveq1 6617 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑥 + (𝑘 · 𝑇)) = 𝐴 → ((𝑥 + (𝑘 · 𝑇)) + 𝑇) = (𝐴 + 𝑇))
198197adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → ((𝑥 + (𝑘 · 𝑇)) + 𝑇) = (𝐴 + 𝑇))
1994recnd 10020 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑𝐵 ∈ ℂ)
2001recnd 10020 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑𝐴 ∈ ℂ)
201199, 200, 184subaddd 10362 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → ((𝐵𝐴) = 𝑇 ↔ (𝐴 + 𝑇) = 𝐵))
20226, 201mpbid 222 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑 → (𝐴 + 𝑇) = 𝐵)
203202ad3antrrr 765 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝐴 + 𝑇) = 𝐵)
204198, 203eqtrd 2655 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → ((𝑥 + (𝑘 · 𝑇)) + 𝑇) = 𝐵)
205189, 196, 2043eqtrd 2659 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝑥 + ((𝑘 + 1) · 𝑇)) = 𝐵)
20698, 182, 2053eqtrd 2659 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝐸𝑥) = 𝐵)
207 fourierdlem51.bc . . . . . . . . . . . . . . . . . . . . 21 (𝜑𝐵𝐶)
208207ad3antrrr 765 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → 𝐵𝐶)
209206, 208eqeltrd 2698 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝐸𝑥) ∈ 𝐶)
2102093adantl3 1217 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ ∧ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝐸𝑥) ∈ 𝐶)
211 simpl1 1062 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ ∧ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ ¬ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝜑𝑥 ∈ ℝ))
212 simpl2 1063 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ ∧ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ ¬ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → 𝑘 ∈ ℤ)
213 fourierdlem51.css . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑𝐶 ⊆ (𝐴[,]𝐵))
214213sselda 3587 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) → (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵))
215214adantlr 750 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑥 ∈ ℝ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) → (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵))
2162153adant2 1078 . . . . . . . . . . . . . . . . . . . . . 22 (((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ ∧ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) → (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵))
217216adantr 481 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ ∧ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ ¬ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵))
218 neqne 2798 . . . . . . . . . . . . . . . . . . . . . 22 (¬ (𝑥 + (𝑘 · 𝑇)) = 𝐴 → (𝑥 + (𝑘 · 𝑇)) ≠ 𝐴)
219218adantl 482 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ ∧ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ ¬ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝑥 + (𝑘 · 𝑇)) ≠ 𝐴)
2201adantr 481 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑥 ∈ ℝ) → 𝐴 ∈ ℝ)
221211, 220syl 17 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ ∧ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ ¬ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → 𝐴 ∈ ℝ)
222211, 87syl 17 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ ∧ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ ¬ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → 𝐵 ∈ ℝ)
223 simplr 791 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) → 𝑥 ∈ ℝ)
224223, 130readdcld 10021 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) → (𝑥 + (𝑘 · 𝑇)) ∈ ℝ)
225224rexrd 10041 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) → (𝑥 + (𝑘 · 𝑇)) ∈ ℝ*)
226211, 212, 225syl2anc 692 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ ∧ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ ¬ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝑥 + (𝑘 · 𝑇)) ∈ ℝ*)
227221, 222, 226eliccelioc 39189 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ ∧ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ ¬ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → ((𝑥 + (𝑘 · 𝑇)) ∈ (𝐴(,]𝐵) ↔ ((𝑥 + (𝑘 · 𝑇)) ∈ (𝐴[,]𝐵) ∧ (𝑥 + (𝑘 · 𝑇)) ≠ 𝐴)))
228217, 219, 227mpbir2and 956 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ ∧ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ ¬ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴(,]𝐵))
22997ad2antrr 761 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴(,]𝐵)) → (𝐸𝑥) = (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)))
2301ad3antrrr 765 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴(,]𝐵)) → 𝐴 ∈ ℝ)
2314ad3antrrr 765 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴(,]𝐵)) → 𝐵 ∈ ℝ)
23222ad3antrrr 765 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴(,]𝐵)) → 𝐴 < 𝐵)
233 simpllr 798 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴(,]𝐵)) → 𝑥 ∈ ℝ)
23492ad2antrr 761 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴(,]𝐵)) → (⌊‘((𝐵𝑥) / 𝑇)) ∈ ℤ)
235 simplr 791 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴(,]𝐵)) → 𝑘 ∈ ℤ)
23697, 113eqeltrrd 2699 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝜑𝑥 ∈ ℝ) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ (𝐴(,]𝐵))
237236ad2antrr 761 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴(,]𝐵)) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ (𝐴(,]𝐵))
238 simpr 477 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴(,]𝐵)) → (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴(,]𝐵))
239230, 231, 232, 19, 233, 234, 235, 237, 238fourierdlem35 39692 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴(,]𝐵)) → (⌊‘((𝐵𝑥) / 𝑇)) = 𝑘)
240239oveq1d 6625 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴(,]𝐵)) → ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇) = (𝑘 · 𝑇))
241240oveq2d 6626 . . . . . . . . . . . . . . . . . . . . 21 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴(,]𝐵)) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) = (𝑥 + (𝑘 · 𝑇)))
242229, 241eqtrd 2655 . . . . . . . . . . . . . . . . . . . 20 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ) ∧ (𝑥 + (𝑘 · 𝑇)) ∈ (𝐴(,]𝐵)) → (𝐸𝑥) = (𝑥 + (𝑘 · 𝑇)))
243211, 212, 228, 242syl21anc 1322 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ ∧ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ ¬ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝐸𝑥) = (𝑥 + (𝑘 · 𝑇)))
244 simpl3 1064 . . . . . . . . . . . . . . . . . . 19 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ ∧ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ ¬ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶)
245243, 244eqeltrd 2698 . . . . . . . . . . . . . . . . . 18 ((((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ ∧ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ ¬ (𝑥 + (𝑘 · 𝑇)) = 𝐴) → (𝐸𝑥) ∈ 𝐶)
246210, 245pm2.61dan 831 . . . . . . . . . . . . . . . . 17 (((𝜑𝑥 ∈ ℝ) ∧ 𝑘 ∈ ℤ ∧ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) → (𝐸𝑥) ∈ 𝐶)
2472463exp 1261 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ ℝ) → (𝑘 ∈ ℤ → ((𝑥 + (𝑘 · 𝑇)) ∈ 𝐶 → (𝐸𝑥) ∈ 𝐶)))
24878, 85, 247syl2anc 692 . . . . . . . . . . . . . . 15 ((𝜑𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) → (𝑘 ∈ ℤ → ((𝑥 + (𝑘 · 𝑇)) ∈ 𝐶 → (𝐸𝑥) ∈ 𝐶)))
24976, 77, 248rexlimd 3020 . . . . . . . . . . . . . 14 ((𝜑𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) → (∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶 → (𝐸𝑥) ∈ 𝐶))
25070, 249mpd 15 . . . . . . . . . . . . 13 ((𝜑𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) → (𝐸𝑥) ∈ 𝐶)
25164, 250eqeltrd 2698 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) → ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑥) ∈ 𝐶)
252 eqid 2621 . . . . . . . . . . . 12 (𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ↦ ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑥)) = (𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ↦ ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑥))
253251, 252fmptd 6346 . . . . . . . . . . 11 (𝜑 → (𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ↦ ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑥)):{𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}⟶𝐶)
254 iocssre 12203 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ) → (𝐴(,]𝐵) ⊆ ℝ)
255102, 4, 254syl2anc 692 . . . . . . . . . . . . . . 15 (𝜑 → (𝐴(,]𝐵) ⊆ ℝ)
256112, 255fssd 6019 . . . . . . . . . . . . . 14 (𝜑𝐸:ℝ⟶ℝ)
257 ssrab2 3671 . . . . . . . . . . . . . . 15 {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ⊆ ((𝐴 + 𝑋)(,](𝐵 + 𝑋))
258257, 81syl5ss 3598 . . . . . . . . . . . . . 14 (𝜑 → {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ⊆ ℝ)
259256, 258fssresd 6033 . . . . . . . . . . . . 13 (𝜑 → (𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}):{𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}⟶ℝ)
260259feqmptd 6211 . . . . . . . . . . . 12 (𝜑 → (𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) = (𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ↦ ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑥)))
261260feq1d 5992 . . . . . . . . . . 11 (𝜑 → ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}):{𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}⟶𝐶 ↔ (𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ↦ ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑥)):{𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}⟶𝐶))
262253, 261mpbird 247 . . . . . . . . . 10 (𝜑 → (𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}):{𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}⟶𝐶)
263 simplll 797 . . . . . . . . . . . . . . 15 ((((𝜑𝑤 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ 𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧)) → 𝜑)
264 id 22 . . . . . . . . . . . . . . . . 17 (𝑤 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} → 𝑤 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})
265 fourierdlem51.h . . . . . . . . . . . . . . . . 17 𝐻 = {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}
266264, 265syl6eleqr 2709 . . . . . . . . . . . . . . . 16 (𝑤 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} → 𝑤𝐻)
267266ad3antlr 766 . . . . . . . . . . . . . . 15 ((((𝜑𝑤 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ 𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧)) → 𝑤𝐻)
268263, 267jca 554 . . . . . . . . . . . . . 14 ((((𝜑𝑤 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ 𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧)) → (𝜑𝑤𝐻))
269 id 22 . . . . . . . . . . . . . . . 16 (𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} → 𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})
270269, 265syl6eleqr 2709 . . . . . . . . . . . . . . 15 (𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} → 𝑧𝐻)
271270ad2antlr 762 . . . . . . . . . . . . . 14 ((((𝜑𝑤 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ 𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧)) → 𝑧𝐻)
272 fvres 6169 . . . . . . . . . . . . . . . . 17 (𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} → ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧) = (𝐸𝑧))
273272eqcomd 2627 . . . . . . . . . . . . . . . 16 (𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} → (𝐸𝑧) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧))
274273ad2antlr 762 . . . . . . . . . . . . . . 15 ((((𝜑𝑤 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ 𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧)) → (𝐸𝑧) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧))
275 id 22 . . . . . . . . . . . . . . . . 17 (((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧) → ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧))
276275eqcomd 2627 . . . . . . . . . . . . . . . 16 (((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧) → ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤))
277276adantl 482 . . . . . . . . . . . . . . 15 ((((𝜑𝑤 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ 𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧)) → ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤))
278 fvres 6169 . . . . . . . . . . . . . . . 16 (𝑤 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} → ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = (𝐸𝑤))
279278ad3antlr 766 . . . . . . . . . . . . . . 15 ((((𝜑𝑤 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ 𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧)) → ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = (𝐸𝑤))
280274, 277, 2793eqtrd 2659 . . . . . . . . . . . . . 14 ((((𝜑𝑤 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ 𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧)) → (𝐸𝑧) = (𝐸𝑤))
2811ad3antrrr 765 . . . . . . . . . . . . . . . 16 ((((𝜑𝑤𝐻) ∧ 𝑧𝐻) ∧ (𝐸𝑧) = (𝐸𝑤)) → 𝐴 ∈ ℝ)
2824ad3antrrr 765 . . . . . . . . . . . . . . . 16 ((((𝜑𝑤𝐻) ∧ 𝑧𝐻) ∧ (𝐸𝑧) = (𝐸𝑤)) → 𝐵 ∈ ℝ)
28322ad3antrrr 765 . . . . . . . . . . . . . . . 16 ((((𝜑𝑤𝐻) ∧ 𝑧𝐻) ∧ (𝐸𝑧) = (𝐸𝑤)) → 𝐴 < 𝐵)
2842ad3antrrr 765 . . . . . . . . . . . . . . . 16 ((((𝜑𝑤𝐻) ∧ 𝑧𝐻) ∧ (𝐸𝑧) = (𝐸𝑤)) → 𝑋 ∈ ℝ)
285 simpllr 798 . . . . . . . . . . . . . . . 16 ((((𝜑𝑤𝐻) ∧ 𝑧𝐻) ∧ (𝐸𝑧) = (𝐸𝑤)) → 𝑤𝐻)
286 simplr 791 . . . . . . . . . . . . . . . 16 ((((𝜑𝑤𝐻) ∧ 𝑧𝐻) ∧ (𝐸𝑧) = (𝐸𝑤)) → 𝑧𝐻)
287 simpr 477 . . . . . . . . . . . . . . . 16 ((((𝜑𝑤𝐻) ∧ 𝑧𝐻) ∧ (𝐸𝑧) = (𝐸𝑤)) → (𝐸𝑧) = (𝐸𝑤))
288281, 282, 283, 284, 265, 19, 31, 285, 286, 287fourierdlem19 39676 . . . . . . . . . . . . . . 15 ((((𝜑𝑤𝐻) ∧ 𝑧𝐻) ∧ (𝐸𝑧) = (𝐸𝑤)) → ¬ 𝑤 < 𝑧)
289287eqcomd 2627 . . . . . . . . . . . . . . . 16 ((((𝜑𝑤𝐻) ∧ 𝑧𝐻) ∧ (𝐸𝑧) = (𝐸𝑤)) → (𝐸𝑤) = (𝐸𝑧))
290281, 282, 283, 284, 265, 19, 31, 286, 285, 289fourierdlem19 39676 . . . . . . . . . . . . . . 15 ((((𝜑𝑤𝐻) ∧ 𝑧𝐻) ∧ (𝐸𝑧) = (𝐸𝑤)) → ¬ 𝑧 < 𝑤)
291265, 258syl5eqss 3633 . . . . . . . . . . . . . . . . . 18 (𝜑𝐻 ⊆ ℝ)
292291sselda 3587 . . . . . . . . . . . . . . . . 17 ((𝜑𝑤𝐻) → 𝑤 ∈ ℝ)
293292ad2antrr 761 . . . . . . . . . . . . . . . 16 ((((𝜑𝑤𝐻) ∧ 𝑧𝐻) ∧ (𝐸𝑧) = (𝐸𝑤)) → 𝑤 ∈ ℝ)
294291adantr 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑤𝐻) → 𝐻 ⊆ ℝ)
295294sselda 3587 . . . . . . . . . . . . . . . . 17 (((𝜑𝑤𝐻) ∧ 𝑧𝐻) → 𝑧 ∈ ℝ)
296295adantr 481 . . . . . . . . . . . . . . . 16 ((((𝜑𝑤𝐻) ∧ 𝑧𝐻) ∧ (𝐸𝑧) = (𝐸𝑤)) → 𝑧 ∈ ℝ)
297293, 296lttri3d 10129 . . . . . . . . . . . . . . 15 ((((𝜑𝑤𝐻) ∧ 𝑧𝐻) ∧ (𝐸𝑧) = (𝐸𝑤)) → (𝑤 = 𝑧 ↔ (¬ 𝑤 < 𝑧 ∧ ¬ 𝑧 < 𝑤)))
298288, 290, 297mpbir2and 956 . . . . . . . . . . . . . 14 ((((𝜑𝑤𝐻) ∧ 𝑧𝐻) ∧ (𝐸𝑧) = (𝐸𝑤)) → 𝑤 = 𝑧)
299268, 271, 280, 298syl21anc 1322 . . . . . . . . . . . . 13 ((((𝜑𝑤 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ 𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧)) → 𝑤 = 𝑧)
300299ex 450 . . . . . . . . . . . 12 (((𝜑𝑤 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∧ 𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) → (((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧) → 𝑤 = 𝑧))
301300ralrimiva 2961 . . . . . . . . . . 11 ((𝜑𝑤 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) → ∀𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} (((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧) → 𝑤 = 𝑧))
302301ralrimiva 2961 . . . . . . . . . 10 (𝜑 → ∀𝑤 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}∀𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} (((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧) → 𝑤 = 𝑧))
303 dff13 6472 . . . . . . . . . 10 ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}):{𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}–1-1𝐶 ↔ ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}):{𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}⟶𝐶 ∧ ∀𝑤 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}∀𝑧 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} (((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑤) = ((𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})‘𝑧) → 𝑤 = 𝑧)))
304262, 302, 303sylanbrc 697 . . . . . . . . 9 (𝜑 → (𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}):{𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}–1-1𝐶)
305 f1fi 8205 . . . . . . . . 9 ((𝐶 ∈ Fin ∧ (𝐸 ↾ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}):{𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}–1-1𝐶) → {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ∈ Fin)
30662, 304, 305syl2anc 692 . . . . . . . 8 (𝜑 → {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ∈ Fin)
307 unfi 8179 . . . . . . . 8 (({(𝐴 + 𝑋)} ∈ Fin ∧ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ∈ Fin) → ({(𝐴 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∈ Fin)
30861, 306, 307sylancr 694 . . . . . . 7 (𝜑 → ({(𝐴 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∈ Fin)
309 simpl 473 . . . . . . . . . 10 ((𝜑𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) → 𝜑)
310 elrabi 3346 . . . . . . . . . . 11 (𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} → 𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)))
311310adantl 482 . . . . . . . . . 10 ((𝜑𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) → 𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)))
31267elrab 3350 . . . . . . . . . . . 12 (𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ↔ (𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∧ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶))
313312simprbi 480 . . . . . . . . . . 11 (𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} → ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶)
314313adantl 482 . . . . . . . . . 10 ((𝜑𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) → ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶)
315 velsn 4169 . . . . . . . . . . . . 13 (𝑥 ∈ {(𝐴 + 𝑋)} ↔ 𝑥 = (𝐴 + 𝑋))
316 elun1 3763 . . . . . . . . . . . . 13 (𝑥 ∈ {(𝐴 + 𝑋)} → 𝑥 ∈ ({(𝐴 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}))
317315, 316sylbir 225 . . . . . . . . . . . 12 (𝑥 = (𝐴 + 𝑋) → 𝑥 ∈ ({(𝐴 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}))
318317adantl 482 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) ∧ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ 𝑥 = (𝐴 + 𝑋)) → 𝑥 ∈ ({(𝐴 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}))
31979ad2antrr 761 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) ∧ ¬ 𝑥 = (𝐴 + 𝑋)) → (𝐴 + 𝑋) ∈ ℝ*)
3205rexrd 10041 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐵 + 𝑋) ∈ ℝ*)
321320ad2antrr 761 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) ∧ ¬ 𝑥 = (𝐴 + 𝑋)) → (𝐵 + 𝑋) ∈ ℝ*)
3223, 5iccssred 39169 . . . . . . . . . . . . . . . . . 18 (𝜑 → ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ⊆ ℝ)
323322sselda 3587 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) → 𝑥 ∈ ℝ)
324323rexrd 10041 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) → 𝑥 ∈ ℝ*)
325324adantr 481 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) ∧ ¬ 𝑥 = (𝐴 + 𝑋)) → 𝑥 ∈ ℝ*)
3263ad2antrr 761 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) ∧ ¬ 𝑥 = (𝐴 + 𝑋)) → (𝐴 + 𝑋) ∈ ℝ)
327323adantr 481 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) ∧ ¬ 𝑥 = (𝐴 + 𝑋)) → 𝑥 ∈ ℝ)
32879adantr 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) → (𝐴 + 𝑋) ∈ ℝ*)
329320adantr 481 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) → (𝐵 + 𝑋) ∈ ℝ*)
330 simpr 477 . . . . . . . . . . . . . . . . . 18 ((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) → 𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)))
331 iccgelb 12180 . . . . . . . . . . . . . . . . . 18 (((𝐴 + 𝑋) ∈ ℝ* ∧ (𝐵 + 𝑋) ∈ ℝ*𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) → (𝐴 + 𝑋) ≤ 𝑥)
332328, 329, 330, 331syl3anc 1323 . . . . . . . . . . . . . . . . 17 ((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) → (𝐴 + 𝑋) ≤ 𝑥)
333332adantr 481 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) ∧ ¬ 𝑥 = (𝐴 + 𝑋)) → (𝐴 + 𝑋) ≤ 𝑥)
334 neqne 2798 . . . . . . . . . . . . . . . . 17 𝑥 = (𝐴 + 𝑋) → 𝑥 ≠ (𝐴 + 𝑋))
335334adantl 482 . . . . . . . . . . . . . . . 16 (((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) ∧ ¬ 𝑥 = (𝐴 + 𝑋)) → 𝑥 ≠ (𝐴 + 𝑋))
336326, 327, 333, 335leneltd 10143 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) ∧ ¬ 𝑥 = (𝐴 + 𝑋)) → (𝐴 + 𝑋) < 𝑥)
337 iccleub 12179 . . . . . . . . . . . . . . . . 17 (((𝐴 + 𝑋) ∈ ℝ* ∧ (𝐵 + 𝑋) ∈ ℝ*𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) → 𝑥 ≤ (𝐵 + 𝑋))
338328, 329, 330, 337syl3anc 1323 . . . . . . . . . . . . . . . 16 ((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) → 𝑥 ≤ (𝐵 + 𝑋))
339338adantr 481 . . . . . . . . . . . . . . 15 (((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) ∧ ¬ 𝑥 = (𝐴 + 𝑋)) → 𝑥 ≤ (𝐵 + 𝑋))
340319, 321, 325, 336, 339eliocd 39172 . . . . . . . . . . . . . 14 (((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) ∧ ¬ 𝑥 = (𝐴 + 𝑋)) → 𝑥 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)))
341340adantlr 750 . . . . . . . . . . . . 13 ((((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) ∧ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ ¬ 𝑥 = (𝐴 + 𝑋)) → 𝑥 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)))
342 simplr 791 . . . . . . . . . . . . 13 ((((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) ∧ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ ¬ 𝑥 = (𝐴 + 𝑋)) → ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶)
343341, 342, 68sylanbrc 697 . . . . . . . . . . . 12 ((((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) ∧ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ ¬ 𝑥 = (𝐴 + 𝑋)) → 𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})
344 elun2 3764 . . . . . . . . . . . 12 (𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} → 𝑥 ∈ ({(𝐴 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}))
345343, 344syl 17 . . . . . . . . . . 11 ((((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) ∧ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) ∧ ¬ 𝑥 = (𝐴 + 𝑋)) → 𝑥 ∈ ({(𝐴 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}))
346318, 345pm2.61dan 831 . . . . . . . . . 10 (((𝜑𝑥 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))) ∧ ∃𝑘 ∈ ℤ (𝑥 + (𝑘 · 𝑇)) ∈ 𝐶) → 𝑥 ∈ ({(𝐴 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}))
347309, 311, 314, 346syl21anc 1322 . . . . . . . . 9 ((𝜑𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) → 𝑥 ∈ ({(𝐴 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}))
348347ralrimiva 2961 . . . . . . . 8 (𝜑 → ∀𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}𝑥 ∈ ({(𝐴 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}))
349 dfss3 3577 . . . . . . . 8 ({𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ⊆ ({(𝐴 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ↔ ∀𝑥 ∈ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}𝑥 ∈ ({(𝐴 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}))
350348, 349sylibr 224 . . . . . . 7 (𝜑 → {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ⊆ ({(𝐴 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}))
351 ssfi 8132 . . . . . . 7 ((({(𝐴 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∈ Fin ∧ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ⊆ ({(𝐴 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)(,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶})) → {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ∈ Fin)
352308, 350, 351syl2anc 692 . . . . . 6 (𝜑 → {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ∈ Fin)
353 unfi 8179 . . . . . 6 (({(𝐴 + 𝑋), (𝐵 + 𝑋)} ∈ Fin ∧ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ∈ Fin) → ({(𝐴 + 𝑋), (𝐵 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∈ Fin)
35460, 352, 353sylancr 694 . . . . 5 (𝜑 → ({(𝐴 + 𝑋), (𝐵 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ∈ Fin)
35558, 354syl5eqel 2702 . . . 4 (𝜑𝐷 ∈ Fin)
356 prssi 4326 . . . . . . 7 (((𝐴 + 𝑋) ∈ ℝ ∧ (𝐵 + 𝑋) ∈ ℝ) → {(𝐴 + 𝑋), (𝐵 + 𝑋)} ⊆ ℝ)
3573, 5, 356syl2anc 692 . . . . . 6 (𝜑 → {(𝐴 + 𝑋), (𝐵 + 𝑋)} ⊆ ℝ)
358 ssrab2 3671 . . . . . . 7 {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ⊆ ((𝐴 + 𝑋)[,](𝐵 + 𝑋))
359358, 322syl5ss 3598 . . . . . 6 (𝜑 → {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶} ⊆ ℝ)
360357, 359unssd 3772 . . . . 5 (𝜑 → ({(𝐴 + 𝑋), (𝐵 + 𝑋)} ∪ {𝑦 ∈ ((𝐴 + 𝑋)[,](𝐵 + 𝑋)) ∣ ∃𝑘 ∈ ℤ (𝑦 + (𝑘 · 𝑇)) ∈ 𝐶}) ⊆ ℝ)
36158, 360syl5eqss 3633 . . . 4 (𝜑𝐷 ⊆ ℝ)
362 fourierdlem51.f . . . 4 𝐹 = (℩𝑓𝑓 Isom < , < ((0...((#‘𝐷) − 1)), 𝐷))
363 eqid 2621 . . . 4 ((#‘𝐷) − 1) = ((#‘𝐷) − 1)
364355, 361, 362, 363fourierdlem36 39693 . . 3 (𝜑𝐹 Isom < , < ((0...((#‘𝐷) − 1)), 𝐷))
365 isof1o 6533 . . . 4 (𝐹 Isom < , < ((0...((#‘𝐷) − 1)), 𝐷) → 𝐹:(0...((#‘𝐷) − 1))–1-1-onto𝐷)
366 f1ofo 6106 . . . 4 (𝐹:(0...((#‘𝐷) − 1))–1-1-onto𝐷𝐹:(0...((#‘𝐷) − 1))–onto𝐷)
367365, 366syl 17 . . 3 (𝐹 Isom < , < ((0...((#‘𝐷) − 1)), 𝐷) → 𝐹:(0...((#‘𝐷) − 1))–onto𝐷)
368 forn 6080 . . 3 (𝐹:(0...((#‘𝐷) − 1))–onto𝐷 → ran 𝐹 = 𝐷)
369364, 367, 3683syl 18 . 2 (𝜑 → ran 𝐹 = 𝐷)
37059, 369eleqtrrd 2701 1 (𝜑𝑋 ∈ ran 𝐹)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 384  w3a 1036   = wceq 1480  wcel 1987  wne 2790  wral 2907  wrex 2908  {crab 2911  cun 3557  wss 3559  {csn 4153  {cpr 4155   class class class wbr 4618  cmpt 4678  ran crn 5080  cres 5081  cio 5813  wf 5848  1-1wf1 5849  ontowfo 5850  1-1-ontowf1o 5851  cfv 5852   Isom wiso 5853  (class class class)co 6610  Fincfn 7907  cc 9886  cr 9887  0cc0 9888  1c1 9889   + caddc 9891   · cmul 9893  *cxr 10025   < clt 10026  cle 10027  cmin 10218   / cdiv 10636  cz 11329  +crp 11784  (,]cioc 12126  [,]cicc 12128  ...cfz 12276  cfl 12539  #chash 13065
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1719  ax-4 1734  ax-5 1836  ax-6 1885  ax-7 1932  ax-8 1989  ax-9 1996  ax-10 2016  ax-11 2031  ax-12 2044  ax-13 2245  ax-ext 2601  ax-rep 4736  ax-sep 4746  ax-nul 4754  ax-pow 4808  ax-pr 4872  ax-un 6909  ax-inf2 8490  ax-cnex 9944  ax-resscn 9945  ax-1cn 9946  ax-icn 9947  ax-addcl 9948  ax-addrcl 9949  ax-mulcl 9950  ax-mulrcl 9951  ax-mulcom 9952  ax-addass 9953  ax-mulass 9954  ax-distr 9955  ax-i2m1 9956  ax-1ne0 9957  ax-1rid 9958  ax-rnegex 9959  ax-rrecex 9960  ax-cnre 9961  ax-pre-lttri 9962  ax-pre-lttrn 9963  ax-pre-ltadd 9964  ax-pre-mulgt0 9965  ax-pre-sup 9966
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1037  df-3an 1038  df-tru 1483  df-ex 1702  df-nf 1707  df-sb 1878  df-eu 2473  df-mo 2474  df-clab 2608  df-cleq 2614  df-clel 2617  df-nfc 2750  df-ne 2791  df-nel 2894  df-ral 2912  df-rex 2913  df-reu 2914  df-rmo 2915  df-rab 2916  df-v 3191  df-sbc 3422  df-csb 3519  df-dif 3562  df-un 3564  df-in 3566  df-ss 3573  df-pss 3575  df-nul 3897  df-if 4064  df-pw 4137  df-sn 4154  df-pr 4156  df-tp 4158  df-op 4160  df-uni 4408  df-int 4446  df-iun 4492  df-br 4619  df-opab 4679  df-mpt 4680  df-tr 4718  df-eprel 4990  df-id 4994  df-po 5000  df-so 5001  df-fr 5038  df-se 5039  df-we 5040  df-xp 5085  df-rel 5086  df-cnv 5087  df-co 5088  df-dm 5089  df-rn 5090  df-res 5091  df-ima 5092  df-pred 5644  df-ord 5690  df-on 5691  df-lim 5692  df-suc 5693  df-iota 5815  df-fun 5854  df-fn 5855  df-f 5856  df-f1 5857  df-fo 5858  df-f1o 5859  df-fv 5860  df-isom 5861  df-riota 6571  df-ov 6613  df-oprab 6614  df-mpt2 6615  df-om 7020  df-1st 7120  df-2nd 7121  df-wrecs 7359  df-recs 7420  df-rdg 7458  df-1o 7512  df-oadd 7516  df-er 7694  df-en 7908  df-dom 7909  df-sdom 7910  df-fin 7911  df-sup 8300  df-inf 8301  df-oi 8367  df-card 8717  df-pnf 10028  df-mnf 10029  df-xr 10030  df-ltxr 10031  df-le 10032  df-sub 10220  df-neg 10221  df-div 10637  df-nn 10973  df-n0 11245  df-z 11330  df-uz 11640  df-rp 11785  df-ioc 12130  df-icc 12132  df-fz 12277  df-fl 12541  df-hash 13066
This theorem is referenced by:  fourierdlem113  39769
  Copyright terms: Public domain W3C validator