Metamath Proof Explorer


Theorem xrub

Description: By quantifying only over reals, we can specify any extended real upper bound for any set of extended reals. (Contributed by NM, 9-Apr-2006)

Ref Expression
Assertion xrub A * B * x x < B y A x < y x * x < B y A x < y

Proof

Step Hyp Ref Expression
1 breq1 x = z x < B z < B
2 breq1 x = z x < y z < y
3 2 rexbidv x = z y A x < y y A z < y
4 1 3 imbi12d x = z x < B y A x < y z < B y A z < y
5 4 cbvralvw x x < B y A x < y z z < B y A z < y
6 elxr x * x x = +∞ x = −∞
7 pm2.27 x x x < B y A x < y x < B y A x < y
8 7 a1i A * B * z z < B y A z < y x x x < B y A x < y x < B y A x < y
9 pnfnlt B * ¬ +∞ < B
10 breq1 x = +∞ x < B +∞ < B
11 10 notbid x = +∞ ¬ x < B ¬ +∞ < B
12 9 11 syl5ibr x = +∞ B * ¬ x < B
13 pm2.21 ¬ x < B x < B y A x < y
14 12 13 syl6com B * x = +∞ x < B y A x < y
15 14 ad2antlr A * B * z z < B y A z < y x = +∞ x < B y A x < y
16 15 a1dd A * B * z z < B y A z < y x = +∞ x x < B y A x < y x < B y A x < y
17 elxr B * B B = +∞ B = −∞
18 peano2rem B B 1
19 breq1 z = B 1 z < B B 1 < B
20 breq1 z = B 1 z < y B 1 < y
21 20 rexbidv z = B 1 y A z < y y A B 1 < y
22 19 21 imbi12d z = B 1 z < B y A z < y B 1 < B y A B 1 < y
23 22 rspcv B 1 z z < B y A z < y B 1 < B y A B 1 < y
24 18 23 syl B z z < B y A z < y B 1 < B y A B 1 < y
25 24 adantl A * B z z < B y A z < y B 1 < B y A B 1 < y
26 ltm1 B B 1 < B
27 id B 1 < B y A B 1 < y B 1 < B y A B 1 < y
28 26 27 syl5com B B 1 < B y A B 1 < y y A B 1 < y
29 28 adantl A * B B 1 < B y A B 1 < y y A B 1 < y
30 18 ad2antlr A * B y A B 1
31 mnflt B 1 −∞ < B 1
32 30 31 syl A * B y A −∞ < B 1
33 mnfxr −∞ *
34 30 rexrd A * B y A B 1 *
35 ssel2 A * y A y *
36 35 adantlr A * B y A y *
37 xrlttr −∞ * B 1 * y * −∞ < B 1 B 1 < y −∞ < y
38 33 34 36 37 mp3an2i A * B y A −∞ < B 1 B 1 < y −∞ < y
39 32 38 mpand A * B y A B 1 < y −∞ < y
40 39 reximdva A * B y A B 1 < y y A −∞ < y
41 25 29 40 3syld A * B z z < B y A z < y y A −∞ < y
42 41 a1dd A * B z z < B y A z < y −∞ < B y A −∞ < y
43 1re 1
44 breq1 z = 1 z < B 1 < B
45 breq1 z = 1 z < y 1 < y
46 45 rexbidv z = 1 y A z < y y A 1 < y
47 44 46 imbi12d z = 1 z < B y A z < y 1 < B y A 1 < y
48 47 rspcv 1 z z < B y A z < y 1 < B y A 1 < y
49 43 48 ax-mp z z < B y A z < y 1 < B y A 1 < y
50 ltpnf 1 1 < +∞
51 43 50 ax-mp 1 < +∞
52 breq2 B = +∞ 1 < B 1 < +∞
53 51 52 mpbiri B = +∞ 1 < B
54 id 1 < B y A 1 < y 1 < B y A 1 < y
55 53 54 syl5com B = +∞ 1 < B y A 1 < y y A 1 < y
56 mnflt 1 −∞ < 1
57 43 56 ax-mp −∞ < 1
58 rexr 1 1 *
59 43 58 ax-mp 1 *
60 xrlttr −∞ * 1 * y * −∞ < 1 1 < y −∞ < y
61 33 59 60 mp3an12 y * −∞ < 1 1 < y −∞ < y
62 57 61 mpani y * 1 < y −∞ < y
63 35 62 syl A * y A 1 < y −∞ < y
64 63 reximdva A * y A 1 < y y A −∞ < y
65 55 64 sylan9r A * B = +∞ 1 < B y A 1 < y y A −∞ < y
66 49 65 syl5 A * B = +∞ z z < B y A z < y y A −∞ < y
67 66 a1dd A * B = +∞ z z < B y A z < y −∞ < B y A −∞ < y
68 xrltnr −∞ * ¬ −∞ < −∞
69 33 68 ax-mp ¬ −∞ < −∞
70 breq2 B = −∞ −∞ < B −∞ < −∞
71 69 70 mtbiri B = −∞ ¬ −∞ < B
72 71 adantl A * B = −∞ ¬ −∞ < B
73 72 pm2.21d A * B = −∞ −∞ < B y A −∞ < y
74 73 a1d A * B = −∞ z z < B y A z < y −∞ < B y A −∞ < y
75 42 67 74 3jaodan A * B B = +∞ B = −∞ z z < B y A z < y −∞ < B y A −∞ < y
76 17 75 sylan2b A * B * z z < B y A z < y −∞ < B y A −∞ < y
77 76 imp A * B * z z < B y A z < y −∞ < B y A −∞ < y
78 breq1 x = −∞ x < B −∞ < B
79 breq1 x = −∞ x < y −∞ < y
80 79 rexbidv x = −∞ y A x < y y A −∞ < y
81 78 80 imbi12d x = −∞ x < B y A x < y −∞ < B y A −∞ < y
82 77 81 syl5ibrcom A * B * z z < B y A z < y x = −∞ x < B y A x < y
83 82 a1dd A * B * z z < B y A z < y x = −∞ x x < B y A x < y x < B y A x < y
84 8 16 83 3jaod A * B * z z < B y A z < y x x = +∞ x = −∞ x x < B y A x < y x < B y A x < y
85 6 84 syl5bi A * B * z z < B y A z < y x * x x < B y A x < y x < B y A x < y
86 85 com23 A * B * z z < B y A z < y x x < B y A x < y x * x < B y A x < y
87 86 ralimdv2 A * B * z z < B y A z < y x x < B y A x < y x * x < B y A x < y
88 87 ex A * B * z z < B y A z < y x x < B y A x < y x * x < B y A x < y
89 5 88 syl5bi A * B * x x < B y A x < y x x < B y A x < y x * x < B y A x < y
90 89 pm2.43d A * B * x x < B y A x < y x * x < B y A x < y
91 rexr x x *
92 91 imim1i x * x < B y A x < y x x < B y A x < y
93 92 ralimi2 x * x < B y A x < y x x < B y A x < y
94 90 93 impbid1 A * B * x x < B y A x < y x * x < B y A x < y