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 44872
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 4076 . . . 4 {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† (0..^𝑀)
3 fzossfz 13647 . . . . . . . 8 (0..^𝑀) βŠ† (0...𝑀)
4 fzssz 13499 . . . . . . . 8 (0...𝑀) βŠ† β„€
53, 4sstri 3990 . . . . . . 7 (0..^𝑀) βŠ† β„€
62, 5sstri 3990 . . . . . 6 {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† β„€
76a1i 11 . . . . 5 (πœ‘ β†’ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† β„€)
8 0zd 12566 . . . . . . . 8 (πœ‘ β†’ 0 ∈ β„€)
9 fourierdlem64.m . . . . . . . . 9 (πœ‘ β†’ 𝑀 ∈ β„•)
109nnzd 12581 . . . . . . . 8 (πœ‘ β†’ 𝑀 ∈ β„€)
119nngt0d 12257 . . . . . . . 8 (πœ‘ β†’ 0 < 𝑀)
12 fzolb 13634 . . . . . . . 8 (0 ∈ (0..^𝑀) ↔ (0 ∈ β„€ ∧ 𝑀 ∈ β„€ ∧ 0 < 𝑀))
138, 10, 11, 12syl3anbrc 1343 . . . . . . 7 (πœ‘ β†’ 0 ∈ (0..^𝑀))
14 fourierdlem64.l . . . . . . . . . 10 𝐿 = sup({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < )
15 ssrab2 4076 . . . . . . . . . . . 12 {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† β„€
1615a1i 11 . . . . . . . . . . 11 (πœ‘ β†’ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† β„€)
17 fourierdlem64.h . . . . . . . . . . . . . . . . . . 19 𝐻 = ({𝐢, 𝐷} βˆͺ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄})
18 fourierdlem64.c . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ 𝐢 ∈ ℝ)
19 fourierdlem64.d . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ 𝐷 ∈ ℝ)
20 prssi 4823 . . . . . . . . . . . . . . . . . . . . 21 ((𝐢 ∈ ℝ ∧ 𝐷 ∈ ℝ) β†’ {𝐢, 𝐷} βŠ† ℝ)
2118, 19, 20syl2anc 584 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ {𝐢, 𝐷} βŠ† ℝ)
22 ssrab2 4076 . . . . . . . . . . . . . . . . . . . . . 22 {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄} βŠ† (𝐢[,]𝐷)
2322a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄} βŠ† (𝐢[,]𝐷))
2418, 19iccssred 13407 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (𝐢[,]𝐷) βŠ† ℝ)
2523, 24sstrd 3991 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄} βŠ† ℝ)
2621, 25unssd 4185 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ ({𝐢, 𝐷} βˆͺ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄}) βŠ† ℝ)
2717, 26eqsstrid 4029 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ 𝐻 βŠ† ℝ)
28 fourierdlem64.t . . . . . . . . . . . . . . . . . . . . . 22 𝑇 = (𝐡 βˆ’ 𝐴)
29 fourierdlem64.p . . . . . . . . . . . . . . . . . . . . . 22 𝑃 = (π‘š ∈ β„• ↦ {𝑝 ∈ (ℝ ↑m (0...π‘š)) ∣ (((π‘β€˜0) = 𝐴 ∧ (π‘β€˜π‘š) = 𝐡) ∧ βˆ€π‘– ∈ (0..^π‘š)(π‘β€˜π‘–) < (π‘β€˜(𝑖 + 1)))})
30 fourierdlem64.q . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ 𝑄 ∈ (π‘ƒβ€˜π‘€))
31 fourierdlem64.cltd . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ 𝐢 < 𝐷)
32 eqid 2732 . . . . . . . . . . . . . . . . . . . . . 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 44862 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ ((𝑁 ∈ β„• ∧ 𝑉 ∈ ((π‘š ∈ β„• ↦ {𝑝 ∈ (ℝ ↑m (0...π‘š)) ∣ (((π‘β€˜0) = 𝐢 ∧ (π‘β€˜π‘š) = 𝐷) ∧ βˆ€π‘– ∈ (0..^π‘š)(π‘β€˜π‘–) < (π‘β€˜(𝑖 + 1)))})β€˜π‘)) ∧ 𝑉 Isom < , < ((0...𝑁), 𝐻)))
3635simprd 496 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ 𝑉 Isom < , < ((0...𝑁), 𝐻))
37 isof1o 7316 . . . . . . . . . . . . . . . . . . . 20 (𝑉 Isom < , < ((0...𝑁), 𝐻) β†’ 𝑉:(0...𝑁)–1-1-onto→𝐻)
38 f1of 6830 . . . . . . . . . . . . . . . . . . . 20 (𝑉:(0...𝑁)–1-1-onto→𝐻 β†’ 𝑉:(0...𝑁)⟢𝐻)
3936, 37, 383syl 18 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ 𝑉:(0...𝑁)⟢𝐻)
40 fourierdlem64.j . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ 𝐽 ∈ (0..^𝑁))
41 elfzofz 13644 . . . . . . . . . . . . . . . . . . . 20 (𝐽 ∈ (0..^𝑁) β†’ 𝐽 ∈ (0...𝑁))
4240, 41syl 17 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ 𝐽 ∈ (0...𝑁))
4339, 42ffvelcdmd 7084 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ (π‘‰β€˜π½) ∈ 𝐻)
4427, 43sseldd 3982 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ (π‘‰β€˜π½) ∈ ℝ)
4529fourierdlem2 44811 . . . . . . . . . . . . . . . . . . . . . 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 495 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ 𝑄 ∈ (ℝ ↑m (0...𝑀)))
49 elmapi 8839 . . . . . . . . . . . . . . . . . . 19 (𝑄 ∈ (ℝ ↑m (0...𝑀)) β†’ 𝑄:(0...𝑀)βŸΆβ„)
5048, 49syl 17 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ 𝑄:(0...𝑀)βŸΆβ„)
519nnnn0d 12528 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ 𝑀 ∈ β„•0)
52 nn0uz 12860 . . . . . . . . . . . . . . . . . . . 20 β„•0 = (β„€β‰₯β€˜0)
5351, 52eleqtrdi 2843 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ 𝑀 ∈ (β„€β‰₯β€˜0))
54 eluzfz1 13504 . . . . . . . . . . . . . . . . . . 19 (𝑀 ∈ (β„€β‰₯β€˜0) β†’ 0 ∈ (0...𝑀))
5553, 54syl 17 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ 0 ∈ (0...𝑀))
5650, 55ffvelcdmd 7084 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ (π‘„β€˜0) ∈ ℝ)
5744, 56resubcld 11638 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ ((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) ∈ ℝ)
5829, 9, 30fourierdlem11 44820 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (𝐴 ∈ ℝ ∧ 𝐡 ∈ ℝ ∧ 𝐴 < 𝐡))
5958simp2d 1143 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ 𝐡 ∈ ℝ)
6058simp1d 1142 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ 𝐴 ∈ ℝ)
6159, 60resubcld 11638 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ (𝐡 βˆ’ 𝐴) ∈ ℝ)
6228, 61eqeltrid 2837 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ 𝑇 ∈ ℝ)
6358simp3d 1144 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ 𝐴 < 𝐡)
6460, 59posdifd 11797 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (𝐴 < 𝐡 ↔ 0 < (𝐡 βˆ’ 𝐴)))
6563, 64mpbid 231 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ 0 < (𝐡 βˆ’ 𝐴))
6665, 28breqtrrdi 5189 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ 0 < 𝑇)
6766gt0ne0d 11774 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ 𝑇 β‰  0)
6857, 62, 67redivcld 12038 . . . . . . . . . . . . . . 15 (πœ‘ β†’ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) ∈ ℝ)
69 btwnz 12661 . . . . . . . . . . . . . . 15 ((((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) ∈ ℝ β†’ (βˆƒπ‘˜ ∈ β„€ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) ∧ βˆƒπ‘§ ∈ β„€ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) < 𝑧))
7068, 69syl 17 . . . . . . . . . . . . . 14 (πœ‘ β†’ (βˆƒπ‘˜ ∈ β„€ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) ∧ βˆƒπ‘§ ∈ β„€ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) < 𝑧))
7170simpld 495 . . . . . . . . . . . . 13 (πœ‘ β†’ βˆƒπ‘˜ ∈ β„€ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇))
72 zre 12558 . . . . . . . . . . . . . . 15 (π‘˜ ∈ β„€ β†’ π‘˜ ∈ ℝ)
7356ad2antrr 724 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ (π‘„β€˜0) ∈ ℝ)
74 simplr 767 . . . . . . . . . . . . . . . . . . 19 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ π‘˜ ∈ ℝ)
7562ad2antrr 724 . . . . . . . . . . . . . . . . . . 19 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ 𝑇 ∈ ℝ)
7674, 75remulcld 11240 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ (π‘˜ Β· 𝑇) ∈ ℝ)
7773, 76readdcld 11239 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ∈ ℝ)
7844ad2antrr 724 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ (π‘‰β€˜π½) ∈ ℝ)
79 simpr 485 . . . . . . . . . . . . . . . . . . 19 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇))
8057ad2antrr 724 . . . . . . . . . . . . . . . . . . . 20 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ ((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) ∈ ℝ)
8162, 66elrpd 13009 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ 𝑇 ∈ ℝ+)
8281ad2antrr 724 . . . . . . . . . . . . . . . . . . . 20 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ 𝑇 ∈ ℝ+)
8374, 80, 82ltmuldivd 13059 . . . . . . . . . . . . . . . . . . 19 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ ((π‘˜ Β· 𝑇) < ((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) ↔ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)))
8479, 83mpbird 256 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ (π‘˜ Β· 𝑇) < ((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)))
8556adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘˜ ∈ ℝ) β†’ (π‘„β€˜0) ∈ ℝ)
86 simpr 485 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ π‘˜ ∈ ℝ) β†’ π‘˜ ∈ ℝ)
8762adantr 481 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ π‘˜ ∈ ℝ) β†’ 𝑇 ∈ ℝ)
8886, 87remulcld 11240 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘˜ ∈ ℝ) β†’ (π‘˜ Β· 𝑇) ∈ ℝ)
8944adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ π‘˜ ∈ ℝ) β†’ (π‘‰β€˜π½) ∈ ℝ)
9085, 88, 89ltaddsub2d 11811 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ π‘˜ ∈ ℝ) β†’ (((π‘„β€˜0) + (π‘˜ Β· 𝑇)) < (π‘‰β€˜π½) ↔ (π‘˜ Β· 𝑇) < ((π‘‰β€˜π½) βˆ’ (π‘„β€˜0))))
9190adantr 481 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ (((π‘„β€˜0) + (π‘˜ Β· 𝑇)) < (π‘‰β€˜π½) ↔ (π‘˜ Β· 𝑇) < ((π‘‰β€˜π½) βˆ’ (π‘„β€˜0))))
9284, 91mpbird 256 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) < (π‘‰β€˜π½))
9377, 78, 92ltled 11358 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ π‘˜ ∈ ℝ) ∧ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½))
9493ex 413 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ π‘˜ ∈ ℝ) β†’ (π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) β†’ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)))
9572, 94sylan2 593 . . . . . . . . . . . . . 14 ((πœ‘ ∧ π‘˜ ∈ β„€) β†’ (π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) β†’ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)))
9695reximdva 3168 . . . . . . . . . . . . 13 (πœ‘ β†’ (βˆƒπ‘˜ ∈ β„€ π‘˜ < (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) β†’ βˆƒπ‘˜ ∈ β„€ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)))
9771, 96mpd 15 . . . . . . . . . . . 12 (πœ‘ β†’ βˆƒπ‘˜ ∈ β„€ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½))
98 rabn0 4384 . . . . . . . . . . . 12 ({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ… ↔ βˆƒπ‘˜ ∈ β„€ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½))
9997, 98sylibr 233 . . . . . . . . . . 11 (πœ‘ β†’ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ…)
100 simpl 483 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑗 ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}) β†’ πœ‘)
10116sselda 3981 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑗 ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}) β†’ 𝑗 ∈ β„€)
102 oveq1 7412 . . . . . . . . . . . . . . . . . . 19 (π‘˜ = 𝑗 β†’ (π‘˜ Β· 𝑇) = (𝑗 Β· 𝑇))
103102oveq2d 7421 . . . . . . . . . . . . . . . . . 18 (π‘˜ = 𝑗 β†’ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) = ((π‘„β€˜0) + (𝑗 Β· 𝑇)))
104103breq1d 5157 . . . . . . . . . . . . . . . . 17 (π‘˜ = 𝑗 β†’ (((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½) ↔ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
105104elrab 3682 . . . . . . . . . . . . . . . 16 (𝑗 ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} ↔ (𝑗 ∈ β„€ ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
106105simprbi 497 . . . . . . . . . . . . . . 15 (𝑗 ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} β†’ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½))
107106adantl 482 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑗 ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}) β†’ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½))
108 zre 12558 . . . . . . . . . . . . . . 15 (𝑗 ∈ β„€ β†’ 𝑗 ∈ ℝ)
109 simpr 485 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ 𝑗 ∈ ℝ) ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½))
11056ad2antrr 724 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ 𝑗 ∈ ℝ) ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (π‘„β€˜0) ∈ ℝ)
111 simpr 485 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝑗 ∈ ℝ) β†’ 𝑗 ∈ ℝ)
11262adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝑗 ∈ ℝ) β†’ 𝑇 ∈ ℝ)
113111, 112remulcld 11240 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝑗 ∈ ℝ) β†’ (𝑗 Β· 𝑇) ∈ ℝ)
114113adantr 481 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ 𝑗 ∈ ℝ) ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (𝑗 Β· 𝑇) ∈ ℝ)
11544ad2antrr 724 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ 𝑗 ∈ ℝ) ∧ ((π‘„β€˜0) + (𝑗 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (π‘‰β€˜π½) ∈ ℝ)
116110, 114, 115leaddsub2d 11812 . . . . . . . . . . . . . . . . 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 13061 . . . . . . . . . . . . . . . 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 3146 . . . . . . . . . . . 12 (πœ‘ β†’ βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇))
126 breq2 5151 . . . . . . . . . . . . . 14 (𝑏 = (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) β†’ (𝑗 ≀ 𝑏 ↔ 𝑗 ≀ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)))
127126ralbidv 3177 . . . . . . . . . . . . 13 (𝑏 = (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) β†’ (βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ 𝑏 ↔ βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)))
128127rspcev 3612 . . . . . . . . . . . 12 (((((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇) ∈ ℝ ∧ βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ (((π‘‰β€˜π½) βˆ’ (π‘„β€˜0)) / 𝑇)) β†’ βˆƒπ‘ ∈ ℝ βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ 𝑏)
12968, 125, 128syl2anc 584 . . . . . . . . . . 11 (πœ‘ β†’ βˆƒπ‘ ∈ ℝ βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ 𝑏)
130 suprzcl 12638 . . . . . . . . . . 11 (({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† β„€ ∧ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ… ∧ βˆƒπ‘ ∈ ℝ βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ 𝑏) β†’ sup({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ) ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)})
13116, 99, 129, 130syl3anc 1371 . . . . . . . . . 10 (πœ‘ β†’ sup({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ) ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)})
13214, 131eqeltrid 2837 . . . . . . . . 9 (πœ‘ β†’ 𝐿 ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)})
133 oveq1 7412 . . . . . . . . . . . 12 (π‘˜ = 𝐿 β†’ (π‘˜ Β· 𝑇) = (𝐿 Β· 𝑇))
134133oveq2d 7421 . . . . . . . . . . 11 (π‘˜ = 𝐿 β†’ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) = ((π‘„β€˜0) + (𝐿 Β· 𝑇)))
135134breq1d 5157 . . . . . . . . . 10 (π‘˜ = 𝐿 β†’ (((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½) ↔ ((π‘„β€˜0) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
136135elrab 3682 . . . . . . . . 9 (𝐿 ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} ↔ (𝐿 ∈ β„€ ∧ ((π‘„β€˜0) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
137132, 136sylib 217 . . . . . . . 8 (πœ‘ β†’ (𝐿 ∈ β„€ ∧ ((π‘„β€˜0) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
138137simprd 496 . . . . . . 7 (πœ‘ β†’ ((π‘„β€˜0) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½))
139 fveq2 6888 . . . . . . . . . 10 (𝑗 = 0 β†’ (π‘„β€˜π‘—) = (π‘„β€˜0))
140139oveq1d 7420 . . . . . . . . 9 (𝑗 = 0 β†’ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) = ((π‘„β€˜0) + (𝐿 Β· 𝑇)))
141140breq1d 5157 . . . . . . . 8 (𝑗 = 0 β†’ (((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½) ↔ ((π‘„β€˜0) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
142141elrab 3682 . . . . . . 7 (0 ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} ↔ (0 ∈ (0..^𝑀) ∧ ((π‘„β€˜0) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
14313, 138, 142sylanbrc 583 . . . . . 6 (πœ‘ β†’ 0 ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)})
144 ne0i 4333 . . . . . 6 (0 ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} β†’ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ…)
145143, 144syl 17 . . . . 5 (πœ‘ β†’ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ…)
1469nnred 12223 . . . . . 6 (πœ‘ β†’ 𝑀 ∈ ℝ)
1472a1i 11 . . . . . . . . 9 (πœ‘ β†’ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† (0..^𝑀))
148147sselda 3981 . . . . . . . 8 ((πœ‘ ∧ π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}) β†’ π‘˜ ∈ (0..^𝑀))
149 elfzoelz 13628 . . . . . . . . . . 11 (π‘˜ ∈ (0..^𝑀) β†’ π‘˜ ∈ β„€)
150149zred 12662 . . . . . . . . . 10 (π‘˜ ∈ (0..^𝑀) β†’ π‘˜ ∈ ℝ)
151150adantl 482 . . . . . . . . 9 ((πœ‘ ∧ π‘˜ ∈ (0..^𝑀)) β†’ π‘˜ ∈ ℝ)
152146adantr 481 . . . . . . . . 9 ((πœ‘ ∧ π‘˜ ∈ (0..^𝑀)) β†’ 𝑀 ∈ ℝ)
153 elfzolt2 13637 . . . . . . . . . 10 (π‘˜ ∈ (0..^𝑀) β†’ π‘˜ < 𝑀)
154153adantl 482 . . . . . . . . 9 ((πœ‘ ∧ π‘˜ ∈ (0..^𝑀)) β†’ π‘˜ < 𝑀)
155151, 152, 154ltled 11358 . . . . . . . 8 ((πœ‘ ∧ π‘˜ ∈ (0..^𝑀)) β†’ π‘˜ ≀ 𝑀)
156148, 155syldan 591 . . . . . . 7 ((πœ‘ ∧ π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}) β†’ π‘˜ ≀ 𝑀)
157156ralrimiva 3146 . . . . . 6 (πœ‘ β†’ βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑀)
158 breq2 5151 . . . . . . . 8 (𝑏 = 𝑀 β†’ (π‘˜ ≀ 𝑏 ↔ π‘˜ ≀ 𝑀))
159158ralbidv 3177 . . . . . . 7 (𝑏 = 𝑀 β†’ (βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑏 ↔ βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑀))
160159rspcev 3612 . . . . . 6 ((𝑀 ∈ ℝ ∧ βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑀) β†’ βˆƒπ‘ ∈ ℝ βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑏)
161146, 157, 160syl2anc 584 . . . . 5 (πœ‘ β†’ βˆƒπ‘ ∈ ℝ βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑏)
162 suprzcl 12638 . . . . 5 (({𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† β„€ ∧ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ… ∧ βˆƒπ‘ ∈ ℝ βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑏) β†’ sup({𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ) ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)})
1637, 145, 161, 162syl3anc 1371 . . . 4 (πœ‘ β†’ sup({𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ) ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)})
1642, 163sselid 3979 . . 3 (πœ‘ β†’ sup({𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ) ∈ (0..^𝑀))
1651, 164eqeltrid 2837 . 2 (πœ‘ β†’ 𝐼 ∈ (0..^𝑀))
16615, 131sselid 3979 . . 3 (πœ‘ β†’ sup({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ) ∈ β„€)
16714, 166eqeltrid 2837 . 2 (πœ‘ β†’ 𝐿 ∈ β„€)
1683, 165sselid 3979 . . . . . . . . . 10 (πœ‘ β†’ 𝐼 ∈ (0...𝑀))
16950, 168ffvelcdmd 7084 . . . . . . . . 9 (πœ‘ β†’ (π‘„β€˜πΌ) ∈ ℝ)
170167zred 12662 . . . . . . . . . 10 (πœ‘ β†’ 𝐿 ∈ ℝ)
171170, 62remulcld 11240 . . . . . . . . 9 (πœ‘ β†’ (𝐿 Β· 𝑇) ∈ ℝ)
172169, 171readdcld 11239 . . . . . . . 8 (πœ‘ β†’ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ∈ ℝ)
173172rexrd 11260 . . . . . . 7 (πœ‘ β†’ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ∈ ℝ*)
174173adantr 481 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ∈ ℝ*)
175 fzofzp1 13725 . . . . . . . . . . 11 (𝐼 ∈ (0..^𝑀) β†’ (𝐼 + 1) ∈ (0...𝑀))
176165, 175syl 17 . . . . . . . . . 10 (πœ‘ β†’ (𝐼 + 1) ∈ (0...𝑀))
17750, 176ffvelcdmd 7084 . . . . . . . . 9 (πœ‘ β†’ (π‘„β€˜(𝐼 + 1)) ∈ ℝ)
178177, 171readdcld 11239 . . . . . . . 8 (πœ‘ β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ)
179178rexrd 11260 . . . . . . 7 (πœ‘ β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ*)
180179adantr 481 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ*)
181 elioore 13350 . . . . . . 7 (π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) β†’ π‘₯ ∈ ℝ)
182181adantl 482 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ π‘₯ ∈ ℝ)
183172adantr 481 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ∈ ℝ)
18444adantr 481 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ (π‘‰β€˜π½) ∈ ℝ)
1851, 163eqeltrid 2837 . . . . . . . . . 10 (πœ‘ β†’ 𝐼 ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)})
186 fveq2 6888 . . . . . . . . . . . . 13 (𝑗 = 𝐼 β†’ (π‘„β€˜π‘—) = (π‘„β€˜πΌ))
187186oveq1d 7420 . . . . . . . . . . . 12 (𝑗 = 𝐼 β†’ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) = ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)))
188187breq1d 5157 . . . . . . . . . . 11 (𝑗 = 𝐼 β†’ (((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½) ↔ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
189188elrab 3682 . . . . . . . . . 10 (𝐼 ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} ↔ (𝐼 ∈ (0..^𝑀) ∧ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
190185, 189sylib 217 . . . . . . . . 9 (πœ‘ β†’ (𝐼 ∈ (0..^𝑀) ∧ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
191190simprd 496 . . . . . . . 8 (πœ‘ β†’ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½))
192191adantr 481 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½))
193184rexrd 11260 . . . . . . . 8 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ (π‘‰β€˜π½) ∈ ℝ*)
194 fzofzp1 13725 . . . . . . . . . . . . 13 (𝐽 ∈ (0..^𝑁) β†’ (𝐽 + 1) ∈ (0...𝑁))
19540, 194syl 17 . . . . . . . . . . . 12 (πœ‘ β†’ (𝐽 + 1) ∈ (0...𝑁))
19639, 195ffvelcdmd 7084 . . . . . . . . . . 11 (πœ‘ β†’ (π‘‰β€˜(𝐽 + 1)) ∈ 𝐻)
19727, 196sseldd 3982 . . . . . . . . . 10 (πœ‘ β†’ (π‘‰β€˜(𝐽 + 1)) ∈ ℝ)
198197rexrd 11260 . . . . . . . . 9 (πœ‘ β†’ (π‘‰β€˜(𝐽 + 1)) ∈ ℝ*)
199198adantr 481 . . . . . . . 8 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ (π‘‰β€˜(𝐽 + 1)) ∈ ℝ*)
200 simpr 485 . . . . . . . 8 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))))
201 ioogtlb 44194 . . . . . . . 8 (((π‘‰β€˜π½) ∈ ℝ* ∧ (π‘‰β€˜(𝐽 + 1)) ∈ ℝ* ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ (π‘‰β€˜π½) < π‘₯)
202193, 199, 200, 201syl3anc 1371 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ (π‘‰β€˜π½) < π‘₯)
203183, 184, 182, 192, 202lelttrd 11368 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)) < π‘₯)
204 zssre 12561 . . . . . . . . . . . . . . . 16 β„€ βŠ† ℝ
20515, 204sstri 3990 . . . . . . . . . . . . . . 15 {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† ℝ
206205a1i 11 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† ℝ)
20799ad2antrr 724 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ…)
208129ad2antrr 724 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ βˆƒπ‘ ∈ ℝ βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ 𝑏)
209167peano2zd 12665 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ (𝐿 + 1) ∈ β„€)
210209ad2antrr 724 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (𝐿 + 1) ∈ β„€)
211 oveq1 7412 . . . . . . . . . . . . . . . . . . . . . . 23 (𝐼 = (𝑀 βˆ’ 1) β†’ (𝐼 + 1) = ((𝑀 βˆ’ 1) + 1))
212146recnd 11238 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ 𝑀 ∈ β„‚)
213 1cnd 11205 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ 1 ∈ β„‚)
214212, 213npcand 11571 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ ((𝑀 βˆ’ 1) + 1) = 𝑀)
215211, 214sylan9eqr 2794 . . . . . . . . . . . . . . . . . . . . . 22 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ (𝐼 + 1) = 𝑀)
216215fveq2d 6892 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ (π‘„β€˜(𝐼 + 1)) = (π‘„β€˜π‘€))
21747simprd 496 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ (((π‘„β€˜0) = 𝐴 ∧ (π‘„β€˜π‘€) = 𝐡) ∧ βˆ€π‘– ∈ (0..^𝑀)(π‘„β€˜π‘–) < (π‘„β€˜(𝑖 + 1))))
218217simpld 495 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ ((π‘„β€˜0) = 𝐴 ∧ (π‘„β€˜π‘€) = 𝐡))
219218simprd 496 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ (π‘„β€˜π‘€) = 𝐡)
220219adantr 481 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ (π‘„β€˜π‘€) = 𝐡)
22159recnd 11238 . . . . . . . . . . . . . . . . . . . . . . . . 25 (πœ‘ β†’ 𝐡 ∈ β„‚)
22260recnd 11238 . . . . . . . . . . . . . . . . . . . . . . . . 25 (πœ‘ β†’ 𝐴 ∈ β„‚)
223221, 222npcand 11571 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ ((𝐡 βˆ’ 𝐴) + 𝐴) = 𝐡)
224223eqcomd 2738 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ 𝐡 = ((𝐡 βˆ’ 𝐴) + 𝐴))
22528eqcomi 2741 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝐡 βˆ’ 𝐴) = 𝑇
226225a1i 11 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ (𝐡 βˆ’ 𝐴) = 𝑇)
227226oveq1d 7420 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ ((𝐡 βˆ’ 𝐴) + 𝐴) = (𝑇 + 𝐴))
228218simpld 495 . . . . . . . . . . . . . . . . . . . . . . . . 25 (πœ‘ β†’ (π‘„β€˜0) = 𝐴)
229228eqcomd 2738 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ 𝐴 = (π‘„β€˜0))
230229oveq2d 7421 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ (𝑇 + 𝐴) = (𝑇 + (π‘„β€˜0)))
231224, 227, 2303eqtrd 2776 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ 𝐡 = (𝑇 + (π‘„β€˜0)))
232231adantr 481 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ 𝐡 = (𝑇 + (π‘„β€˜0)))
233216, 220, 2323eqtrd 2776 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ (π‘„β€˜(𝐼 + 1)) = (𝑇 + (π‘„β€˜0)))
23462recnd 11238 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ 𝑇 ∈ β„‚)
235228, 222eqeltrd 2833 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ (π‘„β€˜0) ∈ β„‚)
236234, 235addcomd 11412 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (𝑇 + (π‘„β€˜0)) = ((π‘„β€˜0) + 𝑇))
237236adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ (𝑇 + (π‘„β€˜0)) = ((π‘„β€˜0) + 𝑇))
238233, 237eqtrd 2772 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ (π‘„β€˜(𝐼 + 1)) = ((π‘„β€˜0) + 𝑇))
239238oveq1d 7420 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (((π‘„β€˜0) + 𝑇) + (𝐿 Β· 𝑇)))
240171recnd 11238 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (𝐿 Β· 𝑇) ∈ β„‚)
241235, 234, 240addassd 11232 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ (((π‘„β€˜0) + 𝑇) + (𝐿 Β· 𝑇)) = ((π‘„β€˜0) + (𝑇 + (𝐿 Β· 𝑇))))
242234mullidd 11228 . . . . . . . . . . . . . . . . . . . . . . . 24 (πœ‘ β†’ (1 Β· 𝑇) = 𝑇)
243242, 234eqeltrd 2833 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ (1 Β· 𝑇) ∈ β„‚)
244243, 240addcomd 11412 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ ((1 Β· 𝑇) + (𝐿 Β· 𝑇)) = ((𝐿 Β· 𝑇) + (1 Β· 𝑇)))
245242eqcomd 2738 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ 𝑇 = (1 Β· 𝑇))
246245oveq1d 7420 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ (𝑇 + (𝐿 Β· 𝑇)) = ((1 Β· 𝑇) + (𝐿 Β· 𝑇)))
247170recnd 11238 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ 𝐿 ∈ β„‚)
248247, 213, 234adddird 11235 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ ((𝐿 + 1) Β· 𝑇) = ((𝐿 Β· 𝑇) + (1 Β· 𝑇)))
249244, 246, 2483eqtr4d 2782 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (𝑇 + (𝐿 Β· 𝑇)) = ((𝐿 + 1) Β· 𝑇))
250249oveq2d 7421 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ ((π‘„β€˜0) + (𝑇 + (𝐿 Β· 𝑇))) = ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)))
251241, 250eqtrd 2772 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (((π‘„β€˜0) + 𝑇) + (𝐿 Β· 𝑇)) = ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)))
252251adantr 481 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ (((π‘„β€˜0) + 𝑇) + (𝐿 Β· 𝑇)) = ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)))
253239, 252eqtr2d 2773 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
254253adantr 481 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
255 simpr 485 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½))
256254, 255eqbrtrd 5169 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)) ≀ (π‘‰β€˜π½))
257 oveq1 7412 . . . . . . . . . . . . . . . . . 18 (π‘˜ = (𝐿 + 1) β†’ (π‘˜ Β· 𝑇) = ((𝐿 + 1) Β· 𝑇))
258257oveq2d 7421 . . . . . . . . . . . . . . . . 17 (π‘˜ = (𝐿 + 1) β†’ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) = ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)))
259258breq1d 5157 . . . . . . . . . . . . . . . 16 (π‘˜ = (𝐿 + 1) β†’ (((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½) ↔ ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)) ≀ (π‘‰β€˜π½)))
260259elrab 3682 . . . . . . . . . . . . . . 15 ((𝐿 + 1) ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} ↔ ((𝐿 + 1) ∈ β„€ ∧ ((π‘„β€˜0) + ((𝐿 + 1) Β· 𝑇)) ≀ (π‘‰β€˜π½)))
261210, 256, 260sylanbrc 583 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (𝐿 + 1) ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)})
262 suprub 12171 . . . . . . . . . . . . . 14 ((({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† ℝ ∧ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ… ∧ βˆƒπ‘ ∈ ℝ βˆ€π‘— ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}𝑗 ≀ 𝑏) ∧ (𝐿 + 1) ∈ {π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}) β†’ (𝐿 + 1) ≀ sup({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ))
263206, 207, 208, 261, 262syl31anc 1373 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (𝐿 + 1) ≀ sup({π‘˜ ∈ β„€ ∣ ((π‘„β€˜0) + (π‘˜ Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ))
264263, 14breqtrrdi 5189 . . . . . . . . . . . 12 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (𝐿 + 1) ≀ 𝐿)
265170ltp1d 12140 . . . . . . . . . . . . . 14 (πœ‘ β†’ 𝐿 < (𝐿 + 1))
266 peano2re 11383 . . . . . . . . . . . . . . . 16 (𝐿 ∈ ℝ β†’ (𝐿 + 1) ∈ ℝ)
267170, 266syl 17 . . . . . . . . . . . . . . 15 (πœ‘ β†’ (𝐿 + 1) ∈ ℝ)
268170, 267ltnled 11357 . . . . . . . . . . . . . 14 (πœ‘ β†’ (𝐿 < (𝐿 + 1) ↔ Β¬ (𝐿 + 1) ≀ 𝐿))
269265, 268mpbid 231 . . . . . . . . . . . . 13 (πœ‘ β†’ Β¬ (𝐿 + 1) ≀ 𝐿)
270269ad2antrr 724 . . . . . . . . . . . 12 (((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ Β¬ (𝐿 + 1) ≀ 𝐿)
271264, 270pm2.65da 815 . . . . . . . . . . 11 ((πœ‘ ∧ 𝐼 = (𝑀 βˆ’ 1)) β†’ Β¬ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½))
2725, 165sselid 3979 . . . . . . . . . . . . . . 15 (πœ‘ β†’ 𝐼 ∈ β„€)
273272zred 12662 . . . . . . . . . . . . . 14 (πœ‘ β†’ 𝐼 ∈ ℝ)
274273adantr 481 . . . . . . . . . . . . 13 ((πœ‘ ∧ Β¬ 𝐼 = (𝑀 βˆ’ 1)) β†’ 𝐼 ∈ ℝ)
275 peano2rem 11523 . . . . . . . . . . . . . . 15 (𝑀 ∈ ℝ β†’ (𝑀 βˆ’ 1) ∈ ℝ)
276146, 275syl 17 . . . . . . . . . . . . . 14 (πœ‘ β†’ (𝑀 βˆ’ 1) ∈ ℝ)
277276adantr 481 . . . . . . . . . . . . 13 ((πœ‘ ∧ Β¬ 𝐼 = (𝑀 βˆ’ 1)) β†’ (𝑀 βˆ’ 1) ∈ ℝ)
278 elfzolt2 13637 . . . . . . . . . . . . . . . 16 (𝐼 ∈ (0..^𝑀) β†’ 𝐼 < 𝑀)
279 elfzoelz 13628 . . . . . . . . . . . . . . . . 17 (𝐼 ∈ (0..^𝑀) β†’ 𝐼 ∈ β„€)
280 elfzoel2 13627 . . . . . . . . . . . . . . . . 17 (𝐼 ∈ (0..^𝑀) β†’ 𝑀 ∈ β„€)
281 zltlem1 12611 . . . . . . . . . . . . . . . . 17 ((𝐼 ∈ β„€ ∧ 𝑀 ∈ β„€) β†’ (𝐼 < 𝑀 ↔ 𝐼 ≀ (𝑀 βˆ’ 1)))
282279, 280, 281syl2anc 584 . . . . . . . . . . . . . . . 16 (𝐼 ∈ (0..^𝑀) β†’ (𝐼 < 𝑀 ↔ 𝐼 ≀ (𝑀 βˆ’ 1)))
283278, 282mpbid 231 . . . . . . . . . . . . . . 15 (𝐼 ∈ (0..^𝑀) β†’ 𝐼 ≀ (𝑀 βˆ’ 1))
284165, 283syl 17 . . . . . . . . . . . . . 14 (πœ‘ β†’ 𝐼 ≀ (𝑀 βˆ’ 1))
285284adantr 481 . . . . . . . . . . . . 13 ((πœ‘ ∧ Β¬ 𝐼 = (𝑀 βˆ’ 1)) β†’ 𝐼 ≀ (𝑀 βˆ’ 1))
286 neqne 2948 . . . . . . . . . . . . . . 15 (Β¬ 𝐼 = (𝑀 βˆ’ 1) β†’ 𝐼 β‰  (𝑀 βˆ’ 1))
287286necomd 2996 . . . . . . . . . . . . . 14 (Β¬ 𝐼 = (𝑀 βˆ’ 1) β†’ (𝑀 βˆ’ 1) β‰  𝐼)
288287adantl 482 . . . . . . . . . . . . 13 ((πœ‘ ∧ Β¬ 𝐼 = (𝑀 βˆ’ 1)) β†’ (𝑀 βˆ’ 1) β‰  𝐼)
289274, 277, 285, 288leneltd 11364 . . . . . . . . . . . 12 ((πœ‘ ∧ Β¬ 𝐼 = (𝑀 βˆ’ 1)) β†’ 𝐼 < (𝑀 βˆ’ 1))
2906, 204sstri 3990 . . . . . . . . . . . . . . . 16 {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† ℝ
291290a1i 11 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† ℝ)
292145ad2antrr 724 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ…)
293161ad2antrr 724 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ βˆƒπ‘ ∈ ℝ βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑏)
294176adantr 481 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ (𝐼 + 1) ∈ (0...𝑀))
295273adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ 𝐼 ∈ ℝ)
296276adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ (𝑀 βˆ’ 1) ∈ ℝ)
297 1red 11211 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ 1 ∈ ℝ)
298 simpr 485 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ 𝐼 < (𝑀 βˆ’ 1))
299295, 296, 297, 298ltadd1dd 11821 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ (𝐼 + 1) < ((𝑀 βˆ’ 1) + 1))
300214adantr 481 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ ((𝑀 βˆ’ 1) + 1) = 𝑀)
301299, 300breqtrd 5173 . . . . . . . . . . . . . . . . . 18 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ (𝐼 + 1) < 𝑀)
302 elfzfzo 43972 . . . . . . . . . . . . . . . . . 18 ((𝐼 + 1) ∈ (0..^𝑀) ↔ ((𝐼 + 1) ∈ (0...𝑀) ∧ (𝐼 + 1) < 𝑀))
303294, 301, 302sylanbrc 583 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ (𝐼 + 1) ∈ (0..^𝑀))
304303anim1i 615 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ ((𝐼 + 1) ∈ (0..^𝑀) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
305 fveq2 6888 . . . . . . . . . . . . . . . . . . 19 (𝑗 = (𝐼 + 1) β†’ (π‘„β€˜π‘—) = (π‘„β€˜(𝐼 + 1)))
306305oveq1d 7420 . . . . . . . . . . . . . . . . . 18 (𝑗 = (𝐼 + 1) β†’ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
307306breq1d 5157 . . . . . . . . . . . . . . . . 17 (𝑗 = (𝐼 + 1) β†’ (((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½) ↔ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
308307elrab 3682 . . . . . . . . . . . . . . . 16 ((𝐼 + 1) ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} ↔ ((𝐼 + 1) ∈ (0..^𝑀) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
309304, 308sylibr 233 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (𝐼 + 1) ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)})
310 suprub 12171 . . . . . . . . . . . . . . 15 ((({𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} βŠ† ℝ ∧ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)} β‰  βˆ… ∧ βˆƒπ‘ ∈ ℝ βˆ€π‘˜ ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}π‘˜ ≀ 𝑏) ∧ (𝐼 + 1) ∈ {𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}) β†’ (𝐼 + 1) ≀ sup({𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ))
311291, 292, 293, 309, 310syl31anc 1373 . . . . . . . . . . . . . 14 (((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (𝐼 + 1) ≀ sup({𝑗 ∈ (0..^𝑀) ∣ ((π‘„β€˜π‘—) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)}, ℝ, < ))
312311, 1breqtrrdi 5189 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ (𝐼 + 1) ≀ 𝐼)
313273ltp1d 12140 . . . . . . . . . . . . . . 15 (πœ‘ β†’ 𝐼 < (𝐼 + 1))
314 peano2re 11383 . . . . . . . . . . . . . . . . 17 (𝐼 ∈ ℝ β†’ (𝐼 + 1) ∈ ℝ)
315273, 314syl 17 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ (𝐼 + 1) ∈ ℝ)
316273, 315ltnled 11357 . . . . . . . . . . . . . . 15 (πœ‘ β†’ (𝐼 < (𝐼 + 1) ↔ Β¬ (𝐼 + 1) ≀ 𝐼))
317313, 316mpbid 231 . . . . . . . . . . . . . 14 (πœ‘ β†’ Β¬ (𝐼 + 1) ≀ 𝐼)
318317ad2antrr 724 . . . . . . . . . . . . 13 (((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)) β†’ Β¬ (𝐼 + 1) ≀ 𝐼)
319312, 318pm2.65da 815 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝐼 < (𝑀 βˆ’ 1)) β†’ Β¬ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½))
320289, 319syldan 591 . . . . . . . . . . 11 ((πœ‘ ∧ Β¬ 𝐼 = (𝑀 βˆ’ 1)) β†’ Β¬ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½))
321271, 320pm2.61dan 811 . . . . . . . . . 10 (πœ‘ β†’ Β¬ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½))
32244, 178ltnled 11357 . . . . . . . . . 10 (πœ‘ β†’ ((π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ↔ Β¬ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ (π‘‰β€˜π½)))
323321, 322mpbird 256 . . . . . . . . 9 (πœ‘ β†’ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
324197adantr 481 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ∈ ℝ)
32519adantr 481 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝐷 ∈ ℝ)
326178adantr 481 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ)
32718rexrd 11260 . . . . . . . . . . . . . 14 (πœ‘ β†’ 𝐢 ∈ ℝ*)
32819rexrd 11260 . . . . . . . . . . . . . 14 (πœ‘ β†’ 𝐷 ∈ ℝ*)
32918, 19, 31ltled 11358 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ 𝐢 ≀ 𝐷)
330 lbicc2 13437 . . . . . . . . . . . . . . . . . . . 20 ((𝐢 ∈ ℝ* ∧ 𝐷 ∈ ℝ* ∧ 𝐢 ≀ 𝐷) β†’ 𝐢 ∈ (𝐢[,]𝐷))
331327, 328, 329, 330syl3anc 1371 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ 𝐢 ∈ (𝐢[,]𝐷))
332 ubicc2 13438 . . . . . . . . . . . . . . . . . . . 20 ((𝐢 ∈ ℝ* ∧ 𝐷 ∈ ℝ* ∧ 𝐢 ≀ 𝐷) β†’ 𝐷 ∈ (𝐢[,]𝐷))
333327, 328, 329, 332syl3anc 1371 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ 𝐷 ∈ (𝐢[,]𝐷))
334331, 333jca 512 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ (𝐢 ∈ (𝐢[,]𝐷) ∧ 𝐷 ∈ (𝐢[,]𝐷)))
335 prssg 4821 . . . . . . . . . . . . . . . . . . 19 ((𝐢 ∈ ℝ ∧ 𝐷 ∈ ℝ) β†’ ((𝐢 ∈ (𝐢[,]𝐷) ∧ 𝐷 ∈ (𝐢[,]𝐷)) ↔ {𝐢, 𝐷} βŠ† (𝐢[,]𝐷)))
33618, 19, 335syl2anc 584 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ ((𝐢 ∈ (𝐢[,]𝐷) ∧ 𝐷 ∈ (𝐢[,]𝐷)) ↔ {𝐢, 𝐷} βŠ† (𝐢[,]𝐷)))
337334, 336mpbid 231 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ {𝐢, 𝐷} βŠ† (𝐢[,]𝐷))
338337, 23unssd 4185 . . . . . . . . . . . . . . . 16 (πœ‘ β†’ ({𝐢, 𝐷} βˆͺ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄}) βŠ† (𝐢[,]𝐷))
33917, 338eqsstrid 4029 . . . . . . . . . . . . . . 15 (πœ‘ β†’ 𝐻 βŠ† (𝐢[,]𝐷))
340339, 196sseldd 3982 . . . . . . . . . . . . . 14 (πœ‘ β†’ (π‘‰β€˜(𝐽 + 1)) ∈ (𝐢[,]𝐷))
341 iccleub 13375 . . . . . . . . . . . . . 14 ((𝐢 ∈ ℝ* ∧ 𝐷 ∈ ℝ* ∧ (π‘‰β€˜(𝐽 + 1)) ∈ (𝐢[,]𝐷)) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ 𝐷)
342327, 328, 340, 341syl3anc 1371 . . . . . . . . . . . . 13 (πœ‘ β†’ (π‘‰β€˜(𝐽 + 1)) ≀ 𝐷)
343342adantr 481 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ 𝐷)
344 simpr 485 . . . . . . . . . . . 12 ((πœ‘ ∧ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
345324, 325, 326, 343, 344letrd 11367 . . . . . . . . . . 11 ((πœ‘ ∧ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
346345adantlr 713 . . . . . . . . . 10 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
347 simpr 485 . . . . . . . . . . . . 13 ((πœ‘ ∧ Β¬ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ Β¬ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
348178adantr 481 . . . . . . . . . . . . . 14 ((πœ‘ ∧ Β¬ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ)
34919adantr 481 . . . . . . . . . . . . . 14 ((πœ‘ ∧ Β¬ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝐷 ∈ ℝ)
350348, 349ltnled 11357 . . . . . . . . . . . . 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 485 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
355178adantr 481 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ)
356197adantr 481 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ∈ ℝ)
357355, 356ltnled 11357 . . . . . . . . . . . . . . 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 481 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝐢 ∈ ℝ)
364178adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ)
36544adantr 481 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜π½) ∈ ℝ)
366339, 43sseldd 3982 . . . . . . . . . . . . . . . . . . . . . . 23 (πœ‘ β†’ (π‘‰β€˜π½) ∈ (𝐢[,]𝐷))
367 iccgelb 13376 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐢 ∈ ℝ* ∧ 𝐷 ∈ ℝ* ∧ (π‘‰β€˜π½) ∈ (𝐢[,]𝐷)) β†’ 𝐢 ≀ (π‘‰β€˜π½))
368327, 328, 366, 367syl3anc 1371 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ 𝐢 ≀ (π‘‰β€˜π½))
369368adantr 481 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝐢 ≀ (π‘‰β€˜π½))
370 simpr 485 . . . . . . . . . . . . . . . . . . . . 21 ((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
371363, 365, 364, 369, 370lelttrd 11368 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝐢 < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
372363, 364, 371ltled 11358 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ 𝐢 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
373372adantr 481 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ 𝐢 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
374178adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ)
37519adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ 𝐷 ∈ ℝ)
376 simpr 485 . . . . . . . . . . . . . . . . . . . 20 ((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷)
377374, 375, 376ltled 11358 . . . . . . . . . . . . . . . . . . 19 ((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ 𝐷)
378377adantlr 713 . . . . . . . . . . . . . . . . . 18 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ≀ 𝐷)
379360, 361, 362, 373, 378eliccd 44203 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ (𝐢[,]𝐷))
380167znegcld 12664 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ -𝐿 ∈ β„€)
381247, 234mulneg1d 11663 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ (-𝐿 Β· 𝑇) = -(𝐿 Β· 𝑇))
382381oveq2d 7421 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (-𝐿 Β· 𝑇)) = (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + -(𝐿 Β· 𝑇)))
383178recnd 11238 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ β„‚)
384383, 240negsubd 11573 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + -(𝐿 Β· 𝑇)) = (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) βˆ’ (𝐿 Β· 𝑇)))
385177recnd 11238 . . . . . . . . . . . . . . . . . . . . . 22 (πœ‘ β†’ (π‘„β€˜(𝐼 + 1)) ∈ β„‚)
386385, 240pncand 11568 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) βˆ’ (𝐿 Β· 𝑇)) = (π‘„β€˜(𝐼 + 1)))
387382, 384, 3863eqtrd 2776 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (-𝐿 Β· 𝑇)) = (π‘„β€˜(𝐼 + 1)))
388 ffn 6714 . . . . . . . . . . . . . . . . . . . . . 22 (𝑄:(0...𝑀)βŸΆβ„ β†’ 𝑄 Fn (0...𝑀))
38950, 388syl 17 . . . . . . . . . . . . . . . . . . . . 21 (πœ‘ β†’ 𝑄 Fn (0...𝑀))
390 fnfvelrn 7079 . . . . . . . . . . . . . . . . . . . . 21 ((𝑄 Fn (0...𝑀) ∧ (𝐼 + 1) ∈ (0...𝑀)) β†’ (π‘„β€˜(𝐼 + 1)) ∈ ran 𝑄)
391389, 176, 390syl2anc 584 . . . . . . . . . . . . . . . . . . . 20 (πœ‘ β†’ (π‘„β€˜(𝐼 + 1)) ∈ ran 𝑄)
392387, 391eqeltrd 2833 . . . . . . . . . . . . . . . . . . 19 (πœ‘ β†’ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (-𝐿 Β· 𝑇)) ∈ ran 𝑄)
393 oveq1 7412 . . . . . . . . . . . . . . . . . . . . . 22 (π‘˜ = -𝐿 β†’ (π‘˜ Β· 𝑇) = (-𝐿 Β· 𝑇))
394393oveq2d 7421 . . . . . . . . . . . . . . . . . . . . 21 (π‘˜ = -𝐿 β†’ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)) = (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (-𝐿 Β· 𝑇)))
395394eleq1d 2818 . . . . . . . . . . . . . . . . . . . 20 (π‘˜ = -𝐿 β†’ ((((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)) ∈ ran 𝑄 ↔ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (-𝐿 Β· 𝑇)) ∈ ran 𝑄))
396395rspcev 3612 . . . . . . . . . . . . . . . . . . 19 ((-𝐿 ∈ β„€ ∧ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (-𝐿 Β· 𝑇)) ∈ ran 𝑄) β†’ βˆƒπ‘˜ ∈ β„€ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)) ∈ ran 𝑄)
397380, 392, 396syl2anc 584 . . . . . . . . . . . . . . . . . 18 (πœ‘ β†’ βˆƒπ‘˜ ∈ β„€ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)) ∈ ran 𝑄)
398397ad2antrr 724 . . . . . . . . . . . . . . . . 17 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ βˆƒπ‘˜ ∈ β„€ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)) ∈ ran 𝑄)
399 oveq1 7412 . . . . . . . . . . . . . . . . . . . 20 (𝑦 = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) β†’ (𝑦 + (π‘˜ Β· 𝑇)) = (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)))
400399eleq1d 2818 . . . . . . . . . . . . . . . . . . 19 (𝑦 = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) β†’ ((𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄 ↔ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)) ∈ ran 𝑄))
401400rexbidv 3178 . . . . . . . . . . . . . . . . . 18 (𝑦 = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) β†’ (βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄 ↔ βˆƒπ‘˜ ∈ β„€ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)) ∈ ran 𝑄))
402401elrab 3682 . . . . . . . . . . . . . . . . 17 (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄} ↔ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ (𝐢[,]𝐷) ∧ βˆƒπ‘˜ ∈ β„€ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) + (π‘˜ Β· 𝑇)) ∈ ran 𝑄))
403379, 398, 402sylanbrc 583 . . . . . . . . . . . . . . . 16 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄})
404 elun2 4176 . . . . . . . . . . . . . . . 16 (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄} β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ({𝐢, 𝐷} βˆͺ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄}))
405403, 404syl 17 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ({𝐢, 𝐷} βˆͺ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄}))
40617eqcomi 2741 . . . . . . . . . . . . . . 15 ({𝐢, 𝐷} βˆͺ {𝑦 ∈ (𝐢[,]𝐷) ∣ βˆƒπ‘˜ ∈ β„€ (𝑦 + (π‘˜ Β· 𝑇)) ∈ ran 𝑄}) = 𝐻
407405, 406eleqtrdi 2843 . . . . . . . . . . . . . 14 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻)
408407adantr 481 . . . . . . . . . . . . 13 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) ∧ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻)
409 f1ofo 6837 . . . . . . . . . . . . . . . . . 18 (𝑉:(0...𝑁)–1-1-onto→𝐻 β†’ 𝑉:(0...𝑁)–onto→𝐻)
41036, 37, 4093syl 18 . . . . . . . . . . . . . . . . 17 (πœ‘ β†’ 𝑉:(0...𝑁)–onto→𝐻)
411 foelrn 7104 . . . . . . . . . . . . . . . . 17 ((𝑉:(0...𝑁)–onto→𝐻 ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻) β†’ βˆƒπ‘— ∈ (0...𝑁)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—))
412410, 411sylan 580 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻) β†’ βˆƒπ‘— ∈ (0...𝑁)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—))
413 id 22 . . . . . . . . . . . . . . . . . . 19 (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—))
414413eqcomd 2738 . . . . . . . . . . . . . . . . . 18 (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—) β†’ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
415414a1i 11 . . . . . . . . . . . . . . . . 17 ((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻) β†’ (((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—) β†’ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))))
416415reximdv 3170 . . . . . . . . . . . . . . . 16 ((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻) β†’ (βˆƒπ‘— ∈ (0...𝑁)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—) β†’ βˆƒπ‘— ∈ (0...𝑁)(π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))))
417412, 416mpd 15 . . . . . . . . . . . . . . 15 ((πœ‘ ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻) β†’ βˆƒπ‘— ∈ (0...𝑁)(π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
418417ad4ant14 750 . . . . . . . . . . . . . 14 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻) β†’ βˆƒπ‘— ∈ (0...𝑁)(π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
419 simpl 483 . . . . . . . . . . . . . . . . . . . . . . 23 (((π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
420413eqcoms 2740 . . . . . . . . . . . . . . . . . . . . . . . 24 ((π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—))
421420adantl 482 . . . . . . . . . . . . . . . . . . . . . . 23 (((π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) = (π‘‰β€˜π‘—))
422419, 421breqtrd 5173 . . . . . . . . . . . . . . . . . . . . . 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 7319 . . . . . . . . . . . . . . . . . . . . 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 485 . . . . . . . . . . . . . . . . . . . . . . 23 ((((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
433 simpl 483 . . . . . . . . . . . . . . . . . . . . . . 23 ((((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1)))
434432, 433eqbrtrd 5169 . . . . . . . . . . . . . . . . . . . . . 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 7319 . . . . . . . . . . . . . . . . . . . . 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 512 . . . . . . . . . . . . . . . . 17 (((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ 𝑗 ∈ (0...𝑁)) ∧ (π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1)))
445444ex 413 . . . . . . . . . . . . . . . 16 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ 𝑗 ∈ (0...𝑁)) β†’ ((π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) β†’ (𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1))))
446445adantlr 713 . . . . . . . . . . . . . . 15 (((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < (π‘‰β€˜(𝐽 + 1))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ 𝐻) ∧ 𝑗 ∈ (0...𝑁)) β†’ ((π‘‰β€˜π‘—) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) β†’ (𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1))))
447446reximdva 3168 . . . . . . . . . . . . . 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 13497 . . . . . . . . . . . . . . . 16 (𝑗 ∈ (0...𝑁) β†’ 𝑗 ∈ β„€)
451450ad2antlr 725 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑗 ∈ (0...𝑁)) ∧ (𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1))) β†’ 𝑗 ∈ β„€)
452 elfzelz 13497 . . . . . . . . . . . . . . . . . 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 12634 . . . . . . . . . . . . . . . 16 ((𝐽 ∈ β„€ ∧ 𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1)) β†’ Β¬ 𝑗 ∈ β„€)
458454, 455, 456, 457syl3anc 1371 . . . . . . . . . . . . . . 15 (((πœ‘ ∧ 𝑗 ∈ (0...𝑁)) ∧ (𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1))) β†’ Β¬ 𝑗 ∈ β„€)
459451, 458pm2.65da 815 . . . . . . . . . . . . . 14 ((πœ‘ ∧ 𝑗 ∈ (0...𝑁)) β†’ Β¬ (𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1)))
460459nrexdv 3149 . . . . . . . . . . . . 13 (πœ‘ β†’ Β¬ βˆƒπ‘— ∈ (0...𝑁)(𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1)))
461460ad3antrrr 728 . . . . . . . . . . . 12 ((((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) ∧ Β¬ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ Β¬ βˆƒπ‘— ∈ (0...𝑁)(𝐽 < 𝑗 ∧ 𝑗 < (𝐽 + 1)))
462449, 461condan 816 . . . . . . . . . . 11 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) < 𝐷) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
463352, 462syldan 591 . . . . . . . . . 10 (((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ∧ Β¬ 𝐷 ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
464346, 463pm2.61dan 811 . . . . . . . . 9 ((πœ‘ ∧ (π‘‰β€˜π½) < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
465323, 464mpdan 685 . . . . . . . 8 (πœ‘ β†’ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
466465adantr 481 . . . . . . 7 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
467182adantr 481 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) ∧ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ π‘₯ ∈ ℝ)
468197ad2antrr 724 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) ∧ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ∈ ℝ)
469178ad2antrr 724 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) ∧ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)) ∈ ℝ)
470 iooltub 44209 . . . . . . . . . 10 (((π‘‰β€˜π½) ∈ ℝ* ∧ (π‘‰β€˜(𝐽 + 1)) ∈ ℝ* ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ π‘₯ < (π‘‰β€˜(𝐽 + 1)))
471193, 199, 200, 470syl3anc 1371 . . . . . . . . 9 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ π‘₯ < (π‘‰β€˜(𝐽 + 1)))
472471adantr 481 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) ∧ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ π‘₯ < (π‘‰β€˜(𝐽 + 1)))
473 simpr 485 . . . . . . . 8 (((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) ∧ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
474467, 468, 469, 472, 473ltletrd 11370 . . . . . . 7 (((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) ∧ (π‘‰β€˜(𝐽 + 1)) ≀ ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) β†’ π‘₯ < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
475466, 474mpdan 685 . . . . . 6 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ π‘₯ < ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
476174, 180, 182, 203, 475eliood 44197 . . . . 5 ((πœ‘ ∧ π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))) β†’ π‘₯ ∈ (((π‘„β€˜πΌ) + (𝐿 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))))
477476ralrimiva 3146 . . . 4 (πœ‘ β†’ βˆ€π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))π‘₯ ∈ (((π‘„β€˜πΌ) + (𝐿 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))))
478 dfss3 3969 . . . 4 (((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜πΌ) + (𝐿 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))) ↔ βˆ€π‘₯ ∈ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1)))π‘₯ ∈ (((π‘„β€˜πΌ) + (𝐿 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))))
479477, 478sylibr 233 . . 3 (πœ‘ β†’ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜πΌ) + (𝐿 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))))
480 fveq2 6888 . . . . . . 7 (𝑖 = 𝐼 β†’ (π‘„β€˜π‘–) = (π‘„β€˜πΌ))
481480oveq1d 7420 . . . . . 6 (𝑖 = 𝐼 β†’ ((π‘„β€˜π‘–) + (𝑙 Β· 𝑇)) = ((π‘„β€˜πΌ) + (𝑙 Β· 𝑇)))
482 oveq1 7412 . . . . . . . 8 (𝑖 = 𝐼 β†’ (𝑖 + 1) = (𝐼 + 1))
483482fveq2d 6892 . . . . . . 7 (𝑖 = 𝐼 β†’ (π‘„β€˜(𝑖 + 1)) = (π‘„β€˜(𝐼 + 1)))
484483oveq1d 7420 . . . . . 6 (𝑖 = 𝐼 β†’ ((π‘„β€˜(𝑖 + 1)) + (𝑙 Β· 𝑇)) = ((π‘„β€˜(𝐼 + 1)) + (𝑙 Β· 𝑇)))
485481, 484oveq12d 7423 . . . . 5 (𝑖 = 𝐼 β†’ (((π‘„β€˜π‘–) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝑖 + 1)) + (𝑙 Β· 𝑇))) = (((π‘„β€˜πΌ) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝑙 Β· 𝑇))))
486485sseq2d 4013 . . . 4 (𝑖 = 𝐼 β†’ (((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜π‘–) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝑖 + 1)) + (𝑙 Β· 𝑇))) ↔ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜πΌ) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝑙 Β· 𝑇)))))
487 oveq1 7412 . . . . . . 7 (𝑙 = 𝐿 β†’ (𝑙 Β· 𝑇) = (𝐿 Β· 𝑇))
488487oveq2d 7421 . . . . . 6 (𝑙 = 𝐿 β†’ ((π‘„β€˜πΌ) + (𝑙 Β· 𝑇)) = ((π‘„β€˜πΌ) + (𝐿 Β· 𝑇)))
489487oveq2d 7421 . . . . . 6 (𝑙 = 𝐿 β†’ ((π‘„β€˜(𝐼 + 1)) + (𝑙 Β· 𝑇)) = ((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))
490488, 489oveq12d 7423 . . . . 5 (𝑙 = 𝐿 β†’ (((π‘„β€˜πΌ) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝑙 Β· 𝑇))) = (((π‘„β€˜πΌ) + (𝐿 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇))))
491490sseq2d 4013 . . . 4 (𝑙 = 𝐿 β†’ (((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜πΌ) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝑙 Β· 𝑇))) ↔ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜πΌ) + (𝐿 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))))
492486, 491rspc2ev 3623 . . 3 ((𝐼 ∈ (0..^𝑀) ∧ 𝐿 ∈ β„€ ∧ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜πΌ) + (𝐿 Β· 𝑇))(,)((π‘„β€˜(𝐼 + 1)) + (𝐿 Β· 𝑇)))) β†’ βˆƒπ‘– ∈ (0..^𝑀)βˆƒπ‘™ ∈ β„€ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜π‘–) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝑖 + 1)) + (𝑙 Β· 𝑇))))
493165, 167, 479, 492syl3anc 1371 . 2 (πœ‘ β†’ βˆƒπ‘– ∈ (0..^𝑀)βˆƒπ‘™ ∈ β„€ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜π‘–) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝑖 + 1)) + (𝑙 Β· 𝑇))))
494165, 167, 493jca31 515 1 (πœ‘ β†’ ((𝐼 ∈ (0..^𝑀) ∧ 𝐿 ∈ β„€) ∧ βˆƒπ‘– ∈ (0..^𝑀)βˆƒπ‘™ ∈ β„€ ((π‘‰β€˜π½)(,)(π‘‰β€˜(𝐽 + 1))) βŠ† (((π‘„β€˜π‘–) + (𝑙 Β· 𝑇))(,)((π‘„β€˜(𝑖 + 1)) + (𝑙 Β· 𝑇)))))
Colors of variables: wff setvar class
Syntax hints:  Β¬ wn 3   β†’ wi 4   ↔ wb 205   ∧ wa 396   = wceq 1541   ∈ wcel 2106   β‰  wne 2940  βˆ€wral 3061  βˆƒwrex 3070  {crab 3432   βˆͺ cun 3945   βŠ† wss 3947  βˆ…c0 4321  {cpr 4629   class class class wbr 5147   ↦ cmpt 5230  ran crn 5676  β„©cio 6490   Fn wfn 6535  βŸΆwf 6536  β€“ontoβ†’wfo 6538  β€“1-1-ontoβ†’wf1o 6539  β€˜cfv 6540   Isom wiso 6541  (class class class)co 7405   ↑m cmap 8816  supcsup 9431  β„‚cc 11104  β„cr 11105  0cc0 11106  1c1 11107   + caddc 11109   Β· cmul 11111  β„*cxr 11243   < clt 11244   ≀ cle 11245   βˆ’ cmin 11440  -cneg 11441   / cdiv 11867  β„•cn 12208  β„•0cn0 12468  β„€cz 12554  β„€β‰₯cuz 12818  β„+crp 12970  (,)cioo 13320  [,]cicc 13323  ...cfz 13480  ..^cfzo 13623  β™―chash 14286
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2703  ax-rep 5284  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7721  ax-inf2 9632  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-pre-sup 11184
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-rmo 3376  df-reu 3377  df-rab 3433  df-v 3476  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-op 4634  df-uni 4908  df-int 4950  df-iun 4998  df-iin 4999  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-se 5631  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-pred 6297  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-isom 6549  df-riota 7361  df-ov 7408  df-oprab 7409  df-mpo 7410  df-om 7852  df-1st 7971  df-2nd 7972  df-frecs 8262  df-wrecs 8293  df-recs 8367  df-rdg 8406  df-1o 8462  df-oadd 8466  df-er 8699  df-map 8818  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-fi 9402  df-sup 9433  df-inf 9434  df-oi 9501  df-dju 9892  df-card 9930  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-div 11868  df-nn 12209  df-2 12271  df-3 12272  df-n0 12469  df-xnn0 12541  df-z 12555  df-uz 12819  df-q 12929  df-rp 12971  df-xneg 13088  df-xadd 13089  df-xmul 13090  df-ioo 13324  df-icc 13327  df-fz 13481  df-fzo 13624  df-seq 13963  df-exp 14024  df-hash 14287  df-cj 15042  df-re 15043  df-im 15044  df-sqrt 15178  df-abs 15179  df-rest 17364  df-topgen 17385  df-psmet 20928  df-xmet 20929  df-met 20930  df-bl 20931  df-mopn 20932  df-top 22387  df-topon 22404  df-bases 22440  df-cld 22514  df-ntr 22515  df-cls 22516  df-nei 22593  df-lp 22631  df-cmp 22882
This theorem is referenced by:  fourierdlem97  44905
  Copyright terms: Public domain W3C validator