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

Theorem fourierdlem64 45617
Description: The partition 𝑉 is finer than 𝑄, when 𝑄 is moved on the same interval where 𝑉 lies. (Contributed by Glauco Siliprandi, 11-Dec-2019.)
Hypotheses
Ref Expression
fourierdlem64.t 𝑇 = (𝐡 βˆ’ 𝐴)
fourierdlem64.p 𝑃 = (π‘š ∈ β„• ↦ {𝑝 ∈ (ℝ ↑m (0...π‘š)) ∣ (((π‘β€˜0) = 𝐴 ∧ (π‘β€˜π‘š) = 𝐡) ∧ βˆ€π‘– ∈ (0..^π‘š)(π‘β€˜π‘–) < (π‘β€˜(𝑖 + 1)))})
fourierdlem64.m (πœ‘ β†’ 𝑀 ∈ β„•)
fourierdlem64.q (πœ‘ β†’ 𝑄 ∈ (π‘ƒβ€˜π‘€))
fourierdlem64.c (πœ‘ β†’ 𝐢 ∈ ℝ)
fourierdlem64.d (πœ‘ β†’ 𝐷 ∈ ℝ)
fourierdlem64.cltd (πœ‘ β†’ 𝐢 < 𝐷)
fourierdlem64.h 𝐻 = ({𝐢, 𝐷} βˆͺ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄})
fourierdlem64.n 𝑁 = ((β™―β€˜π») βˆ’ 1)
fourierdlem64.v 𝑉 = (℩𝑓𝑓 Isom < , < ((0...𝑁), 𝐻))
fourierdlem64.j (πœ‘ β†’ 𝐽 ∈ (0..^𝑁))
fourierdlem64.l 𝐿 = sup({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < )
fourierdlem64.i 𝐼 = sup({𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < )
Assertion
Ref Expression
fourierdlem64 (πœ‘ β†’ ((𝐼 ∈ (0..^𝑀) ∧ 𝐿 ∈ β„€) ∧ βˆƒπ‘– ∈ (0..^𝑀)βˆƒπ‘™ ∈ β„€ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜π‘–) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝑖 + 1)) + (𝑙 Β· 𝑇)))))
Distinct variable groups:   𝐴,𝑖,π‘š,𝑝   𝐡,𝑖,π‘š,𝑝   𝐢,π‘š,𝑝   𝑦,𝐢   𝐷,π‘š,𝑝   𝑦,𝐷   𝑓,𝐻   𝑗,𝐻   𝑦,𝐻   𝑖,𝐼,π‘˜,𝑦   𝑗,𝐼,π‘˜   𝐼,𝑙,𝑖   𝑗,𝐽,π‘˜   𝑖,𝐽,𝑙   𝑗,𝐿,π‘˜   𝐿,𝑙   𝑦,𝐿   𝑗,𝑀,π‘˜   𝑖,𝑀,π‘š,𝑝   𝑓,𝑁   𝑖,𝑁,π‘š,𝑝   𝑗,𝑁   𝑦,𝑁   𝑄,𝑗,π‘˜   𝑄,𝑖,𝑦   𝑄,𝑙   𝑄,𝑝   𝑇,𝑗,π‘˜   𝑇,𝑖,𝑦   𝑇,𝑙   𝑗,𝑉,π‘˜   𝑓,𝑉   𝑖,𝑉,𝑦   𝑉,𝑙   𝑉,𝑝   πœ‘,𝑓   πœ‘,𝑖,π‘˜   πœ‘,𝑗
Allowed substitution hints:   πœ‘(𝑦,π‘š,𝑝,𝑙)   𝐴(𝑦,𝑓,𝑗,π‘˜,𝑙)   𝐡(𝑦,𝑓,𝑗,π‘˜,𝑙)   𝐢(𝑓,𝑖,𝑗,π‘˜,𝑙)   𝐷(𝑓,𝑖,𝑗,π‘˜,𝑙)   𝑃(𝑦,𝑓,𝑖,𝑗,π‘˜,π‘š,𝑝,𝑙)   𝑄(𝑓,π‘š)   𝑇(𝑓,π‘š,𝑝)   𝐻(𝑖,π‘˜,π‘š,𝑝,𝑙)   𝐼(𝑓,π‘š,𝑝)   𝐽(𝑦,𝑓,π‘š,𝑝)   𝐿(𝑓,𝑖,π‘š,𝑝)   𝑀(𝑦,𝑓,𝑙)   𝑁(π‘˜,𝑙)   𝑉(π‘š)

