Users' Mathboxes Mathbox for Ender Ting < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  ormkglobd Structured version   Visualization version   GIF version

Theorem ormkglobd 47321
Description: If all adjacent elements of a certain sequence are ordered according to a relation which is a total order on S, then any element is so related to anything to right of it (so-called "global monotonicity"). Deduction form. (Contributed by Ender Ting, 30-Apr-2025.)
Hypotheses
Ref Expression
ormkglobd.1 (𝜑𝑅 Or 𝑆)
ormkglobd.2 (𝜑 → ∀𝑘 ∈ (0..^(𝑇 + 1))(𝐵𝑘) ∈ 𝑆)
ormkglobd.3 (𝜑 → ∀𝑘 ∈ (0..^𝑇)(𝐵𝑘)𝑅(𝐵‘(𝑘 + 1)))
Assertion
Ref Expression
ormkglobd (𝜑 → ∀𝑘 ∈ (0..^𝑇)∀𝑡 ∈ (1..^(𝑇 + 1))(𝑘 < 𝑡 → (𝐵𝑘)𝑅(𝐵𝑡)))
Distinct variable groups:   𝐵,𝑘   𝑅,𝑘   𝑆,𝑘   𝑇,𝑘,𝑡   𝜑,𝑘,𝑡
Allowed substitution hints:   𝐵(𝑡)   𝑅(𝑡)   𝑆(𝑡)

