Metamath Proof Explorer


Theorem uzublem

Description: A set of reals, indexed by upper integers, is bound if and only if any upper part is bound. (Contributed by Glauco Siliprandi, 23-Oct-2021)

Ref Expression
Hypotheses uzublem.1 ⊢ Ⅎ j φ
uzublem.2 ⊢ Ⅎ _ j X
uzublem.3 ⊢ φ → M ∈ ℤ
uzublem.4 ⊢ Z = ℤ ≥ M
uzublem.5 ⊢ φ → Y ∈ ℝ
uzublem.6 ⊢ W = sup ran ⁡ j ∈ M … K ⟼ B ℝ <
uzublem.7 ⊢ X = if W ≤ Y Y W
uzublem.8 ⊢ φ → K ∈ Z
uzublem.9 ⊢ φ ∧ j ∈ Z → B ∈ ℝ
uzublem.10 ⊢ φ → ∀ j ∈ ℤ ≥ K B ≤ Y
Assertion uzublem ⊢ φ → ∃ x ∈ ℝ ∀ j ∈ Z B ≤ x

Proof

Step Hyp Ref Expression
1 uzublem.1 ⊢ Ⅎ j φ
2 uzublem.2 ⊢ Ⅎ _ j X
3 uzublem.3 ⊢ φ → M ∈ ℤ
4 uzublem.4 ⊢ Z = ℤ ≥ M
5 uzublem.5 ⊢ φ → Y ∈ ℝ
6 uzublem.6 ⊢ W = sup ran ⁡ j ∈ M … K ⟼ B ℝ <
7 uzublem.7 ⊢ X = if W ≤ Y Y W
8 uzublem.8 ⊢ φ → K ∈ Z
9 uzublem.9 ⊢ φ ∧ j ∈ Z → B ∈ ℝ
10 uzublem.10 ⊢ φ → ∀ j ∈ ℤ ≥ K B ≤ Y
11 6 a1i ⊢ φ → W = sup ran ⁡ j ∈ M … K ⟼ B ℝ <
12 ltso ⊢ < Or ℝ
13 12 a1i ⊢ φ → < Or ℝ
14 fzfid ⊢ φ → M … K ∈ Fin
15 4 eluzelz2 ⊢ K ∈ Z → K ∈ ℤ
16 8 15 syl ⊢ φ → K ∈ ℤ
17 3 zred ⊢ φ → M ∈ ℝ
18 17 leidd ⊢ φ → M ≤ M
19 8 4 eleqtrdi ⊢ φ → K ∈ ℤ ≥ M
20 eluzle ⊢ K ∈ ℤ ≥ M → M ≤ K
21 19 20 syl ⊢ φ → M ≤ K
22 3 16 3 18 21 elfzd ⊢ φ → M ∈ M … K
23 22 ne0d ⊢ φ → M … K ≠ ∅
24 fzssuz ⊢ M … K ⊆ ℤ ≥ M
25 4 eqcomi ⊢ ℤ ≥ M = Z
26 24 25 sseqtri ⊢ M … K ⊆ Z
27 id ⊢ j ∈ M … K → j ∈ M … K
28 26 27 sselid ⊢ j ∈ M … K → j ∈ Z
29 28 9 sylan2 ⊢ φ ∧ j ∈ M … K → B ∈ ℝ
30 1 13 14 23 29 fisupclrnmpt ⊢ φ → sup ran ⁡ j ∈ M … K ⟼ B ℝ < ∈ ℝ
31 11 30 eqeltrd ⊢ φ → W ∈ ℝ
32 5 31 ifcld ⊢ φ → if W ≤ Y Y W ∈ ℝ
33 7 32 eqeltrid ⊢ φ → X ∈ ℝ
34 9 adantr ⊢ φ ∧ j ∈ Z ∧ K ≤ j → B ∈ ℝ
35 5 ad2antrr ⊢ φ ∧ j ∈ Z ∧ K ≤ j → Y ∈ ℝ
36 33 ad2antrr ⊢ φ ∧ j ∈ Z ∧ K ≤ j → X ∈ ℝ
37 10 ad2antrr ⊢ φ ∧ j ∈ Z ∧ K ≤ j → ∀ j ∈ ℤ ≥ K B ≤ Y
38 eqid ⊢ ℤ ≥ K = ℤ ≥ K
39 16 ad2antrr ⊢ φ ∧ j ∈ Z ∧ K ≤ j → K ∈ ℤ
40 4 eluzelz2 ⊢ j ∈ Z → j ∈ ℤ
41 40 ad2antlr ⊢ φ ∧ j ∈ Z ∧ K ≤ j → j ∈ ℤ
42 simpr ⊢ φ ∧ j ∈ Z ∧ K ≤ j → K ≤ j
43 38 39 41 42 eluzd ⊢ φ ∧ j ∈ Z ∧ K ≤ j → j ∈ ℤ ≥ K
44 rspa ⊢ ∀ j ∈ ℤ ≥ K B ≤ Y ∧ j ∈ ℤ ≥ K → B ≤ Y
45 37 43 44 syl2anc ⊢ φ ∧ j ∈ Z ∧ K ≤ j → B ≤ Y
46 max2 ⊢ W ∈ ℝ ∧ Y ∈ ℝ → Y ≤ if W ≤ Y Y W
47 31 5 46 syl2anc ⊢ φ → Y ≤ if W ≤ Y Y W
48 47 7 breqtrrdi ⊢ φ → Y ≤ X
49 48 ad2antrr ⊢ φ ∧ j ∈ Z ∧ K ≤ j → Y ≤ X
50 34 35 36 45 49 letrd ⊢ φ ∧ j ∈ Z ∧ K ≤ j → B ≤ X
51 simpr ⊢ φ ∧ j ∈ Z ∧ ¬ K ≤ j → ¬ K ≤ j
52 uzssre ⊢ ℤ ≥ M ⊆ ℝ
53 4 52 eqsstri ⊢ Z ⊆ ℝ
54 53 sseli ⊢ j ∈ Z → j ∈ ℝ
55 54 ad2antlr ⊢ φ ∧ j ∈ Z ∧ ¬ K ≤ j → j ∈ ℝ
56 53 8 sselid ⊢ φ → K ∈ ℝ
57 56 ad2antrr ⊢ φ ∧ j ∈ Z ∧ ¬ K ≤ j → K ∈ ℝ
58 55 57 ltnled ⊢ φ ∧ j ∈ Z ∧ ¬ K ≤ j → j < K ↔ ¬ K ≤ j
59 51 58 mpbird ⊢ φ ∧ j ∈ Z ∧ ¬ K ≤ j → j < K
60 9 adantr ⊢ φ ∧ j ∈ Z ∧ j < K → B ∈ ℝ
61 6 31 eqeltrrid ⊢ φ → sup ran ⁡ j ∈ M … K ⟼ B ℝ < ∈ ℝ
62 6 61 eqeltrid ⊢ φ → W ∈ ℝ
63 62 ad2antrr ⊢ φ ∧ j ∈ Z ∧ j < K → W ∈ ℝ
64 5 62 ifcld ⊢ φ → if W ≤ Y Y W ∈ ℝ
65 7 64 eqeltrid ⊢ φ → X ∈ ℝ
66 65 ad2antrr ⊢ φ ∧ j ∈ Z ∧ j < K → X ∈ ℝ
67 simpll ⊢ φ ∧ j ∈ Z ∧ j < K → φ
68 3 ad2antrr ⊢ φ ∧ j ∈ Z ∧ j < K → M ∈ ℤ
69 16 ad2antrr ⊢ φ ∧ j ∈ Z ∧ j < K → K ∈ ℤ
70 4 eleq2i ⊢ j ∈ Z ↔ j ∈ ℤ ≥ M
71 70 biimpi ⊢ j ∈ Z → j ∈ ℤ ≥ M
72 71 ad2antlr ⊢ φ ∧ j ∈ Z ∧ j < K → j ∈ ℤ ≥ M
73 simpr ⊢ φ ∧ j ∈ Z ∧ j < K → j < K
74 72 69 73 elfzod ⊢ φ ∧ j ∈ Z ∧ j < K → j ∈ M ..^ K
75 elfzouz ⊢ j ∈ M ..^ K → j ∈ ℤ ≥ M
76 75 25 eleqtrdi ⊢ j ∈ M ..^ K → j ∈ Z
77 74 76 40 3syl ⊢ φ ∧ j ∈ Z ∧ j < K → j ∈ ℤ
78 eluzle ⊢ j ∈ ℤ ≥ M → M ≤ j
79 71 78 syl ⊢ j ∈ Z → M ≤ j
80 79 ad2antlr ⊢ φ ∧ j ∈ Z ∧ j < K → M ≤ j
81 74 76 54 3syl ⊢ φ ∧ j ∈ Z ∧ j < K → j ∈ ℝ
82 56 ad2antrr ⊢ φ ∧ j ∈ Z ∧ j < K → K ∈ ℝ
83 81 82 73 ltled ⊢ φ ∧ j ∈ Z ∧ j < K → j ≤ K
84 68 69 77 80 83 elfzd ⊢ φ ∧ j ∈ Z ∧ j < K → j ∈ M … K
85 1 29 ralrimia ⊢ φ → ∀ j ∈ M … K B ∈ ℝ
86 fimaxre3 ⊢ M … K ∈ Fin ∧ ∀ j ∈ M … K B ∈ ℝ → ∃ y ∈ ℝ ∀ j ∈ M … K B ≤ y
87 14 85 86 syl2anc ⊢ φ → ∃ y ∈ ℝ ∀ j ∈ M … K B ≤ y
88 1 29 87 suprubrnmpt ⊢ φ ∧ j ∈ M … K → B ≤ sup ran ⁡ j ∈ M … K ⟼ B ℝ <
89 67 84 88 syl2anc ⊢ φ ∧ j ∈ Z ∧ j < K → B ≤ sup ran ⁡ j ∈ M … K ⟼ B ℝ <
90 89 6 breqtrrdi ⊢ φ ∧ j ∈ Z ∧ j < K → B ≤ W
91 max1 ⊢ W ∈ ℝ ∧ Y ∈ ℝ → W ≤ if W ≤ Y Y W
92 31 5 91 syl2anc ⊢ φ → W ≤ if W ≤ Y Y W
93 92 7 breqtrrdi ⊢ φ → W ≤ X
94 93 ad2antrr ⊢ φ ∧ j ∈ Z ∧ j < K → W ≤ X
95 60 63 66 90 94 letrd ⊢ φ ∧ j ∈ Z ∧ j < K → B ≤ X
96 59 95 syldan ⊢ φ ∧ j ∈ Z ∧ ¬ K ≤ j → B ≤ X
97 50 96 pm2.61dan ⊢ φ ∧ j ∈ Z → B ≤ X
98 97 ex ⊢ φ → j ∈ Z → B ≤ X
99 1 98 ralrimi ⊢ φ → ∀ j ∈ Z B ≤ X
100 nfv ⊢ Ⅎ x ∀ j ∈ Z B ≤ X
101 nfcv ⊢ Ⅎ _ j x
102 101 2 nfeq ⊢ Ⅎ j x = X
103 breq2 ⊢ x = X → B ≤ x ↔ B ≤ X
104 102 103 ralbid ⊢ x = X → ∀ j ∈ Z B ≤ x ↔ ∀ j ∈ Z B ≤ X
105 100 104 rspce ⊢ X ∈ ℝ ∧ ∀ j ∈ Z B ≤ X → ∃ x ∈ ℝ ∀ j ∈ Z B ≤ x
106 33 99 105 syl2anc ⊢ φ → ∃ x ∈ ℝ ∀ j ∈ Z B ≤ x