xnegdi - Intuitionistic Logic Explorer

	Intuitionistic Logic Explorer		< Previous Next > Nearby theorems
Mirrors > Home > ILE Home > Th. List > xnegdi		GIF version

Theorem xnegdi 9937

Description: Extended real version of negdi 8278. (Contributed by Mario Carneiro, 20-Aug-2015.)

**Assertion**
Ref	Expression
xnegdi	⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))

**Proof of Theorem xnegdi**
Step	Hyp	Ref	Expression
1		elxr 9845	. 2 ⊢ (𝐴 ∈ ℝ^* ↔ (𝐴 ∈ ℝ ∨ 𝐴 = +∞ ∨ 𝐴 = -∞))
2		elxr 9845	. . . 4 ⊢ (𝐵 ∈ ℝ^* ↔ (𝐵 ∈ ℝ ∨ 𝐵 = +∞ ∨ 𝐵 = -∞))
3		recn 8007	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ → 𝐴 ∈ ℂ)
4		recn 8007	. . . . . . . 8 ⊢ (𝐵 ∈ ℝ → 𝐵 ∈ ℂ)
5		negdi 8278	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → -(𝐴 + 𝐵) = (-𝐴 + -𝐵))
6	3, 4, 5	syl2an 289	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → -(𝐴 + 𝐵) = (-𝐴 + -𝐵))
7		readdcl 8000	. . . . . . . 8 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 + 𝐵) ∈ ℝ)
8		rexneg 9899	. . . . . . . 8 ⊢ ((𝐴 + 𝐵) ∈ ℝ → -_𝑒(𝐴 + 𝐵) = -(𝐴 + 𝐵))
9	7, 8	syl 14	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → -_𝑒(𝐴 + 𝐵) = -(𝐴 + 𝐵))
10		renegcl 8282	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ → -𝐴 ∈ ℝ)
11		renegcl 8282	. . . . . . . 8 ⊢ (𝐵 ∈ ℝ → -𝐵 ∈ ℝ)
12		rexadd 9921	. . . . . . . 8 ⊢ ((-𝐴 ∈ ℝ ∧ -𝐵 ∈ ℝ) → (-𝐴 +_𝑒 -𝐵) = (-𝐴 + -𝐵))
13	10, 11, 12	syl2an 289	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (-𝐴 +_𝑒 -𝐵) = (-𝐴 + -𝐵))
14	6, 9, 13	3eqtr4d 2236	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → -_𝑒(𝐴 + 𝐵) = (-𝐴 +_𝑒 -𝐵))
15		rexadd 9921	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 +_𝑒 𝐵) = (𝐴 + 𝐵))
16		xnegeq 9896	. . . . . . 7 ⊢ ((𝐴 +_𝑒 𝐵) = (𝐴 + 𝐵) → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒(𝐴 + 𝐵))
17	15, 16	syl 14	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒(𝐴 + 𝐵))
18		rexneg 9899	. . . . . . 7 ⊢ (𝐴 ∈ ℝ → -_𝑒𝐴 = -𝐴)
19		rexneg 9899	. . . . . . 7 ⊢ (𝐵 ∈ ℝ → -_𝑒𝐵 = -𝐵)
20	18, 19	oveqan12d 5938	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (-_𝑒𝐴 +_𝑒 -_𝑒𝐵) = (-𝐴 +_𝑒 -𝐵))
21	14, 17, 20	3eqtr4d 2236	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))
22		xnegpnf 9897	. . . . . 6 ⊢ -_𝑒+∞ = -∞
23		oveq2 5927	. . . . . . . 8 ⊢ (𝐵 = +∞ → (𝐴 +_𝑒 𝐵) = (𝐴 +_𝑒 +∞))
24		rexr 8067	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ → 𝐴 ∈ ℝ^*)
25		renemnf 8070	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ → 𝐴 ≠ -∞)
26		xaddpnf1 9915	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐴 ≠ -∞) → (𝐴 +_𝑒 +∞) = +∞)
27	24, 25, 26	syl2anc 411	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ → (𝐴 +_𝑒 +∞) = +∞)
28	23, 27	sylan9eqr 2248	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) → (𝐴 +_𝑒 𝐵) = +∞)
29		xnegeq 9896	. . . . . . 7 ⊢ ((𝐴 +_𝑒 𝐵) = +∞ → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒+∞)
30	28, 29	syl 14	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒+∞)
31		xnegeq 9896	. . . . . . . . 9 ⊢ (𝐵 = +∞ → -_𝑒𝐵 = -_𝑒+∞)
32	31, 22	eqtrdi 2242	. . . . . . . 8 ⊢ (𝐵 = +∞ → -_𝑒𝐵 = -∞)
33	32	oveq2d 5935	. . . . . . 7 ⊢ (𝐵 = +∞ → (-_𝑒𝐴 +_𝑒 -_𝑒𝐵) = (-_𝑒𝐴 +_𝑒 -∞))
34	18, 10	eqeltrd 2270	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ → -_𝑒𝐴 ∈ ℝ)
35		rexr 8067	. . . . . . . . 9 ⊢ (-_𝑒𝐴 ∈ ℝ → -_𝑒𝐴 ∈ ℝ^*)
36		renepnf 8069	. . . . . . . . 9 ⊢ (-_𝑒𝐴 ∈ ℝ → -_𝑒𝐴 ≠ +∞)
37		xaddmnf1 9917	. . . . . . . . 9 ⊢ ((-_𝑒𝐴 ∈ ℝ^* ∧ -_𝑒𝐴 ≠ +∞) → (-_𝑒𝐴 +_𝑒 -∞) = -∞)
38	35, 36, 37	syl2anc 411	. . . . . . . 8 ⊢ (-_𝑒𝐴 ∈ ℝ → (-_𝑒𝐴 +_𝑒 -∞) = -∞)
39	34, 38	syl 14	. . . . . . 7 ⊢ (𝐴 ∈ ℝ → (-_𝑒𝐴 +_𝑒 -∞) = -∞)
40	33, 39	sylan9eqr 2248	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) → (-_𝑒𝐴 +_𝑒 -_𝑒𝐵) = -∞)
41	22, 30, 40	3eqtr4a 2252	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))
42		xnegmnf 9898	. . . . . 6 ⊢ -_𝑒-∞ = +∞
43		oveq2 5927	. . . . . . . 8 ⊢ (𝐵 = -∞ → (𝐴 +_𝑒 𝐵) = (𝐴 +_𝑒 -∞))
44		renepnf 8069	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ → 𝐴 ≠ +∞)
45		xaddmnf1 9917	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐴 ≠ +∞) → (𝐴 +_𝑒 -∞) = -∞)
46	24, 44, 45	syl2anc 411	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ → (𝐴 +_𝑒 -∞) = -∞)
47	43, 46	sylan9eqr 2248	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 = -∞) → (𝐴 +_𝑒 𝐵) = -∞)
48		xnegeq 9896	. . . . . . 7 ⊢ ((𝐴 +_𝑒 𝐵) = -∞ → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒-∞)
49	47, 48	syl 14	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 = -∞) → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒-∞)
50		xnegeq 9896	. . . . . . . . 9 ⊢ (𝐵 = -∞ → -_𝑒𝐵 = -_𝑒-∞)
51	50, 42	eqtrdi 2242	. . . . . . . 8 ⊢ (𝐵 = -∞ → -_𝑒𝐵 = +∞)
52	51	oveq2d 5935	. . . . . . 7 ⊢ (𝐵 = -∞ → (-_𝑒𝐴 +_𝑒 -_𝑒𝐵) = (-_𝑒𝐴 +_𝑒 +∞))
53		renemnf 8070	. . . . . . . . 9 ⊢ (-_𝑒𝐴 ∈ ℝ → -_𝑒𝐴 ≠ -∞)
54		xaddpnf1 9915	. . . . . . . . 9 ⊢ ((-_𝑒𝐴 ∈ ℝ^* ∧ -_𝑒𝐴 ≠ -∞) → (-_𝑒𝐴 +_𝑒 +∞) = +∞)
55	35, 53, 54	syl2anc 411	. . . . . . . 8 ⊢ (-_𝑒𝐴 ∈ ℝ → (-_𝑒𝐴 +_𝑒 +∞) = +∞)
56	34, 55	syl 14	. . . . . . 7 ⊢ (𝐴 ∈ ℝ → (-_𝑒𝐴 +_𝑒 +∞) = +∞)
57	52, 56	sylan9eqr 2248	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 = -∞) → (-_𝑒𝐴 +_𝑒 -_𝑒𝐵) = +∞)
58	42, 49, 57	3eqtr4a 2252	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 = -∞) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))
59	21, 41, 58	3jaodan 1317	. . . 4 ⊢ ((𝐴 ∈ ℝ ∧ (𝐵 ∈ ℝ ∨ 𝐵 = +∞ ∨ 𝐵 = -∞)) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))
60	2, 59	sylan2b 287	. . 3 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ^*) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))
61		xneg0 9900	. . . . . . 7 ⊢ -_𝑒0 = 0
62		simpr 110	. . . . . . . . . 10 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = -∞) → 𝐵 = -∞)
63	62	oveq2d 5935	. . . . . . . . 9 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = -∞) → (+∞ +_𝑒 𝐵) = (+∞ +_𝑒 -∞))
64		pnfaddmnf 9919	. . . . . . . . 9 ⊢ (+∞ +_𝑒 -∞) = 0
65	63, 64	eqtrdi 2242	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = -∞) → (+∞ +_𝑒 𝐵) = 0)
66		xnegeq 9896	. . . . . . . 8 ⊢ ((+∞ +_𝑒 𝐵) = 0 → -_𝑒(+∞ +_𝑒 𝐵) = -_𝑒0)
67	65, 66	syl 14	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = -∞) → -_𝑒(+∞ +_𝑒 𝐵) = -_𝑒0)
68	51	adantl 277	. . . . . . . . 9 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = -∞) → -_𝑒𝐵 = +∞)
69	68	oveq2d 5935	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = -∞) → (-∞ +_𝑒 -_𝑒𝐵) = (-∞ +_𝑒 +∞))
70		mnfaddpnf 9920	. . . . . . . 8 ⊢ (-∞ +_𝑒 +∞) = 0
71	69, 70	eqtrdi 2242	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = -∞) → (-∞ +_𝑒 -_𝑒𝐵) = 0)
72	61, 67, 71	3eqtr4a 2252	. . . . . 6 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = -∞) → -_𝑒(+∞ +_𝑒 𝐵) = (-∞ +_𝑒 -_𝑒𝐵))
73		xaddpnf2 9916	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ -∞) → (+∞ +_𝑒 𝐵) = +∞)
74		xnegeq 9896	. . . . . . . 8 ⊢ ((+∞ +_𝑒 𝐵) = +∞ → -_𝑒(+∞ +_𝑒 𝐵) = -_𝑒+∞)
75	73, 74	syl 14	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ -∞) → -_𝑒(+∞ +_𝑒 𝐵) = -_𝑒+∞)
76		xnegcl 9901	. . . . . . . 8 ⊢ (𝐵 ∈ ℝ^* → -_𝑒𝐵 ∈ ℝ^*)
77		xnegeq 9896	. . . . . . . . . . . 12 ⊢ (-_𝑒𝐵 = +∞ → -_𝑒-_𝑒𝐵 = -_𝑒+∞)
78	77, 22	eqtrdi 2242	. . . . . . . . . . 11 ⊢ (-_𝑒𝐵 = +∞ → -_𝑒-_𝑒𝐵 = -∞)
79		xnegneg 9902	. . . . . . . . . . . 12 ⊢ (𝐵 ∈ ℝ^* → -_𝑒-_𝑒𝐵 = 𝐵)
80	79	eqeq1d 2202	. . . . . . . . . . 11 ⊢ (𝐵 ∈ ℝ^* → (-_𝑒-_𝑒𝐵 = -∞ ↔ 𝐵 = -∞))
81	78, 80	imbitrid 154	. . . . . . . . . 10 ⊢ (𝐵 ∈ ℝ^* → (-_𝑒𝐵 = +∞ → 𝐵 = -∞))
82	81	necon3d 2408	. . . . . . . . 9 ⊢ (𝐵 ∈ ℝ^* → (𝐵 ≠ -∞ → -_𝑒𝐵 ≠ +∞))
83	82	imp 124	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ -∞) → -_𝑒𝐵 ≠ +∞)
84		xaddmnf2 9918	. . . . . . . 8 ⊢ ((-_𝑒𝐵 ∈ ℝ^* ∧ -_𝑒𝐵 ≠ +∞) → (-∞ +_𝑒 -_𝑒𝐵) = -∞)
85	76, 83, 84	syl2an2r 595	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ -∞) → (-∞ +_𝑒 -_𝑒𝐵) = -∞)
86	22, 75, 85	3eqtr4a 2252	. . . . . 6 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ -∞) → -_𝑒(+∞ +_𝑒 𝐵) = (-∞ +_𝑒 -_𝑒𝐵))
87		xrmnfdc 9912	. . . . . . . 8 ⊢ (𝐵 ∈ ℝ^* → DECID 𝐵 = -∞)
88		exmiddc 837	. . . . . . . 8 ⊢ (DECID 𝐵 = -∞ → (𝐵 = -∞ ∨ ¬ 𝐵 = -∞))
89	87, 88	syl 14	. . . . . . 7 ⊢ (𝐵 ∈ ℝ^* → (𝐵 = -∞ ∨ ¬ 𝐵 = -∞))
90		df-ne 2365	. . . . . . . 8 ⊢ (𝐵 ≠ -∞ ↔ ¬ 𝐵 = -∞)
91	90	orbi2i 763	. . . . . . 7 ⊢ ((𝐵 = -∞ ∨ 𝐵 ≠ -∞) ↔ (𝐵 = -∞ ∨ ¬ 𝐵 = -∞))
92	89, 91	sylibr 134	. . . . . 6 ⊢ (𝐵 ∈ ℝ^* → (𝐵 = -∞ ∨ 𝐵 ≠ -∞))
93	72, 86, 92	mpjaodan 799	. . . . 5 ⊢ (𝐵 ∈ ℝ^* → -_𝑒(+∞ +_𝑒 𝐵) = (-∞ +_𝑒 -_𝑒𝐵))
94	93	adantl 277	. . . 4 ⊢ ((𝐴 = +∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒(+∞ +_𝑒 𝐵) = (-∞ +_𝑒 -_𝑒𝐵))
95		simpl 109	. . . . . 6 ⊢ ((𝐴 = +∞ ∧ 𝐵 ∈ ℝ^*) → 𝐴 = +∞)
96	95	oveq1d 5934	. . . . 5 ⊢ ((𝐴 = +∞ ∧ 𝐵 ∈ ℝ^*) → (𝐴 +_𝑒 𝐵) = (+∞ +_𝑒 𝐵))
97		xnegeq 9896	. . . . 5 ⊢ ((𝐴 +_𝑒 𝐵) = (+∞ +_𝑒 𝐵) → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒(+∞ +_𝑒 𝐵))
98	96, 97	syl 14	. . . 4 ⊢ ((𝐴 = +∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒(+∞ +_𝑒 𝐵))
99		xnegeq 9896	. . . . . . 7 ⊢ (𝐴 = +∞ → -_𝑒𝐴 = -_𝑒+∞)
100	99	adantr 276	. . . . . 6 ⊢ ((𝐴 = +∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒𝐴 = -_𝑒+∞)
101	100, 22	eqtrdi 2242	. . . . 5 ⊢ ((𝐴 = +∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒𝐴 = -∞)
102	101	oveq1d 5934	. . . 4 ⊢ ((𝐴 = +∞ ∧ 𝐵 ∈ ℝ^*) → (-_𝑒𝐴 +_𝑒 -_𝑒𝐵) = (-∞ +_𝑒 -_𝑒𝐵))
103	94, 98, 102	3eqtr4d 2236	. . 3 ⊢ ((𝐴 = +∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))
104		simpr 110	. . . . . . . . . 10 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = +∞) → 𝐵 = +∞)
105	104	oveq2d 5935	. . . . . . . . 9 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = +∞) → (-∞ +_𝑒 𝐵) = (-∞ +_𝑒 +∞))
106	105, 70	eqtrdi 2242	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = +∞) → (-∞ +_𝑒 𝐵) = 0)
107		xnegeq 9896	. . . . . . . 8 ⊢ ((-∞ +_𝑒 𝐵) = 0 → -_𝑒(-∞ +_𝑒 𝐵) = -_𝑒0)
108	106, 107	syl 14	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = +∞) → -_𝑒(-∞ +_𝑒 𝐵) = -_𝑒0)
109	32	adantl 277	. . . . . . . . 9 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = +∞) → -_𝑒𝐵 = -∞)
110	109	oveq2d 5935	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = +∞) → (+∞ +_𝑒 -_𝑒𝐵) = (+∞ +_𝑒 -∞))
111	110, 64	eqtrdi 2242	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = +∞) → (+∞ +_𝑒 -_𝑒𝐵) = 0)
112	61, 108, 111	3eqtr4a 2252	. . . . . 6 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = +∞) → -_𝑒(-∞ +_𝑒 𝐵) = (+∞ +_𝑒 -_𝑒𝐵))
113		xaddmnf2 9918	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ +∞) → (-∞ +_𝑒 𝐵) = -∞)
114		xnegeq 9896	. . . . . . . 8 ⊢ ((-∞ +_𝑒 𝐵) = -∞ → -_𝑒(-∞ +_𝑒 𝐵) = -_𝑒-∞)
115	113, 114	syl 14	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ +∞) → -_𝑒(-∞ +_𝑒 𝐵) = -_𝑒-∞)
116		xnegeq 9896	. . . . . . . . . . . 12 ⊢ (-_𝑒𝐵 = -∞ → -_𝑒-_𝑒𝐵 = -_𝑒-∞)
117	116, 42	eqtrdi 2242	. . . . . . . . . . 11 ⊢ (-_𝑒𝐵 = -∞ → -_𝑒-_𝑒𝐵 = +∞)
118	79	eqeq1d 2202	. . . . . . . . . . 11 ⊢ (𝐵 ∈ ℝ^* → (-_𝑒-_𝑒𝐵 = +∞ ↔ 𝐵 = +∞))
119	117, 118	imbitrid 154	. . . . . . . . . 10 ⊢ (𝐵 ∈ ℝ^* → (-_𝑒𝐵 = -∞ → 𝐵 = +∞))
120	119	necon3d 2408	. . . . . . . . 9 ⊢ (𝐵 ∈ ℝ^* → (𝐵 ≠ +∞ → -_𝑒𝐵 ≠ -∞))
121	120	imp 124	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ +∞) → -_𝑒𝐵 ≠ -∞)
122		xaddpnf2 9916	. . . . . . . 8 ⊢ ((-_𝑒𝐵 ∈ ℝ^* ∧ -_𝑒𝐵 ≠ -∞) → (+∞ +_𝑒 -_𝑒𝐵) = +∞)
123	76, 121, 122	syl2an2r 595	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ +∞) → (+∞ +_𝑒 -_𝑒𝐵) = +∞)
124	42, 115, 123	3eqtr4a 2252	. . . . . 6 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ +∞) → -_𝑒(-∞ +_𝑒 𝐵) = (+∞ +_𝑒 -_𝑒𝐵))
125		xrpnfdc 9911	. . . . . . . 8 ⊢ (𝐵 ∈ ℝ^* → DECID 𝐵 = +∞)
126		exmiddc 837	. . . . . . . 8 ⊢ (DECID 𝐵 = +∞ → (𝐵 = +∞ ∨ ¬ 𝐵 = +∞))
127	125, 126	syl 14	. . . . . . 7 ⊢ (𝐵 ∈ ℝ^* → (𝐵 = +∞ ∨ ¬ 𝐵 = +∞))
128		df-ne 2365	. . . . . . . 8 ⊢ (𝐵 ≠ +∞ ↔ ¬ 𝐵 = +∞)
129	128	orbi2i 763	. . . . . . 7 ⊢ ((𝐵 = +∞ ∨ 𝐵 ≠ +∞) ↔ (𝐵 = +∞ ∨ ¬ 𝐵 = +∞))
130	127, 129	sylibr 134	. . . . . 6 ⊢ (𝐵 ∈ ℝ^* → (𝐵 = +∞ ∨ 𝐵 ≠ +∞))
131	112, 124, 130	mpjaodan 799	. . . . 5 ⊢ (𝐵 ∈ ℝ^* → -_𝑒(-∞ +_𝑒 𝐵) = (+∞ +_𝑒 -_𝑒𝐵))
132	131	adantl 277	. . . 4 ⊢ ((𝐴 = -∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒(-∞ +_𝑒 𝐵) = (+∞ +_𝑒 -_𝑒𝐵))
133		simpl 109	. . . . . 6 ⊢ ((𝐴 = -∞ ∧ 𝐵 ∈ ℝ^*) → 𝐴 = -∞)
134	133	oveq1d 5934	. . . . 5 ⊢ ((𝐴 = -∞ ∧ 𝐵 ∈ ℝ^*) → (𝐴 +_𝑒 𝐵) = (-∞ +_𝑒 𝐵))
135		xnegeq 9896	. . . . 5 ⊢ ((𝐴 +_𝑒 𝐵) = (-∞ +_𝑒 𝐵) → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒(-∞ +_𝑒 𝐵))
136	134, 135	syl 14	. . . 4 ⊢ ((𝐴 = -∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒(-∞ +_𝑒 𝐵))
137		xnegeq 9896	. . . . . . 7 ⊢ (𝐴 = -∞ → -_𝑒𝐴 = -_𝑒-∞)
138	137	adantr 276	. . . . . 6 ⊢ ((𝐴 = -∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒𝐴 = -_𝑒-∞)
139	138, 42	eqtrdi 2242	. . . . 5 ⊢ ((𝐴 = -∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒𝐴 = +∞)
140	139	oveq1d 5934	. . . 4 ⊢ ((𝐴 = -∞ ∧ 𝐵 ∈ ℝ^*) → (-_𝑒𝐴 +_𝑒 -_𝑒𝐵) = (+∞ +_𝑒 -_𝑒𝐵))
141	132, 136, 140	3eqtr4d 2236	. . 3 ⊢ ((𝐴 = -∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))
142	60, 103, 141	3jaoian 1316	. 2 ⊢ (((𝐴 ∈ ℝ ∨ 𝐴 = +∞ ∨ 𝐴 = -∞) ∧ 𝐵 ∈ ℝ^*) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))
143	1, 142	sylanb 284	1 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))

Colors of variables: wff set class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 104 ∨ wo 709 DECID wdc 835 ∨ w3o 979 = wceq 1364 ∈ wcel 2164 ≠ wne 2364 (class class class)co 5919 ℂcc 7872 ℝcr 7873 0cc0 7874 + caddc 7877 +∞cpnf 8053 -∞cmnf 8054 ℝ^*cxr 8055 -cneg 8193 -_𝑒cxne 9838 +_𝑒 cxad 9839

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-ia1 106 ax-ia2 107 ax-ia3 108 ax-in1 615 ax-in2 616 ax-io 710 ax-5 1458 ax-7 1459 ax-gen 1460 ax-ie1 1504 ax-ie2 1505 ax-8 1515 ax-10 1516 ax-11 1517 ax-i12 1518 ax-bndl 1520 ax-4 1521 ax-17 1537 ax-i9 1541 ax-ial 1545 ax-i5r 1546 ax-13 2166 ax-14 2167 ax-ext 2175 ax-sep 4148 ax-pow 4204 ax-pr 4239 ax-un 4465 ax-setind 4570 ax-cnex 7965 ax-resscn 7966 ax-1cn 7967 ax-1re 7968 ax-icn 7969 ax-addcl 7970 ax-addrcl 7971 ax-mulcl 7972 ax-addcom 7974 ax-addass 7976 ax-distr 7978 ax-i2m1 7979 ax-0id 7982 ax-rnegex 7983 ax-cnre 7985

This theorem depends on definitions: df-bi 117 df-dc 836 df-3or 981 df-3an 982 df-tru 1367 df-fal 1370 df-nf 1472 df-sb 1774 df-eu 2045 df-mo 2046 df-clab 2180 df-cleq 2186 df-clel 2189 df-nfc 2325 df-ne 2365 df-nel 2460 df-ral 2477 df-rex 2478 df-reu 2479 df-rab 2481 df-v 2762 df-sbc 2987 df-dif 3156 df-un 3158 df-in 3160 df-ss 3167 df-if 3559 df-pw 3604 df-sn 3625 df-pr 3626 df-op 3628 df-uni 3837 df-br 4031 df-opab 4092 df-id 4325 df-xp 4666 df-rel 4667 df-cnv 4668 df-co 4669 df-dm 4670 df-iota 5216 df-fun 5257 df-fv 5263 df-riota 5874 df-ov 5922 df-oprab 5923 df-mpo 5924 df-pnf 8058 df-mnf 8059 df-xr 8060 df-sub 8194 df-neg 8195 df-xneg 9841 df-xadd 9842

This theorem is referenced by: xaddass2 9939 xrminadd 11421

W3C validator