Metamath Proof Explorer


Theorem xlesubadd

Description: Under certain conditions, the conclusion of lesubadd is true even in the extended reals. (Contributed by Mario Carneiro, 4-Sep-2015)

Ref Expression
Assertion xlesubadd A*B*C*0AB−∞0CA+𝑒BCAC+𝑒B

Proof

Step Hyp Ref Expression
1 simpl1 A*B*C*0AB−∞0CA*
2 simpl2 A*B*C*0AB−∞0CB*
3 xnegcl B*B*
4 2 3 syl A*B*C*0AB−∞0CB*
5 xaddcl A*B*A+𝑒B*
6 1 4 5 syl2anc A*B*C*0AB−∞0CA+𝑒B*
7 6 adantr A*B*C*0AB−∞0CBA+𝑒B*
8 simpll3 A*B*C*0AB−∞0CBC*
9 simpr A*B*C*0AB−∞0CBB
10 xleadd1 A+𝑒B*C*BA+𝑒BCA+𝑒B+𝑒BC+𝑒B
11 7 8 9 10 syl3anc A*B*C*0AB−∞0CBA+𝑒BCA+𝑒B+𝑒BC+𝑒B
12 xnpcan A*BA+𝑒B+𝑒B=A
13 1 12 sylan A*B*C*0AB−∞0CBA+𝑒B+𝑒B=A
14 13 breq1d A*B*C*0AB−∞0CBA+𝑒B+𝑒BC+𝑒BAC+𝑒B
15 11 14 bitrd A*B*C*0AB−∞0CBA+𝑒BCAC+𝑒B
16 simpr3 A*B*C*0AB−∞0C0C
17 oveq1 A=+∞A+𝑒−∞=+∞+𝑒−∞
18 pnfaddmnf +∞+𝑒−∞=0
19 17 18 eqtrdi A=+∞A+𝑒−∞=0
20 19 breq1d A=+∞A+𝑒−∞C0C
21 16 20 syl5ibrcom A*B*C*0AB−∞0CA=+∞A+𝑒−∞C
22 xaddmnf1 A*A+∞A+𝑒−∞=−∞
23 22 ex A*A+∞A+𝑒−∞=−∞
24 1 23 syl A*B*C*0AB−∞0CA+∞A+𝑒−∞=−∞
25 simpl3 A*B*C*0AB−∞0CC*
26 mnfle C*−∞C
27 25 26 syl A*B*C*0AB−∞0C−∞C
28 breq1 A+𝑒−∞=−∞A+𝑒−∞C−∞C
29 27 28 syl5ibrcom A*B*C*0AB−∞0CA+𝑒−∞=−∞A+𝑒−∞C
30 24 29 syld A*B*C*0AB−∞0CA+∞A+𝑒−∞C
31 21 30 pm2.61dne A*B*C*0AB−∞0CA+𝑒−∞C
32 pnfge A*A+∞
33 1 32 syl A*B*C*0AB−∞0CA+∞
34 ge0nemnf C*0CC−∞
35 25 16 34 syl2anc A*B*C*0AB−∞0CC−∞
36 xaddpnf1 C*C−∞C+𝑒+∞=+∞
37 25 35 36 syl2anc A*B*C*0AB−∞0CC+𝑒+∞=+∞
38 33 37 breqtrrd A*B*C*0AB−∞0CAC+𝑒+∞
39 31 38 2thd A*B*C*0AB−∞0CA+𝑒−∞CAC+𝑒+∞
40 xnegeq B=+∞B=+∞
41 xnegpnf +∞=−∞
42 40 41 eqtrdi B=+∞B=−∞
43 42 oveq2d B=+∞A+𝑒B=A+𝑒−∞
44 43 breq1d B=+∞A+𝑒BCA+𝑒−∞C
45 oveq2 B=+∞C+𝑒B=C+𝑒+∞
46 45 breq2d B=+∞AC+𝑒BAC+𝑒+∞
47 44 46 bibi12d B=+∞A+𝑒BCAC+𝑒BA+𝑒−∞CAC+𝑒+∞
48 39 47 syl5ibrcom A*B*C*0AB−∞0CB=+∞A+𝑒BCAC+𝑒B
49 48 imp A*B*C*0AB−∞0CB=+∞A+𝑒BCAC+𝑒B
50 simpr2 A*B*C*0AB−∞0CB−∞
51 2 50 jca A*B*C*0AB−∞0CB*B−∞
52 xrnemnf B*B−∞BB=+∞
53 51 52 sylib A*B*C*0AB−∞0CBB=+∞
54 15 49 53 mpjaodan A*B*C*0AB−∞0CA+𝑒BCAC+𝑒B