Metamath Proof Explorer


Theorem unb2ltle

Description: "Unbounded below" expressed with < and with <_ . (Contributed by Glauco Siliprandi, 23-Oct-2021)

Ref Expression
Assertion unb2ltle A * w y A y < w x y A y x

Proof

Step Hyp Ref Expression
1 nfv w A *
2 nfra1 w w y A y < w
3 1 2 nfan w A * w y A y < w
4 simpll A * w y A y < w w A *
5 simpr A * w y A y < w w w
6 rspa w y A y < w w y A y < w
7 6 adantll A * w y A y < w w y A y < w
8 ssel2 A * y A y *
9 8 ad4ant13 A * w y A y < w y *
10 simpllr A * w y A y < w w
11 10 rexrd A * w y A y < w w *
12 simpr A * w y A y < w y < w
13 9 11 12 xrltled A * w y A y < w y w
14 13 ex A * w y A y < w y w
15 14 reximdva A * w y A y < w y A y w
16 15 imp A * w y A y < w y A y w
17 4 5 7 16 syl21anc A * w y A y < w w y A y w
18 3 17 ralrimia A * w y A y < w w y A y w
19 breq2 w = x y w y x
20 19 rexbidv w = x y A y w y A y x
21 20 cbvralvw w y A y w x y A y x
22 18 21 sylib A * w y A y < w x y A y x
23 22 ex A * w y A y < w x y A y x
24 simpll A * x y A y x w A *
25 simpr A * x y A y x w w
26 peano2rem w w 1
27 26 adantl x y A y x w w 1
28 simpl x y A y x w x y A y x
29 breq2 x = w 1 y x y w 1
30 29 rexbidv x = w 1 y A y x y A y w 1
31 30 rspcva w 1 x y A y x y A y w 1
32 27 28 31 syl2anc x y A y x w y A y w 1
33 32 adantll A * x y A y x w y A y w 1
34 8 ad4ant13 A * w y A y w 1 y *
35 simpllr A * w y A y w 1 w
36 26 rexrd w w 1 *
37 35 36 syl A * w y A y w 1 w 1 *
38 35 rexrd A * w y A y w 1 w *
39 simpr A * w y A y w 1 y w 1
40 35 ltm1d A * w y A y w 1 w 1 < w
41 34 37 38 39 40 xrlelttrd A * w y A y w 1 y < w
42 41 ex A * w y A y w 1 y < w
43 42 reximdva A * w y A y w 1 y A y < w
44 43 imp A * w y A y w 1 y A y < w
45 24 25 33 44 syl21anc A * x y A y x w y A y < w
46 45 ralrimiva A * x y A y x w y A y < w
47 46 ex A * x y A y x w y A y < w
48 23 47 impbid A * w y A y < w x y A y x