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

Theorem fourierdlem4 46554
Description: 𝐸 is a function that maps any point to a periodic corresponding point in (𝐴, 𝐵]. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
fourierdlem4.a (𝜑𝐴 ∈ ℝ)
fourierdlem4.b (𝜑𝐵 ∈ ℝ)
fourierdlem4.altb (𝜑𝐴 < 𝐵)
fourierdlem4.t 𝑇 = (𝐵𝐴)
fourierdlem4.e 𝐸 = (𝑥 ∈ ℝ ↦ (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)))
Assertion
Ref Expression
fourierdlem4 (𝜑𝐸:ℝ⟶(𝐴(,]𝐵))
Distinct variable groups:   𝑥,𝐴   𝑥,𝐵   𝑥,𝑇   𝜑,𝑥
Allowed substitution hint:   𝐸(𝑥)

Proof of Theorem fourierdlem4
StepHypRef Expression
1 simpr 485 . . . 4 ((𝜑𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
2 fourierdlem4.b . . . . . . . . . 10 (𝜑𝐵 ∈ ℝ)
32adantr 481 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ) → 𝐵 ∈ ℝ)
43, 1resubcld 11569 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ) → (𝐵𝑥) ∈ ℝ)
5 fourierdlem4.t . . . . . . . . . 10 𝑇 = (𝐵𝐴)
6 fourierdlem4.a . . . . . . . . . . 11 (𝜑𝐴 ∈ ℝ)
72, 6resubcld 11569 . . . . . . . . . 10 (𝜑 → (𝐵𝐴) ∈ ℝ)
85, 7eqeltrid 2843 . . . . . . . . 9 (𝜑𝑇 ∈ ℝ)
98adantr 481 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ) → 𝑇 ∈ ℝ)
105a1i 11 . . . . . . . . . 10 (𝜑𝑇 = (𝐵𝐴))
112recnd 11164 . . . . . . . . . . 11 (𝜑𝐵 ∈ ℂ)
126recnd 11164 . . . . . . . . . . 11 (𝜑𝐴 ∈ ℂ)
13 fourierdlem4.altb . . . . . . . . . . . 12 (𝜑𝐴 < 𝐵)
146, 13gtned 11272 . . . . . . . . . . 11 (𝜑𝐵𝐴)
1511, 12, 14subne0d 11505 . . . . . . . . . 10 (𝜑 → (𝐵𝐴) ≠ 0)
1610, 15eqnetrd 3001 . . . . . . . . 9 (𝜑𝑇 ≠ 0)
1716adantr 481 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ) → 𝑇 ≠ 0)
184, 9, 17redivcld 11974 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → ((𝐵𝑥) / 𝑇) ∈ ℝ)
1918flcld 13748 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → (⌊‘((𝐵𝑥) / 𝑇)) ∈ ℤ)
2019zred 12624 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (⌊‘((𝐵𝑥) / 𝑇)) ∈ ℝ)
2120, 9remulcld 11166 . . . 4 ((𝜑𝑥 ∈ ℝ) → ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇) ∈ ℝ)
221, 21readdcld 11165 . . 3 ((𝜑𝑥 ∈ ℝ) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ ℝ)
236adantr 481 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ) → 𝐴 ∈ ℝ)
2423, 1resubcld 11569 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → (𝐴𝑥) ∈ ℝ)
2524, 9, 17redivcld 11974 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → ((𝐴𝑥) / 𝑇) ∈ ℝ)
2625, 9remulcld 11166 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (((𝐴𝑥) / 𝑇) · 𝑇) ∈ ℝ)
2711addridd 11337 . . . . . . . . . . . . . . 15 (𝜑 → (𝐵 + 0) = 𝐵)
2827eqcomd 2745 . . . . . . . . . . . . . 14 (𝜑𝐵 = (𝐵 + 0))
2911, 12subcld 11496 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐵𝐴) ∈ ℂ)
3029subidd 11484 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝐵𝐴) − (𝐵𝐴)) = 0)
3130eqcomd 2745 . . . . . . . . . . . . . . 15 (𝜑 → 0 = ((𝐵𝐴) − (𝐵𝐴)))
3231oveq2d 7372 . . . . . . . . . . . . . 14 (𝜑 → (𝐵 + 0) = (𝐵 + ((𝐵𝐴) − (𝐵𝐴))))
3311, 29, 29addsub12d 11519 . . . . . . . . . . . . . . 15 (𝜑 → (𝐵 + ((𝐵𝐴) − (𝐵𝐴))) = ((𝐵𝐴) + (𝐵 − (𝐵𝐴))))
3411, 12nncand 11501 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐵 − (𝐵𝐴)) = 𝐴)
3534oveq2d 7372 . . . . . . . . . . . . . . 15 (𝜑 → ((𝐵𝐴) + (𝐵 − (𝐵𝐴))) = ((𝐵𝐴) + 𝐴))
3629, 12addcomd 11339 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝐵𝐴) + 𝐴) = (𝐴 + (𝐵𝐴)))
3710eqcomd 2745 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐵𝐴) = 𝑇)
3837oveq2d 7372 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐴 + (𝐵𝐴)) = (𝐴 + 𝑇))
3936, 38eqtrd 2774 . . . . . . . . . . . . . . 15 (𝜑 → ((𝐵𝐴) + 𝐴) = (𝐴 + 𝑇))
4033, 35, 393eqtrd 2778 . . . . . . . . . . . . . 14 (𝜑 → (𝐵 + ((𝐵𝐴) − (𝐵𝐴))) = (𝐴 + 𝑇))
4128, 32, 403eqtrd 2778 . . . . . . . . . . . . 13 (𝜑𝐵 = (𝐴 + 𝑇))
4241adantr 481 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ℝ) → 𝐵 = (𝐴 + 𝑇))
4342oveq1d 7371 . . . . . . . . . . 11 ((𝜑𝑥 ∈ ℝ) → (𝐵𝑥) = ((𝐴 + 𝑇) − 𝑥))
4412adantr 481 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ℝ) → 𝐴 ∈ ℂ)
459recnd 11164 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ℝ) → 𝑇 ∈ ℂ)
461recnd 11164 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ℝ) → 𝑥 ∈ ℂ)
4744, 45, 46addsubd 11517 . . . . . . . . . . 11 ((𝜑𝑥 ∈ ℝ) → ((𝐴 + 𝑇) − 𝑥) = ((𝐴𝑥) + 𝑇))
4843, 47eqtrd 2774 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℝ) → (𝐵𝑥) = ((𝐴𝑥) + 𝑇))
4948oveq1d 7371 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ) → ((𝐵𝑥) / 𝑇) = (((𝐴𝑥) + 𝑇) / 𝑇))
5044, 46subcld 11496 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℝ) → (𝐴𝑥) ∈ ℂ)
5150, 45, 45, 17divdird 11960 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ) → (((𝐴𝑥) + 𝑇) / 𝑇) = (((𝐴𝑥) / 𝑇) + (𝑇 / 𝑇)))
525, 29eqeltrid 2843 . . . . . . . . . . . 12 (𝜑𝑇 ∈ ℂ)
5352, 16dividd 11920 . . . . . . . . . . 11 (𝜑 → (𝑇 / 𝑇) = 1)
5453adantr 481 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℝ) → (𝑇 / 𝑇) = 1)
5554oveq2d 7372 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ) → (((𝐴𝑥) / 𝑇) + (𝑇 / 𝑇)) = (((𝐴𝑥) / 𝑇) + 1))
5649, 51, 553eqtrd 2778 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ) → ((𝐵𝑥) / 𝑇) = (((𝐴𝑥) / 𝑇) + 1))
5756fveq2d 6831 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → (⌊‘((𝐵𝑥) / 𝑇)) = (⌊‘(((𝐴𝑥) / 𝑇) + 1)))
5857oveq1d 7371 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇) = ((⌊‘(((𝐴𝑥) / 𝑇) + 1)) · 𝑇))
5958, 21eqeltrrd 2840 . . . . 5 ((𝜑𝑥 ∈ ℝ) → ((⌊‘(((𝐴𝑥) / 𝑇) + 1)) · 𝑇) ∈ ℝ)
60 peano2re 11310 . . . . . . . 8 (((𝐴𝑥) / 𝑇) ∈ ℝ → (((𝐴𝑥) / 𝑇) + 1) ∈ ℝ)
6125, 60syl 17 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → (((𝐴𝑥) / 𝑇) + 1) ∈ ℝ)
62 reflcl 13746 . . . . . . 7 ((((𝐴𝑥) / 𝑇) + 1) ∈ ℝ → (⌊‘(((𝐴𝑥) / 𝑇) + 1)) ∈ ℝ)
6361, 62syl 17 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → (⌊‘(((𝐴𝑥) / 𝑇) + 1)) ∈ ℝ)
646, 2posdifd 11728 . . . . . . . . . 10 (𝜑 → (𝐴 < 𝐵 ↔ 0 < (𝐵𝐴)))
6513, 64mpbid 233 . . . . . . . . 9 (𝜑 → 0 < (𝐵𝐴))
6665, 10breqtrrd 5100 . . . . . . . 8 (𝜑 → 0 < 𝑇)
678, 66elrpd 12974 . . . . . . 7 (𝜑𝑇 ∈ ℝ+)
6867adantr 481 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → 𝑇 ∈ ℝ+)
69 flltp1 13750 . . . . . . . 8 (((𝐴𝑥) / 𝑇) ∈ ℝ → ((𝐴𝑥) / 𝑇) < ((⌊‘((𝐴𝑥) / 𝑇)) + 1))
7025, 69syl 17 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → ((𝐴𝑥) / 𝑇) < ((⌊‘((𝐴𝑥) / 𝑇)) + 1))
71 1zzd 12549 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ) → 1 ∈ ℤ)
72 fladdz 13775 . . . . . . . 8 ((((𝐴𝑥) / 𝑇) ∈ ℝ ∧ 1 ∈ ℤ) → (⌊‘(((𝐴𝑥) / 𝑇) + 1)) = ((⌊‘((𝐴𝑥) / 𝑇)) + 1))
7325, 71, 72syl2anc 590 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → (⌊‘(((𝐴𝑥) / 𝑇) + 1)) = ((⌊‘((𝐴𝑥) / 𝑇)) + 1))
7470, 73breqtrrd 5100 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → ((𝐴𝑥) / 𝑇) < (⌊‘(((𝐴𝑥) / 𝑇) + 1)))
7525, 63, 68, 74ltmul1dd 13032 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (((𝐴𝑥) / 𝑇) · 𝑇) < ((⌊‘(((𝐴𝑥) / 𝑇) + 1)) · 𝑇))
7626, 59, 1, 75ltadd2dd 11296 . . . 4 ((𝜑𝑥 ∈ ℝ) → (𝑥 + (((𝐴𝑥) / 𝑇) · 𝑇)) < (𝑥 + ((⌊‘(((𝐴𝑥) / 𝑇) + 1)) · 𝑇)))
7750, 45, 17divcan1d 11923 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → (((𝐴𝑥) / 𝑇) · 𝑇) = (𝐴𝑥))
7877oveq2d 7372 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (𝑥 + (((𝐴𝑥) / 𝑇) · 𝑇)) = (𝑥 + (𝐴𝑥)))
7946, 44pncan3d 11499 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (𝑥 + (𝐴𝑥)) = 𝐴)
8078, 79eqtrd 2774 . . . 4 ((𝜑𝑥 ∈ ℝ) → (𝑥 + (((𝐴𝑥) / 𝑇) · 𝑇)) = 𝐴)
8158oveq2d 7372 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) = (𝑥 + ((⌊‘(((𝐴𝑥) / 𝑇) + 1)) · 𝑇)))
8281eqcomd 2745 . . . 4 ((𝜑𝑥 ∈ ℝ) → (𝑥 + ((⌊‘(((𝐴𝑥) / 𝑇) + 1)) · 𝑇)) = (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)))
8376, 80, 823brtr3d 5103 . . 3 ((𝜑𝑥 ∈ ℝ) → 𝐴 < (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)))
8418, 9remulcld 11166 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (((𝐵𝑥) / 𝑇) · 𝑇) ∈ ℝ)
85 flle 13749 . . . . . . 7 (((𝐵𝑥) / 𝑇) ∈ ℝ → (⌊‘((𝐵𝑥) / 𝑇)) ≤ ((𝐵𝑥) / 𝑇))
8618, 85syl 17 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → (⌊‘((𝐵𝑥) / 𝑇)) ≤ ((𝐵𝑥) / 𝑇))
8720, 18, 68lemul1d 13020 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → ((⌊‘((𝐵𝑥) / 𝑇)) ≤ ((𝐵𝑥) / 𝑇) ↔ ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇) ≤ (((𝐵𝑥) / 𝑇) · 𝑇)))
8886, 87mpbid 233 . . . . 5 ((𝜑𝑥 ∈ ℝ) → ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇) ≤ (((𝐵𝑥) / 𝑇) · 𝑇))
8921, 84, 1, 88leadd2dd 11756 . . . 4 ((𝜑𝑥 ∈ ℝ) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ≤ (𝑥 + (((𝐵𝑥) / 𝑇) · 𝑇)))
904recnd 11164 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → (𝐵𝑥) ∈ ℂ)
9190, 45, 17divcan1d 11923 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → (((𝐵𝑥) / 𝑇) · 𝑇) = (𝐵𝑥))
9291oveq2d 7372 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (𝑥 + (((𝐵𝑥) / 𝑇) · 𝑇)) = (𝑥 + (𝐵𝑥)))
9311adantr 481 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → 𝐵 ∈ ℂ)
9446, 93pncan3d 11499 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (𝑥 + (𝐵𝑥)) = 𝐵)
9592, 94eqtrd 2774 . . . 4 ((𝜑𝑥 ∈ ℝ) → (𝑥 + (((𝐵𝑥) / 𝑇) · 𝑇)) = 𝐵)
9689, 95breqtrd 5098 . . 3 ((𝜑𝑥 ∈ ℝ) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ≤ 𝐵)
9723rexrd 11186 . . . 4 ((𝜑𝑥 ∈ ℝ) → 𝐴 ∈ ℝ*)
98 elioc2 13353 . . . 4 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ) → ((𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ (𝐴(,]𝐵) ↔ ((𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ ℝ ∧ 𝐴 < (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∧ (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ≤ 𝐵)))
9997, 3, 98syl2anc 590 . . 3 ((𝜑𝑥 ∈ ℝ) → ((𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ (𝐴(,]𝐵) ↔ ((𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ ℝ ∧ 𝐴 < (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∧ (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ≤ 𝐵)))
10022, 83, 96, 99mpbir3and 1349 . 2 ((𝜑𝑥 ∈ ℝ) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ (𝐴(,]𝐵))
101 fourierdlem4.e . 2 𝐸 = (𝑥 ∈ ℝ ↦ (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)))
102100, 101fmptd 7055 1 (𝜑𝐸:ℝ⟶(𝐴(,]𝐵))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 207  wa 396  w3a 1092   = wceq 1547  wcel 2119  wne 2934   class class class wbr 5072  cmpt 5153  wf 6481  cfv 6485  (class class class)co 7356  cc 11027  cr 11028  0cc0 11029  1c1 11030   + caddc 11032   · cmul 11034  *cxr 11169   < clt 11170  cle 11171  cmin 11368   / cdiv 11798  cz 12515  +crp 12933  (,]cioc 13290  cfl 13740
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2711  ax-sep 5218  ax-nul 5228  ax-pow 5294  ax-pr 5362  ax-un 7678  ax-cnex 11085  ax-resscn 11086  ax-1cn 11087  ax-icn 11088  ax-addcl 11089  ax-addrcl 11090  ax-mulcl 11091  ax-mulrcl 11092  ax-mulcom 11093  ax-addass 11094  ax-mulass 11095  ax-distr 11096  ax-i2m1 11097  ax-1ne0 11098  ax-1rid 11099  ax-rnegex 11100  ax-rrecex 11101  ax-cnre 11102  ax-pre-lttri 11103  ax-pre-lttrn 11104  ax-pre-ltadd 11105  ax-pre-mulgt0 11106  ax-pre-sup 11107
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2718  df-cleq 2731  df-clel 2814  df-nfc 2888  df-ne 2935  df-nel 3039  df-ral 3054  df-rex 3064  df-rmo 3344  df-reu 3345  df-rab 3392  df-v 3433  df-sbc 3724  df-csb 3832  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3903  df-nul 4262  df-if 4455  df-pw 4531  df-sn 4556  df-pr 4558  df-op 4562  df-uni 4839  df-iun 4923  df-br 5073  df-opab 5135  df-mpt 5154  df-tr 5180  df-id 5513  df-eprel 5518  df-po 5526  df-so 5527  df-fr 5571  df-we 5573  df-xp 5624  df-rel 5625  df-cnv 5626  df-co 5627  df-dm 5628  df-rn 5629  df-res 5630  df-ima 5631  df-pred 6252  df-ord 6313  df-on 6314  df-lim 6315  df-suc 6316  df-iota 6441  df-fun 6487  df-fn 6488  df-f 6489  df-f1 6490  df-fo 6491  df-f1o 6492  df-fv 6493  df-riota 7313  df-ov 7359  df-oprab 7360  df-mpo 7361  df-om 7807  df-2nd 7932  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339  df-er 8633  df-en 8884  df-dom 8885  df-sdom 8886  df-sup 9345  df-inf 9346  df-pnf 11172  df-mnf 11173  df-xr 11174  df-ltxr 11175  df-le 11176  df-sub 11370  df-neg 11371  df-div 11799  df-nn 12166  df-n0 12429  df-z 12516  df-uz 12780  df-rp 12934  df-ioc 13294  df-fl 13742
This theorem is referenced by:  fourierdlem19  46569  fourierdlem37  46587  fourierdlem41  46591  fourierdlem48  46597  fourierdlem49  46598  fourierdlem51  46600  fourierdlem63  46612  fourierdlem65  46614  fourierdlem71  46620  fourierdlem79  46628  fourierdlem89  46638  fourierdlem90  46639  fourierdlem91  46640  fourierdlem102  46651  fourierdlem114  46663
  Copyright terms: Public domain W3C validator