Proof of Theorem fourierdlem64
Dummy variables π‘₯ 𝑏 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fourierdlem64.i . . 3 𝐼 = sup({𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < )
2 ssrab2 4070 . . . 4 {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† (0..^𝑀)
3 fzossfz 13678 . . . . . . . 8 (0..^𝑀) βŠ† (0...𝑀)
4 fzssz 13530 . . . . . . . 8 (0...𝑀) βŠ† β„€
53, 4sstri 3983 . . . . . . 7 (0..^𝑀) βŠ† β„€
62, 5sstri 3983 . . . . . 6 {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† β„€
76a1i 11 . . . . 5 (πœ‘ β†’ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† β„€)
8 0zd 12595 . . . . . . . 8 (πœ‘ β†’ 0 ∈ β„€)
9 fourierdlem64.m . . . . . . . . 9 (πœ‘ β†’ 𝑀 ∈ β„•)
109nnzd 12610 . . . . . . . 8 (πœ‘ β†’ 𝑀 ∈ β„€)
119nngt0d 12286 . . . . . . . 8 (πœ‘ β†’ 0 < 𝑀)
12 fzolb 13665 . . . . . . . 8 (0 ∈ (0..^𝑀) ↔ (0 ∈ β„€ ∧ 𝑀 ∈ β„€ ∧ 0 < 𝑀))
138, 10, 11, 12syl3anbrc 1340 . . . . . . 7 (πœ‘ β†’ 0 ∈ (0..^𝑀))
14 fourierdlem64.l . . . . . . . . . 10 𝐿 = sup({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < )
15 ssrab2 4070 . . . . . . . . . . . 12 {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† β„€
1615a1i 11 . . . . . . . . . . 11 (πœ‘ β†’ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† β„€)
17 fourierdlem64.h . . . . . . . . . . . . . . . . . . 19 𝐻 = ({𝐢, 𝐷} βˆͺ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄})
18 fourierdlem64.c . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ 𝐢 ∈ ℝ)
19 fourierdlem64.d . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ 𝐷 ∈ ℝ)
20 prssi 4821 . . . . . . . . . . . . . . . . . . . . 21 ((𝐢 ∈ ℝ ∧ 𝐷 ∈ ℝ) β†’ {𝐢, 𝐷} βŠ† ℝ)
2118, 19, 20syl2anc 582 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ {𝐢, 𝐷} βŠ† ℝ)
22 ssrab2 4070 . . . . . . . . . . . . . . . . . . . . . 22 {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄} βŠ† (𝐢[,]𝐷)
2322a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄} βŠ† (𝐢[,]𝐷))
2418, 19iccssred 13438 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (𝐢[,]𝐷) βŠ† ℝ)
2523, 24sstrd 3984 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄} βŠ† ℝ)
2621, 25unssd 4181 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ ({𝐢, 𝐷} βˆͺ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄}) βŠ† ℝ)
2717, 26eqsstrid 4022 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ 𝐻 βŠ† ℝ)
28 fourierdlem64.t . . . . . . . . . . . . . . . . . . . . . 22 𝑇 = (𝐡 βˆ’ 𝐴)
29 fourierdlem64.p . . . . . . . . . . . . . . . . . . . . . 22 𝑃 = (π‘š ∈ β„• ↦ {𝑝 ∈ (ℝ ↑m (0...π‘š)) ∣ (((π‘β€˜0) = 𝐴 ∧ (π‘β€˜π‘š) = 𝐡) ∧ βˆ€π‘– ∈ (0..^π‘š)(π‘β€˜π‘–) < (π‘β€˜(𝑖 + 1)))})
30 fourierdlem64.q . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ 𝑄 ∈ (π‘ƒβ€˜π‘€))
31 fourierdlem64.cltd . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ 𝐢 < 𝐷)
32 eqid 2725 . . . . . . . . . . . . . . . . . . . . . 22 (π‘š ∈ β„• ↦ {𝑝 ∈ (ℝ ↑m (0...π‘š)) ∣ (((π‘β€˜0) = 𝐢 ∧ (π‘β€˜π‘š) = 𝐷) ∧ βˆ€π‘– ∈ (0..^π‘š)(π‘β€˜π‘–) < (π‘β€˜(𝑖 + 1)))}) = (π‘š ∈ β„• ↦ {𝑝 ∈ (ℝ ↑m (0...π‘š)) ∣ (((π‘β€˜0) = 𝐢 ∧ (π‘β€˜π‘š) = 𝐷) ∧ βˆ€π‘– ∈ (0..^π‘š)(π‘β€˜π‘–) < (π‘β€˜(𝑖 + 1)))})
33 fourierdlem64.n . . . . . . . . . . . . . . . . . . . . . 22 𝑁 = ((β™―β€˜π») βˆ’ 1)
34 fourierdlem64.v . . . . . . . . . . . . . . . . . . . . . 22 𝑉 = (℩𝑓𝑓 Isom < , < ((0...𝑁), 𝐻))
3528, 29, 9, 30, 18, 19, 31, 32, 17, 33, 34fourierdlem54 45607 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ ((𝑁 ∈ β„• ∧ 𝑉 ∈ ((π‘š ∈ β„• ↦ {𝑝 ∈ (ℝ ↑m (0...π‘š)) ∣ (((π‘β€˜0) = 𝐢 ∧ (π‘β€˜π‘š) = 𝐷) ∧ βˆ€π‘– ∈ (0..^π‘š)(π‘β€˜π‘–) < (π‘β€˜(𝑖 + 1)))})β€˜π‘)) ∧ 𝑉 Isom < , < ((0...𝑁), 𝐻)))
3635simprd 494 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ 𝑉 Isom < , < ((0...𝑁), 𝐻))
37 isof1o 7324 . . . . . . . . . . . . . . . . . . . 20 (𝑉 Isom < , < ((0...𝑁), 𝐻) β†’ 𝑉:(0...𝑁)–1-1-onto→𝐻)
38 f1of 6832 . . . . . . . . . . . . . . . . . . . 20 (𝑉:(0...𝑁)–1-1-onto→𝐻 β†’ 𝑉:(0...𝑁)⟢𝐻)
3936, 37, 383syl 18 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ 𝑉:(0...𝑁)⟢𝐻)
40 fourierdlem64.j . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ 𝐽 ∈ (0..^𝑁))
41 elfzofz 13675 . . . . . . . . . . . . . . . . . . . 20 (𝐽 ∈ (0..^𝑁) β†’ 𝐽 ∈ (0...𝑁))
4240, 41syl 17 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ 𝐽 ∈ (0...𝑁))
4339, 42ffvelcdmd 7088 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ (π‘‰β€˜π½) ∈ 𝐻)
4427, 43sseldd 3974 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ (π‘‰β€˜π½) ∈ ℝ)
4529fourierdlem2 45556 . . . . . . . . . . . . . . . . . . . . . 22 (𝑀 ∈ β„• β†’ (𝑄 ∈ (π‘ƒβ€˜π‘€) ↔ (𝑄 ∈ (ℝ ↑m (0...𝑀)) ∧ (((π‘„β€˜0) = 𝐴 ∧ (π‘„β€˜π‘€) = 𝐡) ∧ βˆ€π‘– ∈ (0..^𝑀)(π‘„β€˜π‘–) < (π‘„β€˜(𝑖 + 1))))))
469, 45syl 17 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (𝑄 ∈ (π‘ƒβ€˜π‘€) ↔ (𝑄 ∈ (ℝ ↑m (0...𝑀)) ∧ (((π‘„β€˜0) = 𝐴 ∧ (π‘„β€˜π‘€) = 𝐡) ∧ βˆ€π‘– ∈ (0..^𝑀)(π‘„β€˜π‘–) < (π‘„β€˜(𝑖 + 1))))))
4730, 46mpbid 231 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ (𝑄 ∈ (ℝ ↑m (0...𝑀)) ∧ (((π‘„β€˜0) = 𝐴 ∧ (π‘„β€˜π‘€) = 𝐡) ∧ βˆ€π‘– ∈ (0..^𝑀)(π‘„β€˜π‘–) < (π‘„β€˜(𝑖 + 1)))))
4847simpld 493 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ 𝑄 ∈ (ℝ ↑m (0...𝑀)))
49 elmapi 8861 . . . . . . . . . . . . . . . . . . 19 (𝑄 ∈ (ℝ ↑m (0...𝑀)) β†’ 𝑄:(0...𝑀)βŸΆβ„)
5048, 49syl 17 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ 𝑄:(0...𝑀)βŸΆβ„)
519nnnn0d 12557 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ 𝑀 ∈ β„•0)
52 nn0uz 12889 . . . . . . . . . . . . . . . . . . . 20 β„•0 = (β„€β‰₯β€˜0)
5351, 52eleqtrdi 2835 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ 𝑀 ∈ (β„€β‰₯β€˜0))
54 eluzfz1 13535 . . . . . . . . . . . . . . . . . . 19 (𝑀 ∈ (β„€β‰₯β€˜0) β†’ 0 ∈ (0...𝑀))
5553, 54syl 17 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ 0 ∈ (0...𝑀))
5650, 55ffvelcdmd 7088 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ (π‘„β€˜0) ∈ ℝ)
5744, 56resubcld 11667 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ ((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) ∈ ℝ)
5829, 9, 30fourierdlem11 45565 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ∧ 𝐴 < 𝐡))
5958simp2d 1140 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ 𝐡 ∈ ℝ)
6058simp1d 1139 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ 𝐴 ∈ ℝ)
6159, 60resubcld 11667 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ (𝐡 βˆ’ 𝐴) ∈ ℝ)
6228, 61eqeltrid 2829 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ 𝑇 ∈ ℝ)
6358simp3d 1141 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ 𝐴 < 𝐡)
6460, 59posdifd 11826 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (𝐴 < 𝐡 ↔ 0 < (𝐡 βˆ’ 𝐴)))
6563, 64mpbid 231 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ 0 < (𝐡 βˆ’ 𝐴))
6665, 28breqtrrdi 5186 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ 0 < 𝑇)
6766gt0ne0d 11803 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ 𝑇 β‰  0)
6857, 62, 67redivcld 12067 . . . . . . . . . . . . . . 15 (πœ‘ β†’ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) ∈ ℝ)
69 btwnz 12690 . . . . . . . . . . . . . . 15 ((((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) ∈ ℝ β†’ (βˆƒπ‘˜ ∈ β„€ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) ∧ βˆƒπ‘§ ∈ β„€ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) < 𝑧))
7068, 69syl 17 . . . . . . . . . . . . . 14 (πœ‘ β†’ (βˆƒπ‘˜ ∈ β„€ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) ∧ βˆƒπ‘§ ∈ β„€ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) < 𝑧))
7170simpld 493 . . . . . . . . . . . . 13 (πœ‘ β†’ βˆƒπ‘˜ ∈ β„€ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇))
72 zre 12587 . . . . . . . . . . . . . . 15 (π‘˜ ∈ β„€ β†’ π‘˜ ∈ ℝ)
7356ad2antrr 724 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ (π‘„β€˜0) ∈ ℝ)
74 simplr 767 . . . . . . . . . . . . . . . . . . 19 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ π‘˜ ∈ ℝ)
7562ad2antrr 724 . . . . . . . . . . . . . . . . . . 19 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ 𝑇 ∈ ℝ)
7674, 75remulcld 11269 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ (π‘˜ Β· 𝑇) ∈ ℝ)
7773, 76readdcld 11268 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ∈ ℝ)
7844ad2antrr 724 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ (π‘‰β€˜π½) ∈ ℝ)
79 simpr 483 . . . . . . . . . . . . . . . . . . 19 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇))
8057ad2antrr 724 . . . . . . . . . . . . . . . . . . . 20 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ ((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) ∈ ℝ)
8162, 66elrpd 13040 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ 𝑇 ∈ ℝ+)
8281ad2antrr 724 . . . . . . . . . . . . . . . . . . . 20 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ 𝑇 ∈ ℝ+)
8374, 80, 82ltmuldivd 13090 . . . . . . . . . . . . . . . . . . 19 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ ((π‘˜ Β· 𝑇) < ((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) ↔ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)))
8479, 83mpbird 256 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ (π‘˜ Β· 𝑇) < ((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)))
8556adantr 479 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘˜ ∈ ℝ) β†’ (π‘„β€˜0) ∈ ℝ)
86 simpr 483 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ π‘˜ ∈ ℝ) β†’ π‘˜ ∈ ℝ)
8762adantr 479 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ π‘˜ ∈ ℝ) β†’ 𝑇 ∈ ℝ)
8886, 87remulcld 11269 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘˜ ∈ ℝ) β†’ (π‘˜ Β· 𝑇) ∈ ℝ)
8944adantr 479 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘˜ ∈ ℝ) β†’ (π‘‰β€˜π½) ∈ ℝ)
9085, 88, 89ltaddsub2d 11840 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘˜ ∈ ℝ) β†’ (((π‘„β€˜0) + (π‘˜ Β· 𝑇)) < (π‘‰β€˜π½) ↔ (π‘˜ Β· 𝑇) < ((π‘‰β€˜π½) βˆ’ (π‘„β€˜0))))
9190adantr 479 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ (((π‘„β€˜0) + (π‘˜ Β· 𝑇)) < (π‘‰β€˜π½) ↔ (π‘˜ Β· 𝑇) < ((π‘‰β€˜π½) βˆ’ (π‘„β€˜0))))
9284, 91mpbird 256 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) < (π‘‰β€˜π½))
9377, 78, 92ltled 11387 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½))
9493ex 411 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘˜ ∈ ℝ) β†’ (π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) β†’ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)))
9572, 94sylan2 591 . . . . . . . . . . . . . 14 ((πœ‘ ∧ π‘˜ ∈ β„€) β†’ (π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) β†’ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)))
9695reximdva 3158 . . . . . . . . . . . . 13 (πœ‘ β†’ (βˆƒπ‘˜ ∈ β„€ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) β†’ βˆƒπ‘˜ ∈ β„€ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)))
9771, 96mpd 15 . . . . . . . . . . . 12 (πœ‘ β†’ βˆƒπ‘˜ ∈ β„€ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½))
98 rabn0 4382 . . . . . . . . . . . 12 ({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ… ↔ βˆƒπ‘˜ ∈ β„€ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½))
9997, 98sylibr 233 . . . . . . . . . . 11 (πœ‘ β†’ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ…)
100 simpl 481 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑗 ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}) β†’ πœ‘)
10116sselda 3973 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑗 ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}) β†’ 𝑗 ∈ β„€)
102 oveq1 7420 . . . . . . . . . . . . . . . . . . 19 (π‘˜ = 𝑗 β†’ (π‘˜ Β· 𝑇) = (𝑗 Β· 𝑇))
103102oveq2d 7429 . . . . . . . . . . . . . . . . . 18 (π‘˜ = 𝑗 β†’ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) = ((π‘„β€˜0) + (𝑗 Β· 𝑇)))
104103breq1d 5154 . . . . . . . . . . . . . . . . 17 (π‘˜ = 𝑗 β†’ (((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½) ↔ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
105104elrab 3676 . . . . . . . . . . . . . . . 16 (𝑗 ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} ↔ (𝑗 ∈ β„€ ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
106105simprbi 495 . . . . . . . . . . . . . . 15 (𝑗 ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} β†’ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½))
107106adantl 480 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑗 ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}) β†’ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½))
108 zre 12587 . . . . . . . . . . . . . . 15 (𝑗 ∈ β„€ β†’ 𝑗 ∈ ℝ)
109 simpr 483 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑗 ∈ ℝ) ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½))
11056ad2antrr 724 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ 𝑗 ∈ ℝ) ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (π‘„β€˜0) ∈ ℝ)
111 simpr 483 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝑗 ∈ ℝ) β†’ 𝑗 ∈ ℝ)
11262adantr 479 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝑗 ∈ ℝ) β†’ 𝑇 ∈ ℝ)
113111, 112remulcld 11269 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝑗 ∈ ℝ) β†’ (𝑗 Β· 𝑇) ∈ ℝ)
114113adantr 479 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ 𝑗 ∈ ℝ) ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (𝑗 Β· 𝑇) ∈ ℝ)
11544ad2antrr 724 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ 𝑗 ∈ ℝ) ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (π‘‰β€˜π½) ∈ ℝ)
116110, 114, 115leaddsub2d 11841 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑗 ∈ ℝ) ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½) ↔ (𝑗 Β· 𝑇) ≀ ((π‘‰β€˜π½) βˆ’ (π‘„β€˜0))))
117109, 116mpbid 231 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝑗 ∈ ℝ) ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (𝑗 Β· 𝑇) ≀ ((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)))
118 simplr 767 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑗 ∈ ℝ) ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ 𝑗 ∈ ℝ)
11957ad2antrr 724 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑗 ∈ ℝ) ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ ((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) ∈ ℝ)
12081ad2antrr 724 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑗 ∈ ℝ) ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ 𝑇 ∈ ℝ+)
121118, 119, 120lemuldivd 13092 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝑗 ∈ ℝ) ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ ((𝑗 Β· 𝑇) ≀ ((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) ↔ 𝑗 ≀ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)))
122117, 121mpbid 231 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑗 ∈ ℝ) ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ 𝑗 ≀ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇))
123108, 122sylanl2 679 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝑗 ∈ β„€) ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ 𝑗 ≀ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇))
124100, 101, 107, 123syl21anc 836 . . . . . . . . . . . . 13 ((πœ‘ ∧ 𝑗 ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}) β†’ 𝑗 ≀ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇))
125124ralrimiva 3136 . . . . . . . . . . . 12 (πœ‘ β†’ βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇))
126 breq2 5148 . . . . . . . . . . . . . 14 (𝑏 = (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) β†’ (𝑗 ≀ 𝑏 ↔ 𝑗 ≀ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)))
127126ralbidv 3168 . . . . . . . . . . . . 13 (𝑏 = (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) β†’ (βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ 𝑏 ↔ βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)))
128127rspcev 3603 . . . . . . . . . . . 12 (((((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) ∈ ℝ ∧ βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ βˆƒπ‘ ∈ ℝ βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ 𝑏)
12968, 125, 128syl2anc 582 . . . . . . . . . . 11 (πœ‘ β†’ βˆƒπ‘ ∈ ℝ βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ 𝑏)
130 suprzcl 12667 . . . . . . . . . . 11 (({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† β„€ ∧ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ… ∧ βˆƒπ‘ ∈ ℝ βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ 𝑏) β†’ sup({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ) ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)})
13116, 99, 129, 130syl3anc 1368 . . . . . . . . . 10 (πœ‘ β†’ sup({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ) ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)})
13214, 131eqeltrid 2829 . . . . . . . . 9 (πœ‘ β†’ 𝐿 ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)})
133 oveq1 7420 . . . . . . . . . . . 12 (π‘˜ = 𝐿 β†’ (π‘˜ Β· 𝑇) = (𝐿 Β· 𝑇))
134133oveq2d 7429 . . . . . . . . . . 11 (π‘˜ = 𝐿 β†’ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) = ((π‘„β€˜0) + (𝐿 Β· 𝑇)))
135134breq1d 5154 . . . . . . . . . 10 (π‘˜ = 𝐿 β†’ (((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½) ↔ ((π‘„β€˜0) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
136135elrab 3676 . . . . . . . . 9 (𝐿 ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} ↔ (𝐿 ∈ β„€ ∧ ((π‘„β€˜0) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
137132, 136sylib 217 . . . . . . . 8 (πœ‘ β†’ (𝐿 ∈ β„€ ∧ ((π‘„β€˜0) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
138137simprd 494 . . . . . . 7 (πœ‘ β†’ ((π‘„β€˜0) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½))
139 fveq2 6890 . . . . . . . . . 10 (𝑗 = 0 β†’ (π‘„β€˜π‘—) = (π‘„β€˜0))
140139oveq1d 7428 . . . . . . . . 9 (𝑗 = 0 β†’ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) = ((π‘„β€˜0) + (𝐿 Β· 𝑇)))
141140breq1d 5154 . . . . . . . 8 (𝑗 = 0 β†’ (((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½) ↔ ((π‘„β€˜0) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
142141elrab 3676 . . . . . . 7 (0 ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} ↔ (0 ∈ (0..^𝑀) ∧ ((π‘„β€˜0) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
14313, 138, 142sylanbrc 581 . . . . . 6 (πœ‘ β†’ 0 ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)})
144 ne0i 4331 . . . . . 6 (0 ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} β†’ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ…)
145143, 144syl 17 . . . . 5 (πœ‘ β†’ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ…)
1469nnred 12252 . . . . . 6 (πœ‘ β†’ 𝑀 ∈ ℝ)
1472a1i 11 . . . . . . . . 9 (πœ‘ β†’ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† (0..^𝑀))
148147sselda 3973 . . . . . . . 8 ((πœ‘ ∧ π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}) β†’ π‘˜ ∈ (0..^𝑀))
149 elfzoelz 13659 . . . . . . . . . . 11 (π‘˜ ∈ (0..^𝑀) β†’ π‘˜ ∈ β„€)
150149zred 12691 . . . . . . . . . 10 (π‘˜ ∈ (0..^𝑀) β†’ π‘˜ ∈ ℝ)
151150adantl 480 . . . . . . . . 9 ((πœ‘ ∧ π‘˜ ∈ (0..^𝑀)) β†’ π‘˜ ∈ ℝ)
152146adantr 479 . . . . . . . . 9 ((πœ‘ ∧ π‘˜ ∈ (0..^𝑀)) β†’ 𝑀 ∈ ℝ)
153 elfzolt2 13668 . . . . . . . . . 10 (π‘˜ ∈ (0..^𝑀) β†’ π‘˜ < 𝑀)
154153adantl 480 . . . . . . . . 9 ((πœ‘ ∧ π‘˜ ∈ (0..^𝑀)) β†’ π‘˜ < 𝑀)
155151, 152, 154ltled 11387 . . . . . . . 8 ((πœ‘ ∧ π‘˜ ∈ (0..^𝑀)) β†’ π‘˜ ≀ 𝑀)
156148, 155syldan 589 . . . . . . 7 ((πœ‘ ∧ π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}) β†’ π‘˜ ≀ 𝑀)
157156ralrimiva 3136 . . . . . 6 (πœ‘ β†’ βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑀)
158 breq2 5148 . . . . . . . 8 (𝑏 = 𝑀 β†’ (π‘˜ ≀ 𝑏 ↔ π‘˜ ≀ 𝑀))
159158ralbidv 3168 . . . . . . 7 (𝑏 = 𝑀 β†’ (βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑏 ↔ βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑀))
160159rspcev 3603 . . . . . 6 ((𝑀 ∈ ℝ ∧ βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑀) β†’ βˆƒπ‘ ∈ ℝ βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑏)
161146, 157, 160syl2anc 582 . . . . 5 (πœ‘ β†’ βˆƒπ‘ ∈ ℝ βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑏)
162 suprzcl 12667 . . . . 5 (({𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† β„€ ∧ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ… ∧ βˆƒπ‘ ∈ ℝ βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑏) β†’ sup({𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ) ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)})
1637, 145, 161, 162syl3anc 1368 . . . 4 (πœ‘ β†’ sup({𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ) ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)})
1642, 163sselid 3971 . . 3 (πœ‘ β†’ sup({𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ) ∈ (0..^𝑀))
1651, 164eqeltrid 2829 . 2 (πœ‘ β†’ 𝐼 ∈ (0..^𝑀))
16615, 131sselid 3971 . . 3 (πœ‘ β†’ sup({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ) ∈ β„€)
16714, 166eqeltrid 2829 . 2 (πœ‘ β†’ 𝐿 ∈ β„€)
1683, 165sselid 3971 . . . . . . . . . 10 (πœ‘ β†’ 𝐼 ∈ (0...𝑀))
16950, 168ffvelcdmd 7088 . . . . . . . . 9 (πœ‘ β†’ (π‘„β€˜πΌ) ∈ ℝ)
170167zred 12691 . . . . . . . . . 10 (πœ‘ β†’ 𝐿 ∈ ℝ)
171170, 62remulcld 11269 . . . . . . . . 9 (πœ‘ β†’ (𝐿 Β· 𝑇) ∈ ℝ)
172169, 171readdcld 11268 . . . . . . . 8 (πœ‘ β†’ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ∈ ℝ)
173172rexrd 11289 . . . . . . 7 (πœ‘ β†’ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ∈ ℝ*)
174173adantr 479 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ∈ ℝ*)
175 fzofzp1 13756 . . . . . . . . . . 11 (𝐼 ∈ (0..^𝑀) β†’ (𝐼 + 1) ∈ (0...𝑀))
176165, 175syl 17 . . . . . . . . . 10 (πœ‘ β†’ (𝐼 + 1) ∈ (0...𝑀))
17750, 176ffvelcdmd 7088 . . . . . . . . 9 (πœ‘ β†’ (π‘„β€˜(𝐼 + 1)) ∈ ℝ)
178177, 171readdcld 11268 . . . . . . . 8 (πœ‘ β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ)
179178rexrd 11289 . . . . . . 7 (πœ‘ β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ*)
180179adantr 479 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ*)
181 elioore 13381 . . . . . . 7 (π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) β†’ π‘₯ ∈ ℝ)
182181adantl 480 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ π‘₯ ∈ ℝ)
183172adantr 479 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ∈ ℝ)
18444adantr 479 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ (π‘‰β€˜π½) ∈ ℝ)
1851, 163eqeltrid 2829 . . . . . . . . . 10 (πœ‘ β†’ 𝐼 ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)})
186 fveq2 6890 . . . . . . . . . . . . 13 (𝑗 = 𝐼 β†’ (π‘„β€˜π‘—) = (π‘„β€˜πΌ))
187186oveq1d 7428 . . . . . . . . . . . 12 (𝑗 = 𝐼 β†’ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) = ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)))
188187breq1d 5154 . . . . . . . . . . 11 (𝑗 = 𝐼 β†’ (((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½) ↔ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
189188elrab 3676 . . . . . . . . . 10 (𝐼 ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} ↔ (𝐼 ∈ (0..^𝑀) ∧ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
190185, 189sylib 217 . . . . . . . . 9 (πœ‘ β†’ (𝐼 ∈ (0..^𝑀) ∧ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
191190simprd 494 . . . . . . . 8 (πœ‘ β†’ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½))
192191adantr 479 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½))
193184rexrd 11289 . . . . . . . 8 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ (π‘‰β€˜π½) ∈ ℝ*)
194 fzofzp1 13756 . . . . . . . . . . . . 13 (𝐽 ∈ (0..^𝑁) β†’ (𝐽 + 1) ∈ (0...𝑁))
19540, 194syl 17 . . . . . . . . . . . 12 (πœ‘ β†’ (𝐽 + 1) ∈ (0...𝑁))
19639, 195ffvelcdmd 7088 . . . . . . . . . . 11 (πœ‘ β†’ (π‘‰β€˜(𝐽 + 1)) ∈ 𝐻)
19727, 196sseldd 3974 . . . . . . . . . 10 (πœ‘ β†’ (π‘‰β€˜(𝐽 + 1)) ∈ ℝ)
198197rexrd 11289 . . . . . . . . 9 (πœ‘ β†’ (π‘‰β€˜(𝐽 + 1)) ∈ ℝ*)
199198adantr 479 . . . . . . . 8 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ (π‘‰β€˜(𝐽 + 1)) ∈ ℝ*)
200 simpr 483 . . . . . . . 8 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))))
201 ioogtlb 44939 . . . . . . . 8 (((π‘‰β€˜π½) ∈ ℝ* ∧ (π‘‰β€˜(𝐽 + 1)) ∈ ℝ* ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ (π‘‰β€˜π½) < π‘₯)
202193, 199, 200, 201syl3anc 1368 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ (π‘‰β€˜π½) < π‘₯)
203183, 184, 182, 192, 202lelttrd 11397 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) < π‘₯)
204 zssre 12590 . . . . . . . . . . . . . . . 16 β„€ βŠ† ℝ
20515, 204sstri 3983 . . . . . . . . . . . . . . 15 {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† ℝ
206205a1i 11 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† ℝ)
20799ad2antrr 724 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ…)
208129ad2antrr 724 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ βˆƒπ‘ ∈ ℝ βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ 𝑏)
209167peano2zd 12694 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ (𝐿 + 1) ∈ β„€)
210209ad2antrr 724 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (𝐿 + 1) ∈ β„€)
211 oveq1 7420 . . . . . . . . . . . . . . . . . . . . . . 23 (𝐼 = (𝑀 βˆ’ 1) β†’ (𝐼 + 1) = ((𝑀 βˆ’ 1) + 1))
212146recnd 11267 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ 𝑀 ∈ β„‚)
213 1cnd 11234 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ 1 ∈ β„‚)
214212, 213npcand 11600 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ ((𝑀 βˆ’ 1) + 1) = 𝑀)
215211, 214sylan9eqr 2787 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ (𝐼 + 1) = 𝑀)
216215fveq2d 6894 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ (π‘„β€˜(𝐼 + 1)) = (π‘„β€˜π‘€))
21747simprd 494 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ (((π‘„β€˜0) = 𝐴 ∧ (π‘„β€˜π‘€) = 𝐡) ∧ βˆ€π‘– ∈ (0..^𝑀)(π‘„β€˜π‘–) < (π‘„β€˜(𝑖 + 1))))
218217simpld 493 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ ((π‘„β€˜0) = 𝐴 ∧ (π‘„β€˜π‘€) = 𝐡))
219218simprd 494 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ (π‘„β€˜π‘€) = 𝐡)
220219adantr 479 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ (π‘„β€˜π‘€) = 𝐡)
22159recnd 11267 . . . . . . . . . . . . . . . . . . . . . . . . 25 (πœ‘ β†’ 𝐡 ∈ β„‚)
22260recnd 11267 . . . . . . . . . . . . . . . . . . . . . . . . 25 (πœ‘ β†’ 𝐴 ∈ β„‚)
223221, 222npcand 11600 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ ((𝐡 βˆ’ 𝐴) + 𝐴) = 𝐡)
224223eqcomd 2731 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ 𝐡 = ((𝐡 βˆ’ 𝐴) + 𝐴))
22528eqcomi 2734 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝐡 βˆ’ 𝐴) = 𝑇
226225a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ (𝐡 βˆ’ 𝐴) = 𝑇)
227226oveq1d 7428 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ ((𝐡 βˆ’ 𝐴) + 𝐴) = (𝑇 + 𝐴))
228218simpld 493 . . . . . . . . . . . . . . . . . . . . . . . . 25 (πœ‘ β†’ (π‘„β€˜0) = 𝐴)
229228eqcomd 2731 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ 𝐴 = (π‘„β€˜0))
230229oveq2d 7429 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ (𝑇 + 𝐴) = (𝑇 + (π‘„β€˜0)))
231224, 227, 2303eqtrd 2769 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ 𝐡 = (𝑇 + (π‘„β€˜0)))
232231adantr 479 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ 𝐡 = (𝑇 + (π‘„β€˜0)))
233216, 220, 2323eqtrd 2769 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ (π‘„β€˜(𝐼 + 1)) = (𝑇 + (π‘„β€˜0)))
23462recnd 11267 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ 𝑇 ∈ β„‚)
235228, 222eqeltrd 2825 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ (π‘„β€˜0) ∈ β„‚)
236234, 235addcomd 11441 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (𝑇 + (π‘„β€˜0)) = ((π‘„β€˜0) + 𝑇))
237236adantr 479 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ (𝑇 + (π‘„β€˜0)) = ((π‘„β€˜0) + 𝑇))
238233, 237eqtrd 2765 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ (π‘„β€˜(𝐼 + 1)) = ((π‘„β€˜0) + 𝑇))
239238oveq1d 7428 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (((π‘„β€˜0) + 𝑇) + (𝐿 Β· 𝑇)))
240171recnd 11267 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (𝐿 Β· 𝑇) ∈ β„‚)
241235, 234, 240addassd 11261 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ (((π‘„β€˜0) + 𝑇) + (𝐿 Β· 𝑇)) = ((π‘„β€˜0) + (𝑇 + (𝐿 Β· 𝑇))))
242234mullidd 11257 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ (1 Β· 𝑇) = 𝑇)
243242, 234eqeltrd 2825 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ (1 Β· 𝑇) ∈ β„‚)
244243, 240addcomd 11441 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ ((1 Β· 𝑇) + (𝐿 Β· 𝑇)) = ((𝐿 Β· 𝑇) + (1 Β· 𝑇)))
245242eqcomd 2731 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ 𝑇 = (1 Β· 𝑇))
246245oveq1d 7428 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ (𝑇 + (𝐿 Β· 𝑇)) = ((1 Β· 𝑇) + (𝐿 Β· 𝑇)))
247170recnd 11267 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ 𝐿 ∈ β„‚)
248247, 213, 234adddird 11264 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ ((𝐿 + 1) Β· 𝑇) = ((𝐿 Β· 𝑇) + (1 Β· 𝑇)))
249244, 246, 2483eqtr4d 2775 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (𝑇 + (𝐿 Β· 𝑇)) = ((𝐿 + 1) Β· 𝑇))
250249oveq2d 7429 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ ((π‘„β€˜0) + (𝑇 + (𝐿 Β· 𝑇))) = ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)))
251241, 250eqtrd 2765 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (((π‘„β€˜0) + 𝑇) + (𝐿 Β· 𝑇)) = ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)))
252251adantr 479 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ (((π‘„β€˜0) + 𝑇) + (𝐿 Β· 𝑇)) = ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)))
253239, 252eqtr2d 2766 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
254253adantr 479 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
255 simpr 483 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½))
256254, 255eqbrtrd 5166 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)) ≀ (π‘‰β€˜π½))
257 oveq1 7420 . . . . . . . . . . . . . . . . . 18 (π‘˜ = (𝐿 + 1) β†’ (π‘˜ Β· 𝑇) = ((𝐿 + 1) Β· 𝑇))
258257oveq2d 7429 . . . . . . . . . . . . . . . . 17 (π‘˜ = (𝐿 + 1) β†’ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) = ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)))
259258breq1d 5154 . . . . . . . . . . . . . . . 16 (π‘˜ = (𝐿 + 1) β†’ (((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½) ↔ ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)) ≀ (π‘‰β€˜π½)))
260259elrab 3676 . . . . . . . . . . . . . . 15 ((𝐿 + 1) ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} ↔ ((𝐿 + 1) ∈ β„€ ∧ ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)) ≀ (π‘‰β€˜π½)))
261210, 256, 260sylanbrc 581 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (𝐿 + 1) ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)})
262 suprub 12200 . . . . . . . . . . . . . 14 ((({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† ℝ ∧ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ… ∧ βˆƒπ‘ ∈ ℝ βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ 𝑏) ∧ (𝐿 + 1) ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}) β†’ (𝐿 + 1) ≀ sup({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ))
263206, 207, 208, 261, 262syl31anc 1370 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (𝐿 + 1) ≀ sup({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ))
264263, 14breqtrrdi 5186 . . . . . . . . . . . 12 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (𝐿 + 1) ≀ 𝐿)
265170ltp1d 12169 . . . . . . . . . . . . . 14 (πœ‘ β†’ 𝐿 < (𝐿 + 1))
266 peano2re 11412 . . . . . . . . . . . . . . . 16 (𝐿 ∈ ℝ β†’ (𝐿 + 1) ∈ ℝ)
267170, 266syl 17 . . . . . . . . . . . . . . 15 (πœ‘ β†’ (𝐿 + 1) ∈ ℝ)
268170, 267ltnled 11386 . . . . . . . . . . . . . 14 (πœ‘ β†’ (𝐿 < (𝐿 + 1) ↔ Β¬ (𝐿 + 1) ≀ 𝐿))
269265, 268mpbid 231 . . . . . . . . . . . . 13 (πœ‘ β†’ Β¬ (𝐿 + 1) ≀ 𝐿)
270269ad2antrr 724 . . . . . . . . . . . 12 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ Β¬ (𝐿 + 1) ≀ 𝐿)
271264, 270pm2.65da 815 . . . . . . . . . . 11 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ Β¬ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½))
2725, 165sselid 3971 . . . . . . . . . . . . . . 15 (πœ‘ β†’ 𝐼 ∈ β„€)
273272zred 12691 . . . . . . . . . . . . . 14 (πœ‘ β†’ 𝐼 ∈ ℝ)
274273adantr 479 . . . . . . . . . . . . 13 ((πœ‘ ∧ Β¬ 𝐼 = (𝑀 βˆ’ 1)) β†’ 𝐼 ∈ ℝ)
275 peano2rem 11552 . . . . . . . . . . . . . . 15 (𝑀 ∈ ℝ β†’ (𝑀 βˆ’ 1) ∈ ℝ)
276146, 275syl 17 . . . . . . . . . . . . . 14 (πœ‘ β†’ (𝑀 βˆ’ 1) ∈ ℝ)
277276adantr 479 . . . . . . . . . . . . 13 ((πœ‘ ∧ Β¬ 𝐼 = (𝑀 βˆ’ 1)) β†’ (𝑀 βˆ’ 1) ∈ ℝ)
278 elfzolt2 13668 . . . . . . . . . . . . . . . 16 (𝐼 ∈ (0..^𝑀) β†’ 𝐼 < 𝑀)
279 elfzoelz 13659 . . . . . . . . . . . . . . . . 17 (𝐼 ∈ (0..^𝑀) β†’ 𝐼 ∈ β„€)
280 elfzoel2 13658 . . . . . . . . . . . . . . . . 17 (𝐼 ∈ (0..^𝑀) β†’ 𝑀 ∈ β„€)
281 zltlem1 12640 . . . . . . . . . . . . . . . . 17 ((𝐼 ∈ β„€ ∧ 𝑀 ∈ β„€) β†’ (𝐼 < 𝑀 ↔ 𝐼 ≀ (𝑀 βˆ’ 1)))
282279, 280, 281syl2anc 582 . . . . . . . . . . . . . . . 16 (𝐼 ∈ (0..^𝑀) β†’ (𝐼 < 𝑀 ↔ 𝐼 ≀ (𝑀 βˆ’ 1)))
283278, 282mpbid 231 . . . . . . . . . . . . . . 15 (𝐼 ∈ (0..^𝑀) β†’ 𝐼 ≀ (𝑀 βˆ’ 1))
284165, 283syl 17 . . . . . . . . . . . . . 14 (πœ‘ β†’ 𝐼 ≀ (𝑀 βˆ’ 1))
285284adantr 479 . . . . . . . . . . . . 13 ((πœ‘ ∧ Β¬ 𝐼 = (𝑀 βˆ’ 1)) β†’ 𝐼 ≀ (𝑀 βˆ’ 1))
286 neqne 2938 . . . . . . . . . . . . . . 15 (Β¬ 𝐼 = (𝑀 βˆ’ 1) β†’ 𝐼 β‰  (𝑀 βˆ’ 1))
287286necomd 2986 . . . . . . . . . . . . . 14 (Β¬ 𝐼 = (𝑀 βˆ’ 1) β†’ (𝑀 βˆ’ 1) β‰  𝐼)
288287adantl 480 . . . . . . . . . . . . 13 ((πœ‘ ∧ Β¬ 𝐼 = (𝑀 βˆ’ 1)) β†’ (𝑀 βˆ’ 1) β‰  𝐼)
289274, 277, 285, 288leneltd 11393 . . . . . . . . . . . 12 ((πœ‘ ∧ Β¬ 𝐼 = (𝑀 βˆ’ 1)) β†’ 𝐼 < (𝑀 βˆ’ 1))
2906, 204sstri 3983 . . . . . . . . . . . . . . . 16 {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† ℝ
291290a1i 11 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† ℝ)
292145ad2antrr 724 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ…)
293161ad2antrr 724 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ βˆƒπ‘ ∈ ℝ βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑏)
294176adantr 479 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ (𝐼 + 1) ∈ (0...𝑀))
295273adantr 479 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ 𝐼 ∈ ℝ)
296276adantr 479 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ (𝑀 βˆ’ 1) ∈ ℝ)
297 1red 11240 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ 1 ∈ ℝ)
298 simpr 483 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ 𝐼 < (𝑀 βˆ’ 1))
299295, 296, 297, 298ltadd1dd 11850 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ (𝐼 + 1) < ((𝑀 βˆ’ 1) + 1))
300214adantr 479 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ ((𝑀 βˆ’ 1) + 1) = 𝑀)
301299, 300breqtrd 5170 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ (𝐼 + 1) < 𝑀)
302 elfzfzo 44717 . . . . . . . . . . . . . . . . . 18 ((𝐼 + 1) ∈ (0..^𝑀) ↔ ((𝐼 + 1) ∈ (0...𝑀) ∧ (𝐼 + 1) < 𝑀))
303294, 301, 302sylanbrc 581 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ (𝐼 + 1) ∈ (0..^𝑀))
304303anim1i 613 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ ((𝐼 + 1) ∈ (0..^𝑀) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
305 fveq2 6890 . . . . . . . . . . . . . . . . . . 19 (𝑗 = (𝐼 + 1) β†’ (π‘„β€˜π‘—) = (π‘„β€˜(𝐼 + 1)))
306305oveq1d 7428 . . . . . . . . . . . . . . . . . 18 (𝑗 = (𝐼 + 1) β†’ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
307306breq1d 5154 . . . . . . . . . . . . . . . . 17 (𝑗 = (𝐼 + 1) β†’ (((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½) ↔ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
308307elrab 3676 . . . . . . . . . . . . . . . 16 ((𝐼 + 1) ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} ↔ ((𝐼 + 1) ∈ (0..^𝑀) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
309304, 308sylibr 233 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (𝐼 + 1) ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)})
310 suprub 12200 . . . . . . . . . . . . . . 15 ((({𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† ℝ ∧ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ… ∧ βˆƒπ‘ ∈ ℝ βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑏) ∧ (𝐼 + 1) ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}) β†’ (𝐼 + 1) ≀ sup({𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ))
311291, 292, 293, 309, 310syl31anc 1370 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (𝐼 + 1) ≀ sup({𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ))
312311, 1breqtrrdi 5186 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (𝐼 + 1) ≀ 𝐼)
313273ltp1d 12169 . . . . . . . . . . . . . . 15 (πœ‘ β†’ 𝐼 < (𝐼 + 1))
314 peano2re 11412 . . . . . . . . . . . . . . . . 17 (𝐼 ∈ ℝ β†’ (𝐼 + 1) ∈ ℝ)
315273, 314syl 17 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ (𝐼 + 1) ∈ ℝ)
316273, 315ltnled 11386 . . . . . . . . . . . . . . 15 (πœ‘ β†’ (𝐼 < (𝐼 + 1) ↔ Β¬ (𝐼 + 1) ≀ 𝐼))
317313, 316mpbid 231 . . . . . . . . . . . . . 14 (πœ‘ β†’ Β¬ (𝐼 + 1) ≀ 𝐼)
318317ad2antrr 724 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ Β¬ (𝐼 + 1) ≀ 𝐼)
319312, 318pm2.65da 815 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ Β¬ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½))
320289, 319syldan 589 . . . . . . . . . . 11 ((πœ‘ ∧ Β¬ 𝐼 = (𝑀 βˆ’ 1)) β†’ Β¬ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½))
321271, 320pm2.61dan 811 . . . . . . . . . 10 (πœ‘ β†’ Β¬ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½))
32244, 178ltnled 11386 . . . . . . . . . 10 (πœ‘ β†’ ((π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ↔ Β¬ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
323321, 322mpbird 256 . . . . . . . . 9 (πœ‘ β†’ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
324197adantr 479 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ∈ ℝ)
32519adantr 479 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝐷 ∈ ℝ)
326178adantr 479 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ)
32718rexrd 11289 . . . . . . . . . . . . . 14 (πœ‘ β†’ 𝐢 ∈ ℝ*)
32819rexrd 11289 . . . . . . . . . . . . . 14 (πœ‘ β†’ 𝐷 ∈ ℝ*)
32918, 19, 31ltled 11387 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ 𝐢 ≀ 𝐷)
330 lbicc2 13468 . . . . . . . . . . . . . . . . . . . 20 ((𝐢 ∈ ℝ* ∧ 𝐷 ∈ ℝ* ∧ 𝐢 ≀ 𝐷) β†’ 𝐢 ∈ (𝐢[,]𝐷))
331327, 328, 329, 330syl3anc 1368 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ 𝐢 ∈ (𝐢[,]𝐷))
332 ubicc2 13469 . . . . . . . . . . . . . . . . . . . 20 ((𝐢 ∈ ℝ* ∧ 𝐷 ∈ ℝ* ∧ 𝐢 ≀ 𝐷) β†’ 𝐷 ∈ (𝐢[,]𝐷))
333327, 328, 329, 332syl3anc 1368 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ 𝐷 ∈ (𝐢[,]𝐷))
334331, 333jca 510 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ (𝐢 ∈ (𝐢[,]𝐷) ∧ 𝐷 ∈ (𝐢[,]𝐷)))
335 prssg 4819 . . . . . . . . . . . . . . . . . . 19 ((𝐢 ∈ ℝ ∧ 𝐷 ∈ ℝ) β†’ ((𝐢 ∈ (𝐢[,]𝐷) ∧ 𝐷 ∈ (𝐢[,]𝐷)) ↔ {𝐢, 𝐷} βŠ† (𝐢[,]𝐷)))
33618, 19, 335syl2anc 582 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ ((𝐢 ∈ (𝐢[,]𝐷) ∧ 𝐷 ∈ (𝐢[,]𝐷)) ↔ {𝐢, 𝐷} βŠ† (𝐢[,]𝐷)))
337334, 336mpbid 231 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ {𝐢, 𝐷} βŠ† (𝐢[,]𝐷))
338337, 23unssd 4181 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ ({𝐢, 𝐷} βˆͺ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄}) βŠ† (𝐢[,]𝐷))
33917, 338eqsstrid 4022 . . . . . . . . . . . . . . 15 (πœ‘ β†’ 𝐻 βŠ† (𝐢[,]𝐷))
340339, 196sseldd 3974 . . . . . . . . . . . . . 14 (πœ‘ β†’ (π‘‰β€˜(𝐽 + 1)) ∈ (𝐢[,]𝐷))
341 iccleub 13406 . . . . . . . . . . . . . 14 ((𝐢 ∈ ℝ* ∧ 𝐷 ∈ ℝ* ∧ (π‘‰β€˜(𝐽 + 1)) ∈ (𝐢[,]𝐷)) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ 𝐷)
342327, 328, 340, 341syl3anc 1368 . . . . . . . . . . . . 13 (πœ‘ β†’ (π‘‰β€˜(𝐽 + 1)) ≀ 𝐷)
343342adantr 479 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ 𝐷)
344 simpr 483 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
345324, 325, 326, 343, 344letrd 11396 . . . . . . . . . . 11 ((πœ‘ ∧ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
346345adantlr 713 . . . . . . . . . 10 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
347 simpr 483 . . . . . . . . . . . . 13 ((πœ‘ ∧ Β¬ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ Β¬ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
348178adantr 479 . . . . . . . . . . . . . 14 ((πœ‘ ∧ Β¬ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ)
34919adantr 479 . . . . . . . . . . . . . 14 ((πœ‘ ∧ Β¬ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝐷 ∈ ℝ)
350348, 349ltnled 11386 . . . . . . . . . . . . 13 ((πœ‘ ∧ Β¬ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷 ↔ Β¬ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))))
351347, 350mpbird 256 . . . . . . . . . . . 12 ((πœ‘ ∧ Β¬ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷)
352351adantlr 713 . . . . . . . . . . 11 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ Β¬ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷)
353 simpll 765 . . . . . . . . . . . . 13 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) ∧ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))))
354 simpr 483 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
355178adantr 479 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ)
356197adantr 479 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ∈ ℝ)
357355, 356ltnled 11386 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1)) ↔ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))))
358354, 357mpbird 256 . . . . . . . . . . . . . 14 ((πœ‘ ∧ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1)))
359358ad4ant14 750 . . . . . . . . . . . . 13 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) ∧ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1)))
36018ad2antrr 724 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ 𝐢 ∈ ℝ)
36119ad2antrr 724 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ 𝐷 ∈ ℝ)
362178ad2antrr 724 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ)
36318adantr 479 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝐢 ∈ ℝ)
364178adantr 479 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ)
36544adantr 479 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜π½) ∈ ℝ)
366339, 43sseldd 3974 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ (π‘‰β€˜π½) ∈ (𝐢[,]𝐷))
367 iccgelb 13407 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐢 ∈ ℝ* ∧ 𝐷 ∈ ℝ* ∧ (π‘‰β€˜π½) ∈ (𝐢[,]𝐷)) β†’ 𝐢 ≀ (π‘‰β€˜π½))
368327, 328, 366, 367syl3anc 1368 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ 𝐢 ≀ (π‘‰β€˜π½))
369368adantr 479 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝐢 ≀ (π‘‰β€˜π½))
370 simpr 483 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
371363, 365, 364, 369, 370lelttrd 11397 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝐢 < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
372363, 364, 371ltled 11387 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝐢 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
373372adantr 479 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ 𝐢 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
374178adantr 479 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ)
37519adantr 479 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ 𝐷 ∈ ℝ)
376 simpr 483 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷)
377374, 375, 376ltled 11387 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ 𝐷)
378377adantlr 713 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ 𝐷)
379360, 361, 362, 373, 378eliccd 44948 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ (𝐢[,]𝐷))
380167znegcld 12693 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ -𝐿 ∈ β„€)
381247, 234mulneg1d 11692 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ (-𝐿 Β· 𝑇) = -(𝐿 Β· 𝑇))
382381oveq2d 7429 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (-𝐿 Β· 𝑇)) = (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + -(𝐿 Β· 𝑇)))
383178recnd 11267 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ β„‚)
384383, 240negsubd 11602 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + -(𝐿 Β· 𝑇)) = (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) βˆ’ (𝐿 Β· 𝑇)))
385177recnd 11267 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ (π‘„β€˜(𝐼 + 1)) ∈ β„‚)
386385, 240pncand 11597 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) βˆ’ (𝐿 Β· 𝑇)) = (π‘„β€˜(𝐼 + 1)))
387382, 384, 3863eqtrd 2769 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (-𝐿 Β· 𝑇)) = (π‘„β€˜(𝐼 + 1)))
388 ffn 6717 . . . . . . . . . . . . . . . . . . . . . 22 (𝑄:(0...𝑀)βŸΆβ„ β†’ 𝑄 Fn (0...𝑀))
38950, 388syl 17 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ 𝑄 Fn (0...𝑀))
390 fnfvelrn 7083 . . . . . . . . . . . . . . . . . . . . 21 ((𝑄 Fn (0...𝑀) ∧ (𝐼 + 1) ∈ (0...𝑀)) β†’ (π‘„β€˜(𝐼 + 1)) ∈ ran 𝑄)
391389, 176, 390syl2anc 582 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ (π‘„β€˜(𝐼 + 1)) ∈ ran 𝑄)
392387, 391eqeltrd 2825 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (-𝐿 Β· 𝑇)) ∈ ran 𝑄)
393 oveq1 7420 . . . . . . . . . . . . . . . . . . . . . 22 (π‘˜ = -𝐿 β†’ (π‘˜ Β· 𝑇) = (-𝐿 Β· 𝑇))
394393oveq2d 7429 . . . . . . . . . . . . . . . . . . . . 21 (π‘˜ = -𝐿 β†’ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)) = (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (-𝐿 Β· 𝑇)))
395394eleq1d 2810 . . . . . . . . . . . . . . . . . . . 20 (π‘˜ = -𝐿 β†’ ((((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)) ∈ ran 𝑄 ↔ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (-𝐿 Β· 𝑇)) ∈ ran 𝑄))
396395rspcev 3603 . . . . . . . . . . . . . . . . . . 19 ((-𝐿 ∈ β„€ ∧ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (-𝐿 Β· 𝑇)) ∈ ran 𝑄) β†’ βˆƒπ‘˜ ∈ β„€ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)) ∈ ran 𝑄)
397380, 392, 396syl2anc 582 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ βˆƒπ‘˜ ∈ β„€ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)) ∈ ran 𝑄)
398397ad2antrr 724 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ βˆƒπ‘˜ ∈ β„€ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)) ∈ ran 𝑄)
399 oveq1 7420 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) β†’ (𝑦 + (π‘˜ Β· 𝑇)) = (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)))
400399eleq1d 2810 . . . . . . . . . . . . . . . . . . 19 (𝑦 = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) β†’ ((𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄 ↔ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)) ∈ ran 𝑄))
401400rexbidv 3169 . . . . . . . . . . . . . . . . . 18 (𝑦 = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) β†’ (βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄 ↔ βˆƒπ‘˜ ∈ β„€ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)) ∈ ran 𝑄))
402401elrab 3676 . . . . . . . . . . . . . . . . 17 (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄} ↔ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ (𝐢[,]𝐷) ∧ βˆƒπ‘˜ ∈ β„€ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)) ∈ ran 𝑄))
403379, 398, 402sylanbrc 581 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄})
404 elun2 4172 . . . . . . . . . . . . . . . 16 (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄} β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ({𝐢, 𝐷} βˆͺ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄}))
405403, 404syl 17 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ({𝐢, 𝐷} βˆͺ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄}))
40617eqcomi 2734 . . . . . . . . . . . . . . 15 ({𝐢, 𝐷} βˆͺ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄}) = 𝐻
407405, 406eleqtrdi 2835 . . . . . . . . . . . . . 14 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻)
408407adantr 479 . . . . . . . . . . . . 13 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) ∧ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻)
409 f1ofo 6839 . . . . . . . . . . . . . . . . . 18 (𝑉:(0...𝑁)–1-1-onto→𝐻 β†’ 𝑉:(0...𝑁)–onto→𝐻)
41036, 37, 4093syl 18 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ 𝑉:(0...𝑁)–onto→𝐻)
411 foelrn 7110 . . . . . . . . . . . . . . . . 17 ((𝑉:(0...𝑁)–onto→𝐻 ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻) β†’ βˆƒπ‘— ∈ (0...𝑁)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—))
412410, 411sylan 578 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻) β†’ βˆƒπ‘— ∈ (0...𝑁)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—))
413 id 22 . . . . . . . . . . . . . . . . . . 19 (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—))
414413eqcomd 2731 . . . . . . . . . . . . . . . . . 18 (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—) β†’ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
415414a1i 11 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻) β†’ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—) β†’ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))))
416415reximdv 3160 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻) β†’ (βˆƒπ‘— ∈ (0...𝑁)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—) β†’ βˆƒπ‘— ∈ (0...𝑁)(π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))))
417412, 416mpd 15 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻) β†’ βˆƒπ‘— ∈ (0...𝑁)(π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
418417ad4ant14 750 . . . . . . . . . . . . . 14 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻) β†’ βˆƒπ‘— ∈ (0...𝑁)(π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
419 simpl 481 . . . . . . . . . . . . . . . . . . . . . . 23 (((π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
420413eqcoms 2733 . . . . . . . . . . . . . . . . . . . . . . . 24 ((π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—))
421420adantl 480 . . . . . . . . . . . . . . . . . . . . . . 23 (((π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—))
422419, 421breqtrd 5170 . . . . . . . . . . . . . . . . . . . . . 22 (((π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜π½) < (π‘‰β€˜π‘—))
423422adantll 712 . . . . . . . . . . . . . . . . . . . . 21 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜π½) < (π‘‰β€˜π‘—))
424423adantlr 713 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ 𝑗 ∈ (0...𝑁)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜π½) < (π‘‰β€˜π‘—))
42536ad3antrrr 728 . . . . . . . . . . . . . . . . . . . . 21 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ 𝑗 ∈ (0...𝑁)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝑉 Isom < , < ((0...𝑁), 𝐻))
42642ad3antrrr 728 . . . . . . . . . . . . . . . . . . . . 21 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ 𝑗 ∈ (0...𝑁)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝐽 ∈ (0...𝑁))
427 simplr 767 . . . . . . . . . . . . . . . . . . . . 21 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ 𝑗 ∈ (0...𝑁)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝑗 ∈ (0...𝑁))
428 isorel 7327 . . . . . . . . . . . . . . . . . . . . 21 ((𝑉 Isom < , < ((0...𝑁), 𝐻) ∧ (𝐽 ∈ (0...𝑁) ∧ 𝑗 ∈ (0...𝑁))) β†’ (𝐽 < 𝑗 ↔ (π‘‰β€˜π½) < (π‘‰β€˜π‘—)))
429425, 426, 427, 428syl12anc 835 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ 𝑗 ∈ (0...𝑁)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (𝐽 < 𝑗 ↔ (π‘‰β€˜π½) < (π‘‰β€˜π‘—)))
430424, 429mpbird 256 . . . . . . . . . . . . . . . . . . 19 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ 𝑗 ∈ (0...𝑁)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝐽 < 𝑗)
431430adantllr 717 . . . . . . . . . . . . . . . . . 18 (((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ 𝑗 ∈ (0...𝑁)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝐽 < 𝑗)
432 simpr 483 . . . . . . . . . . . . . . . . . . . . . . 23 ((((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
433 simpl 481 . . . . . . . . . . . . . . . . . . . . . . 23 ((((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1)))
434432, 433eqbrtrd 5166 . . . . . . . . . . . . . . . . . . . . . 22 ((((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜π‘—) < (π‘‰β€˜(𝐽 + 1)))
435434adantll 712 . . . . . . . . . . . . . . . . . . . . 21 (((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜π‘—) < (π‘‰β€˜(𝐽 + 1)))
436435adantlr 713 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ 𝑗 ∈ (0...𝑁)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜π‘—) < (π‘‰β€˜(𝐽 + 1)))
43736ad3antrrr 728 . . . . . . . . . . . . . . . . . . . . 21 ((((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ 𝑗 ∈ (0...𝑁)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝑉 Isom < , < ((0...𝑁), 𝐻))
438 simplr 767 . . . . . . . . . . . . . . . . . . . . 21 ((((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ 𝑗 ∈ (0...𝑁)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝑗 ∈ (0...𝑁))
439195ad3antrrr 728 . . . . . . . . . . . . . . . . . . . . 21 ((((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ 𝑗 ∈ (0...𝑁)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (𝐽 + 1) ∈ (0...𝑁))
440 isorel 7327 . . . . . . . . . . . . . . . . . . . . 21 ((𝑉 Isom < , < ((0...𝑁), 𝐻) ∧ (𝑗 ∈ (0...𝑁) ∧ (𝐽 + 1) ∈ (0...𝑁))) β†’ (𝑗 < (𝐽 + 1) ↔ (π‘‰β€˜π‘—) < (π‘‰β€˜(𝐽 + 1))))
441437, 438, 439, 440syl12anc 835 . . . . . . . . . . . . . . . . . . . 20 ((((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ 𝑗 ∈ (0...𝑁)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (𝑗 < (𝐽 + 1) ↔ (π‘‰β€˜π‘—) < (π‘‰β€˜(𝐽 + 1))))
442436, 441mpbird 256 . . . . . . . . . . . . . . . . . . 19 ((((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ 𝑗 ∈ (0...𝑁)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝑗 < (𝐽 + 1))
443442adantl3r 748 . . . . . . . . . . . . . . . . . 18 (((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ 𝑗 ∈ (0...𝑁)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝑗 < (𝐽 + 1))
444431, 443jca 510 . . . . . . . . . . . . . . . . 17 (((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ 𝑗 ∈ (0...𝑁)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1)))
445444ex 411 . . . . . . . . . . . . . . . 16 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ 𝑗 ∈ (0...𝑁)) β†’ ((π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) β†’ (𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1))))
446445adantlr 713 . . . . . . . . . . . . . . 15 (((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻) ∧ 𝑗 ∈ (0...𝑁)) β†’ ((π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) β†’ (𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1))))
447446reximdva 3158 . . . . . . . . . . . . . 14 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻) β†’ (βˆƒπ‘— ∈ (0...𝑁)(π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) β†’ βˆƒπ‘— ∈ (0...𝑁)(𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1))))
448418, 447mpd 15 . . . . . . . . . . . . 13 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻) β†’ βˆƒπ‘— ∈ (0...𝑁)(𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1)))
449353, 359, 408, 448syl21anc 836 . . . . . . . . . . . 12 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) ∧ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ βˆƒπ‘— ∈ (0...𝑁)(𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1)))
450 elfzelz 13528 . . . . . . . . . . . . . . . 16 (𝑗 ∈ (0...𝑁) β†’ 𝑗 ∈ β„€)
451450ad2antlr 725 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑗 ∈ (0...𝑁)) ∧ (𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1))) β†’ 𝑗 ∈ β„€)
452 elfzelz 13528 . . . . . . . . . . . . . . . . . 18 (𝐽 ∈ (0...𝑁) β†’ 𝐽 ∈ β„€)
45342, 452syl 17 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ 𝐽 ∈ β„€)
454453ad2antrr 724 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝑗 ∈ (0...𝑁)) ∧ (𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1))) β†’ 𝐽 ∈ β„€)
455 simprl 769 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝑗 ∈ (0...𝑁)) ∧ (𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1))) β†’ 𝐽 < 𝑗)
456 simprr 771 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝑗 ∈ (0...𝑁)) ∧ (𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1))) β†’ 𝑗 < (𝐽 + 1))
457 btwnnz 12663 . . . . . . . . . . . . . . . 16 ((𝐽 ∈ β„€ ∧ 𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1)) β†’ Β¬ 𝑗 ∈ β„€)
458454, 455, 456, 457syl3anc 1368 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑗 ∈ (0...𝑁)) ∧ (𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1))) β†’ Β¬ 𝑗 ∈ β„€)
459451, 458pm2.65da 815 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑗 ∈ (0...𝑁)) β†’ Β¬ (𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1)))
460459nrexdv 3139 . . . . . . . . . . . . 13 (πœ‘ β†’ Β¬ βˆƒπ‘— ∈ (0...𝑁)(𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1)))
461460ad3antrrr 728 . . . . . . . . . . . 12 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) ∧ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ Β¬ βˆƒπ‘— ∈ (0...𝑁)(𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1)))
462449, 461condan 816 . . . . . . . . . . 11 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
463352, 462syldan 589 . . . . . . . . . 10 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ Β¬ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
464346, 463pm2.61dan 811 . . . . . . . . 9 ((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
465323, 464mpdan 685 . . . . . . . 8 (πœ‘ β†’ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
466465adantr 479 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
467182adantr 479 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) ∧ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ π‘₯ ∈ ℝ)
468197ad2antrr 724 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) ∧ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ∈ ℝ)
469178ad2antrr 724 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) ∧ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ)
470 iooltub 44954 . . . . . . . . . 10 (((π‘‰β€˜π½) ∈ ℝ* ∧ (π‘‰β€˜(𝐽 + 1)) ∈ ℝ* ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ π‘₯ < (π‘‰β€˜(𝐽 + 1)))
471193, 199, 200, 470syl3anc 1368 . . . . . . . . 9 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ π‘₯ < (π‘‰β€˜(𝐽 + 1)))
472471adantr 479 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) ∧ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ π‘₯ < (π‘‰β€˜(𝐽 + 1)))
473 simpr 483 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) ∧ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
474467, 468, 469, 472, 473ltletrd 11399 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) ∧ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ π‘₯ < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
475466, 474mpdan 685 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ π‘₯ < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
476174, 180, 182, 203, 475eliood 44942 . . . . 5 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ π‘₯ ∈ (((π‘„β€˜πΌ) + (𝐿 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))))
477476ralrimiva 3136 . . . 4 (πœ‘ β†’ βˆ€π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))π‘₯ ∈ (((π‘„β€˜πΌ) + (𝐿 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))))
478 dfss3 3962 . . . 4 (((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜πΌ) + (𝐿 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ↔ βˆ€π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))π‘₯ ∈ (((π‘„β€˜πΌ) + (𝐿 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))))
479477, 478sylibr 233 . . 3 (πœ‘ β†’ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜πΌ) + (𝐿 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))))
480 fveq2 6890 . . . . . . 7 (𝑖 = 𝐼 β†’ (π‘„β€˜π‘–) = (π‘„β€˜πΌ))
481480oveq1d 7428 . . . . . 6 (𝑖 = 𝐼 β†’ ((π‘„β€˜π‘–) + (𝑙 Β· 𝑇)) = ((π‘„β€˜πΌ) + (𝑙 Β· 𝑇)))
482 oveq1 7420 . . . . . . . 8 (𝑖 = 𝐼 β†’ (𝑖 + 1) = (𝐼 + 1))
483482fveq2d 6894 . . . . . . 7 (𝑖 = 𝐼 β†’ (π‘„β€˜(𝑖 + 1)) = (π‘„β€˜(𝐼 + 1)))
484483oveq1d 7428 . . . . . 6 (𝑖 = 𝐼 β†’ ((π‘„β€˜(𝑖 + 1)) + (𝑙 Β· 𝑇)) = ((π‘„β€˜(𝐼 + 1)) + (𝑙 Β· 𝑇)))
485481, 484oveq12d 7431 . . . . 5 (𝑖 = 𝐼 β†’ (((π‘„β€˜π‘–) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝑖 + 1)) + (𝑙 Β· 𝑇))) = (((π‘„β€˜πΌ) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝑙 Β· 𝑇))))
486485sseq2d 4006 . . . 4 (𝑖 = 𝐼 β†’ (((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜π‘–) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝑖 + 1)) + (𝑙 Β· 𝑇))) ↔ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜πΌ) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝑙 Β· 𝑇)))))
487 oveq1 7420 . . . . . . 7 (𝑙 = 𝐿 β†’ (𝑙 Β· 𝑇) = (𝐿 Β· 𝑇))
488487oveq2d 7429 . . . . . 6 (𝑙 = 𝐿 β†’ ((π‘„β€˜πΌ) + (𝑙 Β· 𝑇)) = ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)))
489487oveq2d 7429 . . . . . 6 (𝑙 = 𝐿 β†’ ((π‘„β€˜(𝐼 + 1)) + (𝑙 Β· 𝑇)) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
490488, 489oveq12d 7431 . . . . 5 (𝑙 = 𝐿 β†’ (((π‘„β€˜πΌ) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝑙 Β· 𝑇))) = (((π‘„β€˜πΌ) + (𝐿 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))))
491490sseq2d 4006 . . . 4 (𝑙 = 𝐿 β†’ (((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜πΌ) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝑙 Β· 𝑇))) ↔ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜πΌ) + (𝐿 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))))
492486, 491rspc2ev 3616 . . 3 ((𝐼 ∈ (0..^𝑀) ∧ 𝐿 ∈ β„€ ∧ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜πΌ) + (𝐿 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))) β†’ βˆƒπ‘– ∈ (0..^𝑀)βˆƒπ‘™ ∈ β„€ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜π‘–) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝑖 + 1)) + (𝑙 Β· 𝑇))))
493165, 167, 479, 492syl3anc 1368 . 2 (πœ‘ β†’ βˆƒπ‘– ∈ (0..^𝑀)βˆƒπ‘™ ∈ β„€ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜π‘–) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝑖 + 1)) + (𝑙 Β· 𝑇))))
494165, 167, 493jca31 513 1 (πœ‘ β†’ ((𝐼 ∈ (0..^𝑀) ∧ 𝐿 ∈ β„€) ∧ βˆƒπ‘– ∈ (0..^𝑀)βˆƒπ‘™ ∈ β„€ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜π‘–) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝑖 + 1)) + (𝑙 Β· 𝑇)))))
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ↔ wb 205   ∧ wa 394   = wceq 1533   ∈ wcel 2098   β‰  wne 2930  βˆ€wral 3051  βˆƒwrex 3060  {crab 3419   βˆͺ cun 3939   βŠ† wss 3941  βˆ…c0 4319  {cpr 4627   class class class wbr 5144   ↦ cmpt 5227  ran crn 5674  β„©cio 6493   Fn wfn 6538  βŸΆwf 6539  β€“ontoβ†’wfo 6541  β€“1-1-ontoβ†’wf1o 6542  β€˜cfv 6543   Isom wiso 6544  (class class class)co 7413   ↑m cmap 8838  supcsup 9458  β„‚cc 11131  β„cr 11132  0cc0 11133  1c1 11134   + caddc 11136   Β· cmul 11138  β„*cxr 11272   < clt 11273   ≀ cle 11274   βˆ’ cmin 11469  -cneg 11470   / cdiv 11896  β„•cn 12237  β„•0cn0 12497  β„€cz 12583  β„€β‰₯cuz 12847  β„+crp 13001  (,)cioo 13351  [,]cicc 13354  ...cfz 13511  ..^cfzo 13654  β™―chash 14316
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2166  ax-ext 2696  ax-rep 5281  ax-sep 5295  ax-nul 5302  ax-pow 5360  ax-pr 5424  ax-un 7735  ax-inf2 9659  ax-cnex 11189  ax-resscn 11190  ax-1cn 11191  ax-icn 11192  ax-addcl 11193  ax-addrcl 11194  ax-mulcl 11195  ax-mulrcl 11196  ax-mulcom 11197  ax-addass 11198  ax-mulass 11199  ax-distr 11200  ax-i2m1 11201  ax-1ne0 11202  ax-1rid 11203  ax-rnegex 11204  ax-rrecex 11205  ax-cnre 11206  ax-pre-lttri 11207  ax-pre-lttrn 11208  ax-pre-ltadd 11209  ax-pre-mulgt0 11210  ax-pre-sup 11211
This theorem depends on definitions:  df-bi 206  df-an 395  df-or 846  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2528  df-eu 2557  df-clab 2703  df-cleq 2717  df-clel 2802  df-nfc 2877  df-ne 2931  df-nel 3037  df-ral 3052  df-rex 3061  df-rmo 3364  df-reu 3365  df-rab 3420  df-v 3465  df-sbc 3771  df-csb 3887  df-dif 3944  df-un 3946  df-in 3948  df-ss 3958  df-pss 3961  df-nul 4320  df-if 4526  df-pw 4601  df-sn 4626  df-pr 4628  df-op 4632  df-uni 4905  df-int 4946  df-iun 4994  df-iin 4995  df-br 5145  df-opab 5207  df-mpt 5228  df-tr 5262  df-id 5571  df-eprel 5577  df-po 5585  df-so 5586  df-fr 5628  df-se 5629  df-we 5630  df-xp 5679  df-rel 5680  df-cnv 5681  df-co 5682  df-dm 5683  df-rn 5684  df-res 5685  df-ima 5686  df-pred 6301  df-ord 6368  df-on 6369  df-lim 6370  df-suc 6371  df-iota 6495  df-fun 6545  df-fn 6546  df-f 6547  df-f1 6548  df-fo 6549  df-f1o 6550  df-fv 6551  df-isom 6552  df-riota 7369  df-ov 7416  df-oprab 7417  df-mpo 7418  df-om 7866  df-1st 7987  df-2nd 7988  df-frecs 8280  df-wrecs 8311  df-recs 8385  df-rdg 8424  df-1o 8480  df-oadd 8484  df-er 8718  df-map 8840  df-en 8958  df-dom 8959  df-sdom 8960  df-fin 8961  df-fi 9429  df-sup 9460  df-inf 9461  df-oi 9528  df-dju 9919  df-card 9957  df-pnf 11275  df-mnf 11276  df-xr 11277  df-ltxr 11278  df-le 11279  df-sub 11471  df-neg 11472  df-div 11897  df-nn 12238  df-2 12300  df-3 12301  df-n0 12498  df-xnn0 12570  df-z 12584  df-uz 12848  df-q 12958  df-rp 13002  df-xneg 13119  df-xadd 13120  df-xmul 13121  df-ioo 13355  df-icc 13358  df-fz 13512  df-fzo 13655  df-seq 13994  df-exp 14054  df-hash 14317  df-cj 15073  df-re 15074  df-im 15075  df-sqrt 15209  df-abs 15210  df-rest 17398  df-topgen 17419  df-psmet 21270  df-xmet 21271  df-met 21272  df-bl 21273  df-mopn 21274  df-top 22809  df-topon 22826  df-bases 22862  df-cld 22936  df-ntr 22937  df-cls 22938  df-nei 23015  df-lp 23053  df-cmp 23304
This theorem is referenced by:  fourierdlem97  45650
  Copyright terms: Public domain W3C validator