Metamath Proof Explorer


Theorem pimdecfgtioo

Description: Given a nondecreasing function, the preimage of an unbounded below, open interval, when the supremum of the preimage does not belong to the preimage. (Contributed by Glauco Siliprandi, 26-Jun-2021)

Ref Expression
Hypotheses pimdecfgtioo.x ⊢ Ⅎ x φ
pimdecfgtioo.h ⊢ Ⅎ y φ
pimdecfgtioo.a ⊢ φ → A ⊆ ℝ
pimdecfgtioo.f ⊢ φ → F : A ⟶ ℝ *
pimdecfgtioo.d ⊢ φ → ∀ x ∈ A ∀ y ∈ A x ≤ y → F ⁡ y ≤ F ⁡ x
pimdecfgtioo.r ⊢ φ → R ∈ ℝ *
pimdecfgtioo.y ⊢ Y = x ∈ A | R < F ⁡ x
pimdecfgtioo.c ⊢ S = sup Y ℝ * <
pimdecfgtioo.e ⊢ φ → ¬ S ∈ Y
pimdecfgtioo.i ⊢ I = −∞ S
Assertion pimdecfgtioo ⊢ φ → Y = I ∩ A

Proof

Step Hyp Ref Expression
1 pimdecfgtioo.x ⊢ Ⅎ x φ
2 pimdecfgtioo.h ⊢ Ⅎ y φ
3 pimdecfgtioo.a ⊢ φ → A ⊆ ℝ
4 pimdecfgtioo.f ⊢ φ → F : A ⟶ ℝ *
5 pimdecfgtioo.d ⊢ φ → ∀ x ∈ A ∀ y ∈ A x ≤ y → F ⁡ y ≤ F ⁡ x
6 pimdecfgtioo.r ⊢ φ → R ∈ ℝ *
7 pimdecfgtioo.y ⊢ Y = x ∈ A | R < F ⁡ x
8 pimdecfgtioo.c ⊢ S = sup Y ℝ * <
9 pimdecfgtioo.e ⊢ φ → ¬ S ∈ Y
10 pimdecfgtioo.i ⊢ I = −∞ S
11 ssrab2 ⊢ x ∈ A | R < F ⁡ x ⊆ A
12 7 11 eqsstri ⊢ Y ⊆ A
13 12 a1i ⊢ φ → Y ⊆ A
14 13 3 sstrd ⊢ φ → Y ⊆ ℝ
15 14 8 9 10 ressioosup ⊢ φ → Y ⊆ I
16 15 13 ssind ⊢ φ → Y ⊆ I ∩ A
17 elinel2 ⊢ x ∈ I ∩ A → x ∈ A
18 17 adantl ⊢ φ ∧ x ∈ I ∩ A → x ∈ A
19 mnfxr ⊢ −∞ ∈ ℝ *
20 19 a1i ⊢ φ ∧ x ∈ I ∩ A → −∞ ∈ ℝ *
21 ressxr ⊢ ℝ ⊆ ℝ *
22 14 21 sstrdi ⊢ φ → Y ⊆ ℝ *
23 22 supxrcld ⊢ φ → sup Y ℝ * < ∈ ℝ *
24 8 23 eqeltrid ⊢ φ → S ∈ ℝ *
25 24 adantr ⊢ φ ∧ x ∈ I ∩ A → S ∈ ℝ *
26 elinel1 ⊢ x ∈ I ∩ A → x ∈ I
27 26 10 eleqtrdi ⊢ x ∈ I ∩ A → x ∈ −∞ S
28 27 adantl ⊢ φ ∧ x ∈ I ∩ A → x ∈ −∞ S
29 iooltub ⊢ −∞ ∈ ℝ * ∧ S ∈ ℝ * ∧ x ∈ −∞ S → x < S
30 20 25 28 29 syl3anc ⊢ φ ∧ x ∈ I ∩ A → x < S
31 30 adantr ⊢ φ ∧ x ∈ I ∩ A ∧ ¬ R < F ⁡ x → x < S
32 simpr ⊢ φ ∧ x ∈ I ∩ A ∧ ¬ R < F ⁡ x → ¬ R < F ⁡ x
33 4 adantr ⊢ φ ∧ x ∈ I ∩ A → F : A ⟶ ℝ *
34 33 18 ffvelcdmd ⊢ φ ∧ x ∈ I ∩ A → F ⁡ x ∈ ℝ *
35 34 adantr ⊢ φ ∧ x ∈ I ∩ A ∧ ¬ R < F ⁡ x → F ⁡ x ∈ ℝ *
36 6 adantr ⊢ φ ∧ x ∈ I ∩ A → R ∈ ℝ *
37 36 adantr ⊢ φ ∧ x ∈ I ∩ A ∧ ¬ R < F ⁡ x → R ∈ ℝ *
38 35 37 xrlenltd ⊢ φ ∧ x ∈ I ∩ A ∧ ¬ R < F ⁡ x → F ⁡ x ≤ R ↔ ¬ R < F ⁡ x
39 32 38 mpbird ⊢ φ ∧ x ∈ I ∩ A ∧ ¬ R < F ⁡ x → F ⁡ x ≤ R
40 nfv ⊢ Ⅎ y x ∈ I ∩ A
41 2 40 nfan ⊢ Ⅎ y φ ∧ x ∈ I ∩ A
42 nfv ⊢ Ⅎ y F ⁡ x ≤ R
43 41 42 nfan ⊢ Ⅎ y φ ∧ x ∈ I ∩ A ∧ F ⁡ x ≤ R
44 fveq2 ⊢ x = y → F ⁡ x = F ⁡ y
45 44 breq2d ⊢ x = y → R < F ⁡ x ↔ R < F ⁡ y
46 45 7 elrab2 ⊢ y ∈ Y ↔ y ∈ A ∧ R < F ⁡ y
47 46 biimpi ⊢ y ∈ Y → y ∈ A ∧ R < F ⁡ y
48 47 simprd ⊢ y ∈ Y → R < F ⁡ y
49 48 ad2antlr ⊢ φ ∧ x ∈ I ∩ A ∧ F ⁡ x ≤ R ∧ y ∈ Y ∧ ¬ y ≤ x → R < F ⁡ y
50 3 adantr ⊢ φ ∧ x ∈ I ∩ A → A ⊆ ℝ
51 50 18 sseldd ⊢ φ ∧ x ∈ I ∩ A → x ∈ ℝ
52 51 ad2antrr ⊢ φ ∧ x ∈ I ∩ A ∧ y ∈ Y ∧ ¬ y ≤ x → x ∈ ℝ
53 14 sselda ⊢ φ ∧ y ∈ Y → y ∈ ℝ
54 53 ad4ant13 ⊢ φ ∧ x ∈ I ∩ A ∧ y ∈ Y ∧ ¬ y ≤ x → y ∈ ℝ
55 simpr ⊢ φ ∧ x ∈ I ∩ A ∧ y ∈ Y ∧ ¬ y ≤ x → ¬ y ≤ x
56 52 54 ltnled ⊢ φ ∧ x ∈ I ∩ A ∧ y ∈ Y ∧ ¬ y ≤ x → x < y ↔ ¬ y ≤ x
57 55 56 mpbird ⊢ φ ∧ x ∈ I ∩ A ∧ y ∈ Y ∧ ¬ y ≤ x → x < y
58 52 54 57 ltled ⊢ φ ∧ x ∈ I ∩ A ∧ y ∈ Y ∧ ¬ y ≤ x → x ≤ y
59 58 adantllr ⊢ φ ∧ x ∈ I ∩ A ∧ F ⁡ x ≤ R ∧ y ∈ Y ∧ ¬ y ≤ x → x ≤ y
60 4 adantr ⊢ φ ∧ y ∈ Y → F : A ⟶ ℝ *
61 13 sselda ⊢ φ ∧ y ∈ Y → y ∈ A
62 60 61 ffvelcdmd ⊢ φ ∧ y ∈ Y → F ⁡ y ∈ ℝ *
63 62 ad5ant14 ⊢ φ ∧ x ∈ I ∩ A ∧ F ⁡ x ≤ R ∧ y ∈ Y ∧ x ≤ y → F ⁡ y ∈ ℝ *
64 34 ad3antrrr ⊢ φ ∧ x ∈ I ∩ A ∧ F ⁡ x ≤ R ∧ y ∈ Y ∧ x ≤ y → F ⁡ x ∈ ℝ *
65 36 ad3antrrr ⊢ φ ∧ x ∈ I ∩ A ∧ F ⁡ x ≤ R ∧ y ∈ Y ∧ x ≤ y → R ∈ ℝ *
66 simpr ⊢ φ ∧ x ∈ I ∩ A ∧ y ∈ Y ∧ x ≤ y → x ≤ y
67 rspa ⊢ ∀ x ∈ A ∀ y ∈ A x ≤ y → F ⁡ y ≤ F ⁡ x ∧ x ∈ A → ∀ y ∈ A x ≤ y → F ⁡ y ≤ F ⁡ x
68 5 17 67 syl2an ⊢ φ ∧ x ∈ I ∩ A → ∀ y ∈ A x ≤ y → F ⁡ y ≤ F ⁡ x
69 68 ad2antrr ⊢ φ ∧ x ∈ I ∩ A ∧ y ∈ Y ∧ x ≤ y → ∀ y ∈ A x ≤ y → F ⁡ y ≤ F ⁡ x
70 61 ad4ant13 ⊢ φ ∧ x ∈ I ∩ A ∧ y ∈ Y ∧ x ≤ y → y ∈ A
71 rspa ⊢ ∀ y ∈ A x ≤ y → F ⁡ y ≤ F ⁡ x ∧ y ∈ A → x ≤ y → F ⁡ y ≤ F ⁡ x
72 69 70 71 syl2anc ⊢ φ ∧ x ∈ I ∩ A ∧ y ∈ Y ∧ x ≤ y → x ≤ y → F ⁡ y ≤ F ⁡ x
73 66 72 mpd ⊢ φ ∧ x ∈ I ∩ A ∧ y ∈ Y ∧ x ≤ y → F ⁡ y ≤ F ⁡ x
74 73 adantllr ⊢ φ ∧ x ∈ I ∩ A ∧ F ⁡ x ≤ R ∧ y ∈ Y ∧ x ≤ y → F ⁡ y ≤ F ⁡ x
75 simpllr ⊢ φ ∧ x ∈ I ∩ A ∧ F ⁡ x ≤ R ∧ y ∈ Y ∧ x ≤ y → F ⁡ x ≤ R
76 63 64 65 74 75 xrletrd ⊢ φ ∧ x ∈ I ∩ A ∧ F ⁡ x ≤ R ∧ y ∈ Y ∧ x ≤ y → F ⁡ y ≤ R
77 63 65 xrlenltd ⊢ φ ∧ x ∈ I ∩ A ∧ F ⁡ x ≤ R ∧ y ∈ Y ∧ x ≤ y → F ⁡ y ≤ R ↔ ¬ R < F ⁡ y
78 76 77 mpbid ⊢ φ ∧ x ∈ I ∩ A ∧ F ⁡ x ≤ R ∧ y ∈ Y ∧ x ≤ y → ¬ R < F ⁡ y
79 59 78 syldan ⊢ φ ∧ x ∈ I ∩ A ∧ F ⁡ x ≤ R ∧ y ∈ Y ∧ ¬ y ≤ x → ¬ R < F ⁡ y
80 49 79 condan ⊢ φ ∧ x ∈ I ∩ A ∧ F ⁡ x ≤ R ∧ y ∈ Y → y ≤ x
81 80 ex ⊢ φ ∧ x ∈ I ∩ A ∧ F ⁡ x ≤ R → y ∈ Y → y ≤ x
82 43 81 ralrimi ⊢ φ ∧ x ∈ I ∩ A ∧ F ⁡ x ≤ R → ∀ y ∈ Y y ≤ x
83 39 82 syldan ⊢ φ ∧ x ∈ I ∩ A ∧ ¬ R < F ⁡ x → ∀ y ∈ Y y ≤ x
84 22 adantr ⊢ φ ∧ x ∈ I ∩ A → Y ⊆ ℝ *
85 21 51 sselid ⊢ φ ∧ x ∈ I ∩ A → x ∈ ℝ *
86 supxrleub ⊢ Y ⊆ ℝ * ∧ x ∈ ℝ * → sup Y ℝ * < ≤ x ↔ ∀ y ∈ Y y ≤ x
87 84 85 86 syl2anc ⊢ φ ∧ x ∈ I ∩ A → sup Y ℝ * < ≤ x ↔ ∀ y ∈ Y y ≤ x
88 87 adantr ⊢ φ ∧ x ∈ I ∩ A ∧ ¬ R < F ⁡ x → sup Y ℝ * < ≤ x ↔ ∀ y ∈ Y y ≤ x
89 83 88 mpbird ⊢ φ ∧ x ∈ I ∩ A ∧ ¬ R < F ⁡ x → sup Y ℝ * < ≤ x
90 8 89 eqbrtrid ⊢ φ ∧ x ∈ I ∩ A ∧ ¬ R < F ⁡ x → S ≤ x
91 25 adantr ⊢ φ ∧ x ∈ I ∩ A ∧ ¬ R < F ⁡ x → S ∈ ℝ *
92 85 adantr ⊢ φ ∧ x ∈ I ∩ A ∧ ¬ R < F ⁡ x → x ∈ ℝ *
93 91 92 xrlenltd ⊢ φ ∧ x ∈ I ∩ A ∧ ¬ R < F ⁡ x → S ≤ x ↔ ¬ x < S
94 90 93 mpbid ⊢ φ ∧ x ∈ I ∩ A ∧ ¬ R < F ⁡ x → ¬ x < S
95 31 94 condan ⊢ φ ∧ x ∈ I ∩ A → R < F ⁡ x
96 18 95 jca ⊢ φ ∧ x ∈ I ∩ A → x ∈ A ∧ R < F ⁡ x
97 7 reqabi ⊢ x ∈ Y ↔ x ∈ A ∧ R < F ⁡ x
98 96 97 sylibr ⊢ φ ∧ x ∈ I ∩ A → x ∈ Y
99 98 ex ⊢ φ → x ∈ I ∩ A → x ∈ Y
100 1 99 ralrimi ⊢ φ → ∀ x ∈ I ∩ A x ∈ Y
101 nfcv ⊢ Ⅎ _ x I ∩ A
102 nfrab1 ⊢ Ⅎ _ x x ∈ A | R < F ⁡ x
103 7 102 nfcxfr ⊢ Ⅎ _ x Y
104 101 103 dfss3f ⊢ I ∩ A ⊆ Y ↔ ∀ x ∈ I ∩ A x ∈ Y
105 100 104 sylibr ⊢ φ → I ∩ A ⊆ Y
106 16 105 eqssd ⊢ φ → Y = I ∩ A