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 46858
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 490 . . . 4 ((𝜑𝑥 ∈ ℝ) → 𝑥 ∈ ℝ)
2 fourierdlem4.b . . . . . . . . . 10 (𝜑𝐵 ∈ ℝ)
32adantr 486 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ) → 𝐵 ∈ ℝ)
43, 1resubcld 11653 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ) → (𝐵𝑥) ∈ ℝ)
5 fourierdlem4.t . . . . . . . . . 10 𝑇 = (𝐵𝐴)
6 fourierdlem4.a . . . . . . . . . . 11 (𝜑𝐴 ∈ ℝ)
72, 6resubcld 11653 . . . . . . . . . 10 (𝜑 → (𝐵𝐴) ∈ ℝ)
85, 7eqeltrid 2869 . . . . . . . . 9 (𝜑𝑇 ∈ ℝ)
98adantr 486 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ) → 𝑇 ∈ ℝ)
105a1i 11 . . . . . . . . . 10 (𝜑𝑇 = (𝐵𝐴))
112recnd 11248 . . . . . . . . . . 11 (𝜑𝐵 ∈ ℂ)
126recnd 11248 . . . . . . . . . . 11 (𝜑𝐴 ∈ ℂ)
13 fourierdlem4.altb . . . . . . . . . . . 12 (𝜑𝐴 < 𝐵)
146, 13gtned 11356 . . . . . . . . . . 11 (𝜑𝐵𝐴)
1511, 12, 14subne0d 11589 . . . . . . . . . 10 (𝜑 → (𝐵𝐴) ≠ 0)
1610, 15eqnetrd 3027 . . . . . . . . 9 (𝜑𝑇 ≠ 0)
1716adantr 486 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ) → 𝑇 ≠ 0)
184, 9, 17redivcld 12054 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → ((𝐵𝑥) / 𝑇) ∈ ℝ)
1918flcld 13845 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → (⌊‘((𝐵𝑥) / 𝑇)) ∈ ℤ)
2019zred 12712 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (⌊‘((𝐵𝑥) / 𝑇)) ∈ ℝ)
2120, 9remulcld 11250 . . . 4 ((𝜑𝑥 ∈ ℝ) → ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇) ∈ ℝ)
221, 21readdcld 11249 . . 3 ((𝜑𝑥 ∈ ℝ) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ ℝ)
236adantr 486 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ) → 𝐴 ∈ ℝ)
2423, 1resubcld 11653 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → (𝐴𝑥) ∈ ℝ)
2524, 9, 17redivcld 12054 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → ((𝐴𝑥) / 𝑇) ∈ ℝ)
2625, 9remulcld 11250 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (((𝐴𝑥) / 𝑇) · 𝑇) ∈ ℝ)
2711addridd 11421 . . . . . . . . . . . . . . 15 (𝜑 → (𝐵 + 0) = 𝐵)
2827eqcomd 2771 . . . . . . . . . . . . . 14 (𝜑𝐵 = (𝐵 + 0))
2911, 12subcld 11580 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐵𝐴) ∈ ℂ)
3029subidd 11568 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝐵𝐴) − (𝐵𝐴)) = 0)
3130eqcomd 2771 . . . . . . . . . . . . . . 15 (𝜑 → 0 = ((𝐵𝐴) − (𝐵𝐴)))
3231oveq2d 7432 . . . . . . . . . . . . . 14 (𝜑 → (𝐵 + 0) = (𝐵 + ((𝐵𝐴) − (𝐵𝐴))))
3311, 29, 29addsub12d 11603 . . . . . . . . . . . . . . 15 (𝜑 → (𝐵 + ((𝐵𝐴) − (𝐵𝐴))) = ((𝐵𝐴) + (𝐵 − (𝐵𝐴))))
3411, 12nncand 11585 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐵 − (𝐵𝐴)) = 𝐴)
3534oveq2d 7432 . . . . . . . . . . . . . . 15 (𝜑 → ((𝐵𝐴) + (𝐵 − (𝐵𝐴))) = ((𝐵𝐴) + 𝐴))
3629, 12addcomd 11423 . . . . . . . . . . . . . . . 16 (𝜑 → ((𝐵𝐴) + 𝐴) = (𝐴 + (𝐵𝐴)))
3710eqcomd 2771 . . . . . . . . . . . . . . . . 17 (𝜑 → (𝐵𝐴) = 𝑇)
3837oveq2d 7432 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐴 + (𝐵𝐴)) = (𝐴 + 𝑇))
3936, 38eqtrd 2800 . . . . . . . . . . . . . . 15 (𝜑 → ((𝐵𝐴) + 𝐴) = (𝐴 + 𝑇))
4033, 35, 393eqtrd 2804 . . . . . . . . . . . . . 14 (𝜑 → (𝐵 + ((𝐵𝐴) − (𝐵𝐴))) = (𝐴 + 𝑇))
4128, 32, 403eqtrd 2804 . . . . . . . . . . . . 13 (𝜑𝐵 = (𝐴 + 𝑇))
4241adantr 486 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ℝ) → 𝐵 = (𝐴 + 𝑇))
4342oveq1d 7431 . . . . . . . . . . 11 ((𝜑𝑥 ∈ ℝ) → (𝐵𝑥) = ((𝐴 + 𝑇) − 𝑥))
4412adantr 486 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ℝ) → 𝐴 ∈ ℂ)
459recnd 11248 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ℝ) → 𝑇 ∈ ℂ)
461recnd 11248 . . . . . . . . . . . 12 ((𝜑𝑥 ∈ ℝ) → 𝑥 ∈ ℂ)
4744, 45, 46addsubd 11601 . . . . . . . . . . 11 ((𝜑𝑥 ∈ ℝ) → ((𝐴 + 𝑇) − 𝑥) = ((𝐴𝑥) + 𝑇))
4843, 47eqtrd 2800 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℝ) → (𝐵𝑥) = ((𝐴𝑥) + 𝑇))
4948oveq1d 7431 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ) → ((𝐵𝑥) / 𝑇) = (((𝐴𝑥) + 𝑇) / 𝑇))
5044, 46subcld 11580 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℝ) → (𝐴𝑥) ∈ ℂ)
5150, 45, 45, 17divdird 12040 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ) → (((𝐴𝑥) + 𝑇) / 𝑇) = (((𝐴𝑥) / 𝑇) + (𝑇 / 𝑇)))
525, 29eqeltrid 2869 . . . . . . . . . . . 12 (𝜑𝑇 ∈ ℂ)
5352, 16dividd 12000 . . . . . . . . . . 11 (𝜑 → (𝑇 / 𝑇) = 1)
5453adantr 486 . . . . . . . . . 10 ((𝜑𝑥 ∈ ℝ) → (𝑇 / 𝑇) = 1)
5554oveq2d 7432 . . . . . . . . 9 ((𝜑𝑥 ∈ ℝ) → (((𝐴𝑥) / 𝑇) + (𝑇 / 𝑇)) = (((𝐴𝑥) / 𝑇) + 1))
5649, 51, 553eqtrd 2804 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ) → ((𝐵𝑥) / 𝑇) = (((𝐴𝑥) / 𝑇) + 1))
5756fveq2d 6889 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → (⌊‘((𝐵𝑥) / 𝑇)) = (⌊‘(((𝐴𝑥) / 𝑇) + 1)))
5857oveq1d 7431 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇) = ((⌊‘(((𝐴𝑥) / 𝑇) + 1)) · 𝑇))
5958, 21eqeltrrd 2866 . . . . 5 ((𝜑𝑥 ∈ ℝ) → ((⌊‘(((𝐴𝑥) / 𝑇) + 1)) · 𝑇) ∈ ℝ)
60 peano2re 11394 . . . . . . . 8 (((𝐴𝑥) / 𝑇) ∈ ℝ → (((𝐴𝑥) / 𝑇) + 1) ∈ ℝ)
6125, 60syl 18 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → (((𝐴𝑥) / 𝑇) + 1) ∈ ℝ)
62 reflcl 13843 . . . . . . 7 ((((𝐴𝑥) / 𝑇) + 1) ∈ ℝ → (⌊‘(((𝐴𝑥) / 𝑇) + 1)) ∈ ℝ)
6361, 62syl 18 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → (⌊‘(((𝐴𝑥) / 𝑇) + 1)) ∈ ℝ)
646, 2posdifd 11812 . . . . . . . . . 10 (𝜑 → (𝐴 < 𝐵 ↔ 0 < (𝐵𝐴)))
6513, 64mpbid 235 . . . . . . . . 9 (𝜑 → 0 < (𝐵𝐴))
6665, 10breqtrrd 5141 . . . . . . . 8 (𝜑 → 0 < 𝑇)
678, 66elrpd 13069 . . . . . . 7 (𝜑𝑇 ∈ ℝ+)
6867adantr 486 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → 𝑇 ∈ ℝ+)
69 flltp1 13847 . . . . . . . 8 (((𝐴𝑥) / 𝑇) ∈ ℝ → ((𝐴𝑥) / 𝑇) < ((⌊‘((𝐴𝑥) / 𝑇)) + 1))
7025, 69syl 18 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → ((𝐴𝑥) / 𝑇) < ((⌊‘((𝐴𝑥) / 𝑇)) + 1))
71 1zzd 12636 . . . . . . . 8 ((𝜑𝑥 ∈ ℝ) → 1 ∈ ℤ)
72 fladdz 13872 . . . . . . . 8 ((((𝐴𝑥) / 𝑇) ∈ ℝ ∧ 1 ∈ ℤ) → (⌊‘(((𝐴𝑥) / 𝑇) + 1)) = ((⌊‘((𝐴𝑥) / 𝑇)) + 1))
7325, 71, 72syl2anc 596 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → (⌊‘(((𝐴𝑥) / 𝑇) + 1)) = ((⌊‘((𝐴𝑥) / 𝑇)) + 1))
7470, 73breqtrrd 5141 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → ((𝐴𝑥) / 𝑇) < (⌊‘(((𝐴𝑥) / 𝑇) + 1)))
7525, 63, 68, 74ltmul1dd 13127 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (((𝐴𝑥) / 𝑇) · 𝑇) < ((⌊‘(((𝐴𝑥) / 𝑇) + 1)) · 𝑇))
7626, 59, 1, 75ltadd2dd 11380 . . . 4 ((𝜑𝑥 ∈ ℝ) → (𝑥 + (((𝐴𝑥) / 𝑇) · 𝑇)) < (𝑥 + ((⌊‘(((𝐴𝑥) / 𝑇) + 1)) · 𝑇)))
7750, 45, 17divcan1d 12003 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → (((𝐴𝑥) / 𝑇) · 𝑇) = (𝐴𝑥))
7877oveq2d 7432 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (𝑥 + (((𝐴𝑥) / 𝑇) · 𝑇)) = (𝑥 + (𝐴𝑥)))
7946, 44pncan3d 11583 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (𝑥 + (𝐴𝑥)) = 𝐴)
8078, 79eqtrd 2800 . . . 4 ((𝜑𝑥 ∈ ℝ) → (𝑥 + (((𝐴𝑥) / 𝑇) · 𝑇)) = 𝐴)
8158oveq2d 7432 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) = (𝑥 + ((⌊‘(((𝐴𝑥) / 𝑇) + 1)) · 𝑇)))
8281eqcomd 2771 . . . 4 ((𝜑𝑥 ∈ ℝ) → (𝑥 + ((⌊‘(((𝐴𝑥) / 𝑇) + 1)) · 𝑇)) = (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)))
8376, 80, 823brtr3d 5144 . . 3 ((𝜑𝑥 ∈ ℝ) → 𝐴 < (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)))
8418, 9remulcld 11250 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (((𝐵𝑥) / 𝑇) · 𝑇) ∈ ℝ)
85 flle 13846 . . . . . . 7 (((𝐵𝑥) / 𝑇) ∈ ℝ → (⌊‘((𝐵𝑥) / 𝑇)) ≤ ((𝐵𝑥) / 𝑇))
8618, 85syl 18 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → (⌊‘((𝐵𝑥) / 𝑇)) ≤ ((𝐵𝑥) / 𝑇))
8720, 18, 68lemul1d 13115 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → ((⌊‘((𝐵𝑥) / 𝑇)) ≤ ((𝐵𝑥) / 𝑇) ↔ ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇) ≤ (((𝐵𝑥) / 𝑇) · 𝑇)))
8886, 87mpbid 235 . . . . 5 ((𝜑𝑥 ∈ ℝ) → ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇) ≤ (((𝐵𝑥) / 𝑇) · 𝑇))
8921, 84, 1, 88leadd2dd 11840 . . . 4 ((𝜑𝑥 ∈ ℝ) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ≤ (𝑥 + (((𝐵𝑥) / 𝑇) · 𝑇)))
904recnd 11248 . . . . . . 7 ((𝜑𝑥 ∈ ℝ) → (𝐵𝑥) ∈ ℂ)
9190, 45, 17divcan1d 12003 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → (((𝐵𝑥) / 𝑇) · 𝑇) = (𝐵𝑥))
9291oveq2d 7432 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (𝑥 + (((𝐵𝑥) / 𝑇) · 𝑇)) = (𝑥 + (𝐵𝑥)))
9311adantr 486 . . . . . 6 ((𝜑𝑥 ∈ ℝ) → 𝐵 ∈ ℂ)
9446, 93pncan3d 11583 . . . . 5 ((𝜑𝑥 ∈ ℝ) → (𝑥 + (𝐵𝑥)) = 𝐵)
9592, 94eqtrd 2800 . . . 4 ((𝜑𝑥 ∈ ℝ) → (𝑥 + (((𝐵𝑥) / 𝑇) · 𝑇)) = 𝐵)
9689, 95breqtrd 5139 . . 3 ((𝜑𝑥 ∈ ℝ) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ≤ 𝐵)
9723rexrd 11270 . . . 4 ((𝜑𝑥 ∈ ℝ) → 𝐴 ∈ ℝ*)
98 elioc2 13448 . . . 4 ((𝐴 ∈ ℝ*𝐵 ∈ ℝ) → ((𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ (𝐴(,]𝐵) ↔ ((𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ ℝ ∧ 𝐴 < (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∧ (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ≤ 𝐵)))
9997, 3, 98syl2anc 596 . . 3 ((𝜑𝑥 ∈ ℝ) → ((𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ (𝐴(,]𝐵) ↔ ((𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ ℝ ∧ 𝐴 < (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∧ (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ≤ 𝐵)))
10022, 83, 96, 99mpbir3and 1361 . 2 ((𝜑𝑥 ∈ ℝ) → (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)) ∈ (𝐴(,]𝐵))
101 fourierdlem4.e . 2 𝐸 = (𝑥 ∈ ℝ ↦ (𝑥 + ((⌊‘((𝐵𝑥) / 𝑇)) · 𝑇)))
102100, 101fmptd 7113 1 (𝜑𝐸:ℝ⟶(𝐴(,]𝐵))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 401  w3a 1103   = wceq 1570  wcel 2146  wne 2960   class class class wbr 5111  cmpt 5194  wf 6536  cfv 6540  (class class class)co 7416  cc 11109  cr 11110  0cc0 11111  1c1 11112   + caddc 11114   · cmul 11116  *cxr 11253   < clt 11254  cle 11255  cmin 11452   / cdiv 11882  cz 12602  +crp 13028  (,]cioc 13385  cfl 13837
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2737  ax-sep 5259  ax-nul 5271  ax-pow 5338  ax-pr 5406  ax-un 7738  ax-cnex 11167  ax-resscn 11168  ax-1cn 11169  ax-icn 11170  ax-addcl 11171  ax-addrcl 11172  ax-mulcl 11173  ax-mulrcl 11174  ax-mulcom 11175  ax-addass 11176  ax-mulass 11177  ax-distr 11178  ax-i2m1 11179  ax-1ne0 11180  ax-1rid 11181  ax-rnegex 11182  ax-rrecex 11183  ax-cnre 11184  ax-pre-lttri 11185  ax-pre-lttrn 11186  ax-pre-ltadd 11187  ax-pre-mulgt0 11188  ax-pre-sup 11189
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-nel 3067  df-ral 3082  df-rex 3092  df-rmo 3371  df-reu 3372  df-rab 3419  df-v 3459  df-sbc 3747  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4287  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4875  df-iun 4960  df-br 5112  df-opab 5176  df-mpt 5195  df-tr 5221  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6306  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6496  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-riota 7373  df-ov 7419  df-oprab 7420  df-mpo 7421  df-om 7865  df-2nd 7989  df-frecs 8280  df-wrecs 8311  df-recs 8360  df-rdg 8399  df-er 8696  df-en 8946  df-dom 8947  df-sdom 8948  df-sup 9405  df-inf 9406  df-pnf 11256  df-mnf 11257  df-xr 11258  df-ltxr 11259  df-le 11260  df-sub 11454  df-neg 11455  df-div 11883  df-nn 12245  df-n0 12516  df-z 12603  df-uz 12875  df-rp 13029  df-ioc 13389  df-fl 13839
This theorem is used by:  fourierdlem19  46873  fourierdlem37  46891  fourierdlem41  46895  fourierdlem48  46901  fourierdlem49  46902  fourierdlem51  46904  fourierdlem63  46916  fourierdlem65  46918  fourierdlem71  46924  fourierdlem79  46932  fourierdlem89  46942  fourierdlem90  46943  fourierdlem91  46944  fourierdlem102  46955  fourierdlem114  46967
  Copyright terms: Public domain W3C validator