Proof of Theorem ormkglobd
Dummy variables 𝑎 𝑏 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 2a1 28 . . . . . . 7 (𝜑 → ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → (𝑘 < 𝑡𝜑)))
21imp 406 . . . . . 6 ((𝜑 ∧ (𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1)))) → (𝑘 < 𝑡𝜑))
3 2a1 28 . . . . . . . 8 (𝑘 ∈ (0..^𝑇) → (𝑡 ∈ (1..^(𝑇 + 1)) → (𝑘 < 𝑡𝑘 ∈ (0..^𝑇))))
43imp 406 . . . . . . 7 ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → (𝑘 < 𝑡𝑘 ∈ (0..^𝑇)))
54adantl 481 . . . . . 6 ((𝜑 ∧ (𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1)))) → (𝑘 < 𝑡𝑘 ∈ (0..^𝑇)))
62, 5jcad 512 . . . . 5 ((𝜑 ∧ (𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1)))) → (𝑘 < 𝑡 → (𝜑𝑘 ∈ (0..^𝑇))))
7 elfzoelz 13604 . . . . . . . . 9 (𝑡 ∈ (1..^(𝑇 + 1)) → 𝑡 ∈ ℤ)
87adantl 481 . . . . . . . 8 ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → 𝑡 ∈ ℤ)
98a1d 25 . . . . . . 7 ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → (𝑘 < 𝑡𝑡 ∈ ℤ))
10 elfzoelz 13604 . . . . . . . . . 10 (𝑘 ∈ (0..^𝑇) → 𝑘 ∈ ℤ)
1110adantr 480 . . . . . . . . 9 ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → 𝑘 ∈ ℤ)
12 elfzoelz 13604 . . . . . . . . . 10 (𝑡 ∈ (1..^(𝑇 + 1)) → 𝑡 ∈ ℤ)
1312adantl 481 . . . . . . . . 9 ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → 𝑡 ∈ ℤ)
14 zltp1le 12568 . . . . . . . . 9 ((𝑘 ∈ ℤ ∧ 𝑡 ∈ ℤ) → (𝑘 < 𝑡 ↔ (𝑘 + 1) ≤ 𝑡))
1511, 13, 14syl2anc 585 . . . . . . . 8 ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → (𝑘 < 𝑡 ↔ (𝑘 + 1) ≤ 𝑡))
1615biimpd 229 . . . . . . 7 ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → (𝑘 < 𝑡 → (𝑘 + 1) ≤ 𝑡))
17 elfzoelz 13604 . . . . . . . . . . . 12 (𝑡 ∈ (1..^(𝑇 + 1)) → 𝑡 ∈ ℤ)
1817adantl 481 . . . . . . . . . . 11 ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → 𝑡 ∈ ℤ)
1918zred 12624 . . . . . . . . . 10 ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → 𝑡 ∈ ℝ)
20 elfzoel2 13603 . . . . . . . . . . . 12 (𝑘 ∈ (0..^𝑇) → 𝑇 ∈ ℤ)
2120adantr 480 . . . . . . . . . . 11 ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → 𝑇 ∈ ℤ)
2221zred 12624 . . . . . . . . . 10 ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → 𝑇 ∈ ℝ)
23 1red 11136 . . . . . . . . . 10 ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → 1 ∈ ℝ)
2419, 22, 233jca 1129 . . . . . . . . 9 ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → (𝑡 ∈ ℝ ∧ 𝑇 ∈ ℝ ∧ 1 ∈ ℝ))
25 elfzop1le2 13618 . . . . . . . . . 10 (𝑡 ∈ (1..^(𝑇 + 1)) → (𝑡 + 1) ≤ (𝑇 + 1))
2625adantl 481 . . . . . . . . 9 ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → (𝑡 + 1) ≤ (𝑇 + 1))
27 leadd1 11609 . . . . . . . . . 10 ((𝑡 ∈ ℝ ∧ 𝑇 ∈ ℝ ∧ 1 ∈ ℝ) → (𝑡𝑇 ↔ (𝑡 + 1) ≤ (𝑇 + 1)))
2827biimprd 248 . . . . . . . . 9 ((𝑡 ∈ ℝ ∧ 𝑇 ∈ ℝ ∧ 1 ∈ ℝ) → ((𝑡 + 1) ≤ (𝑇 + 1) → 𝑡𝑇))
2924, 26, 28sylc 65 . . . . . . . 8 ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → 𝑡𝑇)
3029a1d 25 . . . . . . 7 ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → (𝑘 < 𝑡𝑡𝑇))
319, 16, 303jcad 1130 . . . . . 6 ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → (𝑘 < 𝑡 → (𝑡 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑡𝑡𝑇)))
3231adantl 481 . . . . 5 ((𝜑 ∧ (𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1)))) → (𝑘 < 𝑡 → (𝑡 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑡𝑡𝑇)))
336, 32jcad 512 . . . 4 ((𝜑 ∧ (𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1)))) → (𝑘 < 𝑡 → ((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑡 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑡𝑡𝑇))))
3433ex 412 . . 3 (𝜑 → ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → (𝑘 < 𝑡 → ((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑡 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑡𝑡𝑇)))))
35 fveq2 6834 . . . . 5 (𝑎 = (𝑘 + 1) → (𝐵𝑎) = (𝐵‘(𝑘 + 1)))
3635breq2d 5098 . . . 4 (𝑎 = (𝑘 + 1) → ((𝐵𝑘)𝑅(𝐵𝑎) ↔ (𝐵𝑘)𝑅(𝐵‘(𝑘 + 1))))
37 fveq2 6834 . . . . 5 (𝑎 = 𝑏 → (𝐵𝑎) = (𝐵𝑏))
3837breq2d 5098 . . . 4 (𝑎 = 𝑏 → ((𝐵𝑘)𝑅(𝐵𝑎) ↔ (𝐵𝑘)𝑅(𝐵𝑏)))
39 fveq2 6834 . . . . 5 (𝑎 = (𝑏 + 1) → (𝐵𝑎) = (𝐵‘(𝑏 + 1)))
4039breq2d 5098 . . . 4 (𝑎 = (𝑏 + 1) → ((𝐵𝑘)𝑅(𝐵𝑎) ↔ (𝐵𝑘)𝑅(𝐵‘(𝑏 + 1))))
41 fveq2 6834 . . . . 5 (𝑎 = 𝑡 → (𝐵𝑎) = (𝐵𝑡))
4241breq2d 5098 . . . 4 (𝑎 = 𝑡 → ((𝐵𝑘)𝑅(𝐵𝑎) ↔ (𝐵𝑘)𝑅(𝐵𝑡)))
43 ormkglobd.3 . . . . 5 (𝜑 → ∀𝑘 ∈ (0..^𝑇)(𝐵𝑘)𝑅(𝐵‘(𝑘 + 1)))
4443r19.21bi 3230 . . . 4 ((𝜑𝑘 ∈ (0..^𝑇)) → (𝐵𝑘)𝑅(𝐵‘(𝑘 + 1)))
45 simp1l 1199 . . . . . 6 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝜑)
46 ormkglobd.1 . . . . . 6 (𝜑𝑅 Or 𝑆)
4745, 46syl 17 . . . . 5 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑅 Or 𝑆)
48 elfzofz 13621 . . . . . . . 8 (𝑘 ∈ (0..^𝑇) → 𝑘 ∈ (0...𝑇))
49 elfzoel2 13603 . . . . . . . . 9 (𝑘 ∈ (0..^𝑇) → 𝑇 ∈ ℤ)
50 fzval3 13680 . . . . . . . . 9 (𝑇 ∈ ℤ → (0...𝑇) = (0..^(𝑇 + 1)))
5149, 50syl 17 . . . . . . . 8 (𝑘 ∈ (0..^𝑇) → (0...𝑇) = (0..^(𝑇 + 1)))
5248, 51eleqtrd 2839 . . . . . . 7 (𝑘 ∈ (0..^𝑇) → 𝑘 ∈ (0..^(𝑇 + 1)))
53 ormkglobd.2 . . . . . . . 8 (𝜑 → ∀𝑘 ∈ (0..^(𝑇 + 1))(𝐵𝑘) ∈ 𝑆)
5453r19.21bi 3230 . . . . . . 7 ((𝜑𝑘 ∈ (0..^(𝑇 + 1))) → (𝐵𝑘) ∈ 𝑆)
5552, 54sylan2 594 . . . . . 6 ((𝜑𝑘 ∈ (0..^𝑇)) → (𝐵𝑘) ∈ 𝑆)
56553ad2ant1 1134 . . . . 5 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝐵𝑘) ∈ 𝑆)
57 simp1l 1199 . . . . . 6 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝜑)
58 simp21 1208 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ ℤ)
59 0red 11138 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 0 ∈ ℝ)
60 simp1r 1200 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ (0..^𝑇))
61 elfzoelz 13604 . . . . . . . . . . . 12 (𝑘 ∈ (0..^𝑇) → 𝑘 ∈ ℤ)
6260, 61syl 17 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ ℤ)
6362zred 12624 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ ℝ)
64 1red 11136 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 1 ∈ ℝ)
6563, 64readdcld 11165 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝑘 + 1) ∈ ℝ)
66 simp21 1208 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ ℤ)
6766zred 12624 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ ℝ)
68 simp1r 1200 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ (0..^𝑇))
69 elfzoelz 13604 . . . . . . . . . . . 12 (𝑘 ∈ (0..^𝑇) → 𝑘 ∈ ℤ)
7068, 69syl 17 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ ℤ)
7170zred 12624 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ ℝ)
72 1red 11136 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 1 ∈ ℝ)
73 simp1r 1200 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ (0..^𝑇))
74 elfzole1 13613 . . . . . . . . . . 11 (𝑘 ∈ (0..^𝑇) → 0 ≤ 𝑘)
7573, 74syl 17 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 0 ≤ 𝑘)
76 0le1 11664 . . . . . . . . . . 11 0 ≤ 1
7776a1i 11 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 0 ≤ 1)
7871, 72, 75, 77addge0d 11717 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 0 ≤ (𝑘 + 1))
79 simp22 1209 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝑘 + 1) ≤ 𝑏)
8059, 65, 67, 78, 79letrd 11294 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 0 ≤ 𝑏)
81 elnn0z 12528 . . . . . . . 8 (𝑏 ∈ ℕ0 ↔ (𝑏 ∈ ℤ ∧ 0 ≤ 𝑏))
8258, 80, 81sylanbrc 584 . . . . . . 7 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ ℕ0)
83 simp1r 1200 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ (0..^𝑇))
84 elfzoel2 13603 . . . . . . . . 9 (𝑘 ∈ (0..^𝑇) → 𝑇 ∈ ℤ)
8583, 84syl 17 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑇 ∈ ℤ)
8685peano2zd 12627 . . . . . . 7 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝑇 + 1) ∈ ℤ)
87 simp21 1208 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ ℤ)
8887zred 12624 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ ℝ)
89 simp1r 1200 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ (0..^𝑇))
90 elfzoel2 13603 . . . . . . . . . 10 (𝑘 ∈ (0..^𝑇) → 𝑇 ∈ ℤ)
9189, 90syl 17 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑇 ∈ ℤ)
9291zred 12624 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑇 ∈ ℝ)
93 simp1r 1200 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ (0..^𝑇))
94 elfzoel2 13603 . . . . . . . . . . 11 (𝑘 ∈ (0..^𝑇) → 𝑇 ∈ ℤ)
9593, 94syl 17 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑇 ∈ ℤ)
9695zred 12624 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑇 ∈ ℝ)
97 1red 11136 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 1 ∈ ℝ)
9896, 97readdcld 11165 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝑇 + 1) ∈ ℝ)
99 simp23 1210 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 < 𝑇)
100 simp1r 1200 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ (0..^𝑇))
101 elfzoel2 13603 . . . . . . . . . . 11 (𝑘 ∈ (0..^𝑇) → 𝑇 ∈ ℤ)
102100, 101syl 17 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑇 ∈ ℤ)
103102zred 12624 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑇 ∈ ℝ)
104103ltp1d 12077 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑇 < (𝑇 + 1))
10588, 92, 98, 99, 104lttrd 11298 . . . . . . 7 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 < (𝑇 + 1))
106 elfzo0z 13647 . . . . . . 7 (𝑏 ∈ (0..^(𝑇 + 1)) ↔ (𝑏 ∈ ℕ0 ∧ (𝑇 + 1) ∈ ℤ ∧ 𝑏 < (𝑇 + 1)))
10782, 86, 105, 106syl3anbrc 1345 . . . . . 6 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ (0..^(𝑇 + 1)))
108 eleq1w 2820 . . . . . . . . 9 (𝑘 = 𝑏 → (𝑘 ∈ (0..^(𝑇 + 1)) ↔ 𝑏 ∈ (0..^(𝑇 + 1))))
109108anbi2d 631 . . . . . . . 8 (𝑘 = 𝑏 → ((𝜑𝑘 ∈ (0..^(𝑇 + 1))) ↔ (𝜑𝑏 ∈ (0..^(𝑇 + 1)))))
11053r19.21bi 3230 . . . . . . . . 9 ((𝜑𝑘 ∈ (0..^(𝑇 + 1))) → (𝐵𝑘) ∈ 𝑆)
111 fveq2 6834 . . . . . . . . . 10 (𝑘 = 𝑏 → (𝐵𝑘) = (𝐵𝑏))
112111eleq1d 2822 . . . . . . . . 9 (𝑘 = 𝑏 → ((𝐵𝑘) ∈ 𝑆 ↔ (𝐵𝑏) ∈ 𝑆))
113110, 112imbitrid 244 . . . . . . . 8 (𝑘 = 𝑏 → ((𝜑𝑘 ∈ (0..^(𝑇 + 1))) → (𝐵𝑏) ∈ 𝑆))
114109, 113sylbird 260 . . . . . . 7 (𝑘 = 𝑏 → ((𝜑𝑏 ∈ (0..^(𝑇 + 1))) → (𝐵𝑏) ∈ 𝑆))
115 ax6ev 1971 . . . . . . 7 𝑘 𝑘 = 𝑏
116114, 115exlimiiv 1933 . . . . . 6 ((𝜑𝑏 ∈ (0..^(𝑇 + 1))) → (𝐵𝑏) ∈ 𝑆)
11757, 107, 116syl2anc 585 . . . . 5 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝐵𝑏) ∈ 𝑆)
118 simp1l 1199 . . . . . 6 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝜑)
119 simp21 1208 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ ℤ)
120 0red 11138 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 0 ∈ ℝ)
121 simp1r 1200 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ (0..^𝑇))
122 elfzoelz 13604 . . . . . . . . . . . . 13 (𝑘 ∈ (0..^𝑇) → 𝑘 ∈ ℤ)
123121, 122syl 17 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ ℤ)
124123zred 12624 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ ℝ)
125 1red 11136 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 1 ∈ ℝ)
126124, 125readdcld 11165 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝑘 + 1) ∈ ℝ)
127 simp21 1208 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ ℤ)
128127zred 12624 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ ℝ)
129 simp1r 1200 . . . . . . . . . . . . 13 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ (0..^𝑇))
130 elfzoelz 13604 . . . . . . . . . . . . 13 (𝑘 ∈ (0..^𝑇) → 𝑘 ∈ ℤ)
131129, 130syl 17 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ ℤ)
132131zred 12624 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ ℝ)
133 1red 11136 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 1 ∈ ℝ)
134 simp1r 1200 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ (0..^𝑇))
135 elfzole1 13613 . . . . . . . . . . . 12 (𝑘 ∈ (0..^𝑇) → 0 ≤ 𝑘)
136134, 135syl 17 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 0 ≤ 𝑘)
13776a1i 11 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 0 ≤ 1)
138132, 133, 136, 137addge0d 11717 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 0 ≤ (𝑘 + 1))
139 simp22 1209 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝑘 + 1) ≤ 𝑏)
140120, 126, 128, 138, 139letrd 11294 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 0 ≤ 𝑏)
141 elnn0z 12528 . . . . . . . . 9 (𝑏 ∈ ℕ0 ↔ (𝑏 ∈ ℤ ∧ 0 ≤ 𝑏))
142119, 140, 141sylanbrc 584 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ ℕ0)
143 1nn0 12444 . . . . . . . . 9 1 ∈ ℕ0
144143a1i 11 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 1 ∈ ℕ0)
145142, 144nn0addcld 12493 . . . . . . 7 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝑏 + 1) ∈ ℕ0)
146 simp1r 1200 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ (0..^𝑇))
147 elfzoel2 13603 . . . . . . . . 9 (𝑘 ∈ (0..^𝑇) → 𝑇 ∈ ℤ)
148146, 147syl 17 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑇 ∈ ℤ)
149148peano2zd 12627 . . . . . . 7 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝑇 + 1) ∈ ℤ)
150 simp21 1208 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ ℤ)
151150zred 12624 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ ℝ)
152 simp1r 1200 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ (0..^𝑇))
153 elfzoel2 13603 . . . . . . . . . 10 (𝑘 ∈ (0..^𝑇) → 𝑇 ∈ ℤ)
154152, 153syl 17 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑇 ∈ ℤ)
155154zred 12624 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑇 ∈ ℝ)
156 1red 11136 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 1 ∈ ℝ)
157 simp23 1210 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 < 𝑇)
158151, 155, 156, 157ltadd1dd 11752 . . . . . . 7 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝑏 + 1) < (𝑇 + 1))
159 elfzo0z 13647 . . . . . . 7 ((𝑏 + 1) ∈ (0..^(𝑇 + 1)) ↔ ((𝑏 + 1) ∈ ℕ0 ∧ (𝑇 + 1) ∈ ℤ ∧ (𝑏 + 1) < (𝑇 + 1)))
160145, 149, 158, 159syl3anbrc 1345 . . . . . 6 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝑏 + 1) ∈ (0..^(𝑇 + 1)))
161 ovex 7393 . . . . . . 7 (𝑏 + 1) ∈ V
162 eleq1 2825 . . . . . . . . 9 (𝑘 = (𝑏 + 1) → (𝑘 ∈ (0..^(𝑇 + 1)) ↔ (𝑏 + 1) ∈ (0..^(𝑇 + 1))))
163162anbi2d 631 . . . . . . . 8 (𝑘 = (𝑏 + 1) → ((𝜑𝑘 ∈ (0..^(𝑇 + 1))) ↔ (𝜑 ∧ (𝑏 + 1) ∈ (0..^(𝑇 + 1)))))
16453r19.21bi 3230 . . . . . . . . 9 ((𝜑𝑘 ∈ (0..^(𝑇 + 1))) → (𝐵𝑘) ∈ 𝑆)
165 fveq2 6834 . . . . . . . . . 10 (𝑘 = (𝑏 + 1) → (𝐵𝑘) = (𝐵‘(𝑏 + 1)))
166165eleq1d 2822 . . . . . . . . 9 (𝑘 = (𝑏 + 1) → ((𝐵𝑘) ∈ 𝑆 ↔ (𝐵‘(𝑏 + 1)) ∈ 𝑆))
167164, 166imbitrid 244 . . . . . . . 8 (𝑘 = (𝑏 + 1) → ((𝜑𝑘 ∈ (0..^(𝑇 + 1))) → (𝐵‘(𝑏 + 1)) ∈ 𝑆))
168163, 167sylbird 260 . . . . . . 7 (𝑘 = (𝑏 + 1) → ((𝜑 ∧ (𝑏 + 1) ∈ (0..^(𝑇 + 1))) → (𝐵‘(𝑏 + 1)) ∈ 𝑆))
169161, 168vtocle 3501 . . . . . 6 ((𝜑 ∧ (𝑏 + 1) ∈ (0..^(𝑇 + 1))) → (𝐵‘(𝑏 + 1)) ∈ 𝑆)
170118, 160, 169syl2anc 585 . . . . 5 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝐵‘(𝑏 + 1)) ∈ 𝑆)
171 simp3 1139 . . . . 5 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝐵𝑘)𝑅(𝐵𝑏))
172 simp1l 1199 . . . . . 6 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝜑)
173 simp21 1208 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ ℤ)
174 0red 11138 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 0 ∈ ℝ)
175 simp1r 1200 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ (0..^𝑇))
176 elfzoelz 13604 . . . . . . . . . . . 12 (𝑘 ∈ (0..^𝑇) → 𝑘 ∈ ℤ)
177175, 176syl 17 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ ℤ)
178177zred 12624 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ ℝ)
179 1red 11136 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 1 ∈ ℝ)
180178, 179readdcld 11165 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝑘 + 1) ∈ ℝ)
181 simp21 1208 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ ℤ)
182181zred 12624 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ ℝ)
183 simp1r 1200 . . . . . . . . . . . 12 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ (0..^𝑇))
184 elfzoelz 13604 . . . . . . . . . . . 12 (𝑘 ∈ (0..^𝑇) → 𝑘 ∈ ℤ)
185183, 184syl 17 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ ℤ)
186185zred 12624 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ ℝ)
187 1red 11136 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 1 ∈ ℝ)
188 simp1r 1200 . . . . . . . . . . 11 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ (0..^𝑇))
189 elfzole1 13613 . . . . . . . . . . 11 (𝑘 ∈ (0..^𝑇) → 0 ≤ 𝑘)
190188, 189syl 17 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 0 ≤ 𝑘)
19176a1i 11 . . . . . . . . . 10 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 0 ≤ 1)
192186, 187, 190, 191addge0d 11717 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 0 ≤ (𝑘 + 1))
193 simp22 1209 . . . . . . . . 9 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝑘 + 1) ≤ 𝑏)
194174, 180, 182, 192, 193letrd 11294 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 0 ≤ 𝑏)
195 elnn0z 12528 . . . . . . . 8 (𝑏 ∈ ℕ0 ↔ (𝑏 ∈ ℤ ∧ 0 ≤ 𝑏))
196173, 194, 195sylanbrc 584 . . . . . . 7 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ ℕ0)
197 simp1r 1200 . . . . . . . 8 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑘 ∈ (0..^𝑇))
198 elfzoel2 13603 . . . . . . . 8 (𝑘 ∈ (0..^𝑇) → 𝑇 ∈ ℤ)
199197, 198syl 17 . . . . . . 7 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑇 ∈ ℤ)
200 simp23 1210 . . . . . . 7 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 < 𝑇)
201 elfzo0z 13647 . . . . . . 7 (𝑏 ∈ (0..^𝑇) ↔ (𝑏 ∈ ℕ0𝑇 ∈ ℤ ∧ 𝑏 < 𝑇))
202196, 199, 200, 201syl3anbrc 1345 . . . . . 6 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → 𝑏 ∈ (0..^𝑇))
203 eleq1w 2820 . . . . . . . . 9 (𝑏 = 𝑘 → (𝑏 ∈ (0..^𝑇) ↔ 𝑘 ∈ (0..^𝑇)))
204203anbi2d 631 . . . . . . . 8 (𝑏 = 𝑘 → ((𝜑𝑏 ∈ (0..^𝑇)) ↔ (𝜑𝑘 ∈ (0..^𝑇))))
20543r19.21bi 3230 . . . . . . . . 9 ((𝜑𝑘 ∈ (0..^𝑇)) → (𝐵𝑘)𝑅(𝐵‘(𝑘 + 1)))
206 fveq2 6834 . . . . . . . . . 10 (𝑏 = 𝑘 → (𝐵𝑏) = (𝐵𝑘))
207 fvoveq1 7383 . . . . . . . . . 10 (𝑏 = 𝑘 → (𝐵‘(𝑏 + 1)) = (𝐵‘(𝑘 + 1)))
208206, 207breq12d 5099 . . . . . . . . 9 (𝑏 = 𝑘 → ((𝐵𝑏)𝑅(𝐵‘(𝑏 + 1)) ↔ (𝐵𝑘)𝑅(𝐵‘(𝑘 + 1))))
209205, 208imbitrrid 246 . . . . . . . 8 (𝑏 = 𝑘 → ((𝜑𝑘 ∈ (0..^𝑇)) → (𝐵𝑏)𝑅(𝐵‘(𝑏 + 1))))
210204, 209sylbid 240 . . . . . . 7 (𝑏 = 𝑘 → ((𝜑𝑏 ∈ (0..^𝑇)) → (𝐵𝑏)𝑅(𝐵‘(𝑏 + 1))))
211 ax6evr 2017 . . . . . . 7 𝑘 𝑏 = 𝑘
212210, 211exlimiiv 1933 . . . . . 6 ((𝜑𝑏 ∈ (0..^𝑇)) → (𝐵𝑏)𝑅(𝐵‘(𝑏 + 1)))
213172, 202, 212syl2anc 585 . . . . 5 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝐵𝑏)𝑅(𝐵‘(𝑏 + 1)))
21447, 56, 117, 170, 171, 213sotrd 5558 . . . 4 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑏 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑏𝑏 < 𝑇) ∧ (𝐵𝑘)𝑅(𝐵𝑏)) → (𝐵𝑘)𝑅(𝐵‘(𝑏 + 1)))
215 elfzoelz 13604 . . . . . 6 (𝑘 ∈ (0..^𝑇) → 𝑘 ∈ ℤ)
216215adantl 481 . . . . 5 ((𝜑𝑘 ∈ (0..^𝑇)) → 𝑘 ∈ ℤ)
217216peano2zd 12627 . . . 4 ((𝜑𝑘 ∈ (0..^𝑇)) → (𝑘 + 1) ∈ ℤ)
218 elfzoel2 13603 . . . . 5 (𝑘 ∈ (0..^𝑇) → 𝑇 ∈ ℤ)
219218adantl 481 . . . 4 ((𝜑𝑘 ∈ (0..^𝑇)) → 𝑇 ∈ ℤ)
220 elfzop1le2 13618 . . . . 5 (𝑘 ∈ (0..^𝑇) → (𝑘 + 1) ≤ 𝑇)
221220adantl 481 . . . 4 ((𝜑𝑘 ∈ (0..^𝑇)) → (𝑘 + 1) ≤ 𝑇)
22236, 38, 40, 42, 44, 214, 217, 219, 221fzindd 12622 . . 3 (((𝜑𝑘 ∈ (0..^𝑇)) ∧ (𝑡 ∈ ℤ ∧ (𝑘 + 1) ≤ 𝑡𝑡𝑇)) → (𝐵𝑘)𝑅(𝐵𝑡))
22334, 222syl8 76 . 2 (𝜑 → ((𝑘 ∈ (0..^𝑇) ∧ 𝑡 ∈ (1..^(𝑇 + 1))) → (𝑘 < 𝑡 → (𝐵𝑘)𝑅(𝐵𝑡))))
224223ralrimivv 3179 1 (𝜑 → ∀𝑘 ∈ (0..^𝑇)∀𝑡 ∈ (1..^(𝑇 + 1))(𝑘 < 𝑡 → (𝐵𝑘)𝑅(𝐵𝑡)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  w3a 1087   = wceq 1542  wcel 2114  wral 3052   class class class wbr 5086   Or wor 5531  cfv 6492  (class class class)co 7360  cr 11028  0cc0 11029  1c1 11030   + caddc 11032   < clt 11170  cle 11171  0cn0 12428  cz 12515  ...cfz 13452  ..^cfzo 13599
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 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-sep 5231  ax-nul 5241  ax-pow 5302  ax-pr 5370  ax-un 7682  ax-cnex 11085  ax-resscn 11086  ax-1cn 11087  ax-icn 11088  ax-addcl 11089  ax-addrcl 11090  ax-mulcl 11091  ax-mulrcl 11092  ax-mulcom 11093  ax-addass 11094  ax-mulass 11095  ax-distr 11096  ax-i2m1 11097  ax-1ne0 11098  ax-1rid 11099  ax-rnegex 11100  ax-rrecex 11101  ax-cnre 11102  ax-pre-lttri 11103  ax-pre-lttrn 11104  ax-pre-ltadd 11105  ax-pre-mulgt0 11106
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-iun 4936  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5519  df-eprel 5524  df-po 5532  df-so 5533  df-fr 5577  df-we 5579  df-xp 5630  df-rel 5631  df-cnv 5632  df-co 5633  df-dm 5634  df-rn 5635  df-res 5636  df-ima 5637  df-pred 6259  df-ord 6320  df-on 6321  df-lim 6322  df-suc 6323  df-iota 6448  df-fun 6494  df-fn 6495  df-f 6496  df-f1 6497  df-fo 6498  df-f1o 6499  df-fv 6500  df-riota 7317  df-ov 7363  df-oprab 7364  df-mpo 7365  df-om 7811  df-1st 7935  df-2nd 7936  df-frecs 8224  df-wrecs 8255  df-recs 8304  df-rdg 8342  df-er 8636  df-en 8887  df-dom 8888  df-sdom 8889  df-pnf 11172  df-mnf 11173  df-xr 11174  df-ltxr 11175  df-le 11176  df-sub 11370  df-neg 11371  df-nn 12166  df-n0 12429  df-z 12516  df-uz 12780  df-fz 13453  df-fzo 13600
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator