Metamath Proof Explorer


Theorem 01sqrexlem4

Description: Lemma for 01sqrex . (Contributed by Mario Carneiro, 10-Jul-2013)

Ref Expression
Hypotheses 01sqrexlem1.1 S=x+|x2A
01sqrexlem1.2 B=supS<
Assertion 01sqrexlem4 A+A1B+B1

Proof

Step Hyp Ref Expression
1 01sqrexlem1.1 S=x+|x2A
2 01sqrexlem1.2 B=supS<
3 1 2 01sqrexlem3 A+A1SSyzSzy
4 suprcl SSyzSzysupS<
5 3 4 syl A+A1supS<
6 2 5 eqeltrid A+A1B
7 rpgt0 A+0<A
8 7 adantr A+A10<A
9 1 2 01sqrexlem2 A+A1AS
10 suprub SSyzSzyASAsupS<
11 3 9 10 syl2anc A+A1AsupS<
12 11 2 breqtrrdi A+A1AB
13 0re 0
14 rpre A+A
15 ltletr 0AB0<AAB0<B
16 13 14 6 15 mp3an2ani A+A10<AAB0<B
17 8 12 16 mp2and A+A10<B
18 6 17 elrpd A+A1B+
19 1 2 01sqrexlem1 A+A1zSz1
20 1re 1
21 suprleub SSyzSzy1supS<1zSz1
22 3 20 21 sylancl A+A1supS<1zSz1
23 19 22 mpbird A+A1supS<1
24 2 23 eqbrtrid A+A1B1
25 18 24 jca A+A1B+B1