xnegdi - Intuitionistic Logic Explorer

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

Theorem xnegdi 10249

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

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

**Proof of Theorem xnegdi**
Step	Hyp	Ref	Expression
1		elxr 10157	. 2 ⊢ (𝐴 ∈ ℝ^* ↔ (𝐴 ∈ ℝ ∨ 𝐴 = +∞ ∨ 𝐴 = -∞))
2		elxr 10157	. . . 4 ⊢ (𝐵 ∈ ℝ^* ↔ (𝐵 ∈ ℝ ∨ 𝐵 = +∞ ∨ 𝐵 = -∞))
3		recn 8302	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ → 𝐴 ∈ ℂ)
4		recn 8302	. . . . . . . 8 ⊢ (𝐵 ∈ ℝ → 𝐵 ∈ ℂ)
5		negdi 8573	. . . . . . . 8 ⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → -(𝐴 + 𝐵) = (-𝐴 + -𝐵))
6	3, 4, 5	syl2an 289	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → -(𝐴 + 𝐵) = (-𝐴 + -𝐵))
7		readdcl 8295	. . . . . . . 8 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 + 𝐵) ∈ ℝ)
8		rexneg 10211	. . . . . . . 8 ⊢ ((𝐴 + 𝐵) ∈ ℝ → -_𝑒(𝐴 + 𝐵) = -(𝐴 + 𝐵))
9	7, 8	syl 14	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → -_𝑒(𝐴 + 𝐵) = -(𝐴 + 𝐵))
10		renegcl 8577	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ → -𝐴 ∈ ℝ)
11		renegcl 8577	. . . . . . . 8 ⊢ (𝐵 ∈ ℝ → -𝐵 ∈ ℝ)
12		rexadd 10233	. . . . . . . 8 ⊢ ((-𝐴 ∈ ℝ ∧ -𝐵 ∈ ℝ) → (-𝐴 +_𝑒 -𝐵) = (-𝐴 + -𝐵))
13	10, 11, 12	syl2an 289	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (-𝐴 +_𝑒 -𝐵) = (-𝐴 + -𝐵))
14	6, 9, 13	3eqtr4d 2281	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → -_𝑒(𝐴 + 𝐵) = (-𝐴 +_𝑒 -𝐵))
15		rexadd 10233	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 +_𝑒 𝐵) = (𝐴 + 𝐵))
16		xnegeq 10208	. . . . . . 7 ⊢ ((𝐴 +_𝑒 𝐵) = (𝐴 + 𝐵) → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒(𝐴 + 𝐵))
17	15, 16	syl 14	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒(𝐴 + 𝐵))
18		rexneg 10211	. . . . . . 7 ⊢ (𝐴 ∈ ℝ → -_𝑒𝐴 = -𝐴)
19		rexneg 10211	. . . . . . 7 ⊢ (𝐵 ∈ ℝ → -_𝑒𝐵 = -𝐵)
20	18, 19	oveqan12d 6094	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (-_𝑒𝐴 +_𝑒 -_𝑒𝐵) = (-𝐴 +_𝑒 -𝐵))
21	14, 17, 20	3eqtr4d 2281	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))
22		xnegpnf 10209	. . . . . 6 ⊢ -_𝑒+∞ = -∞
23		oveq2 6083	. . . . . . . 8 ⊢ (𝐵 = +∞ → (𝐴 +_𝑒 𝐵) = (𝐴 +_𝑒 +∞))
24		rexr 8361	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ → 𝐴 ∈ ℝ^*)
25		renemnf 8364	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ → 𝐴 ≠ -∞)
26		xaddpnf1 10227	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐴 ≠ -∞) → (𝐴 +_𝑒 +∞) = +∞)
27	24, 25, 26	syl2anc 415	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ → (𝐴 +_𝑒 +∞) = +∞)
28	23, 27	sylan9eqr 2293	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) → (𝐴 +_𝑒 𝐵) = +∞)
29		xnegeq 10208	. . . . . . 7 ⊢ ((𝐴 +_𝑒 𝐵) = +∞ → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒+∞)
30	28, 29	syl 14	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒+∞)
31		xnegeq 10208	. . . . . . . . 9 ⊢ (𝐵 = +∞ → -_𝑒𝐵 = -_𝑒+∞)
32	31, 22	eqtrdi 2287	. . . . . . . 8 ⊢ (𝐵 = +∞ → -_𝑒𝐵 = -∞)
33	32	oveq2d 6091	. . . . . . 7 ⊢ (𝐵 = +∞ → (-_𝑒𝐴 +_𝑒 -_𝑒𝐵) = (-_𝑒𝐴 +_𝑒 -∞))
34	18, 10	eqeltrd 2315	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ → -_𝑒𝐴 ∈ ℝ)
35		rexr 8361	. . . . . . . . 9 ⊢ (-_𝑒𝐴 ∈ ℝ → -_𝑒𝐴 ∈ ℝ^*)
36		renepnf 8363	. . . . . . . . 9 ⊢ (-_𝑒𝐴 ∈ ℝ → -_𝑒𝐴 ≠ +∞)
37		xaddmnf1 10229	. . . . . . . . 9 ⊢ ((-_𝑒𝐴 ∈ ℝ^* ∧ -_𝑒𝐴 ≠ +∞) → (-_𝑒𝐴 +_𝑒 -∞) = -∞)
38	35, 36, 37	syl2anc 415	. . . . . . . 8 ⊢ (-_𝑒𝐴 ∈ ℝ → (-_𝑒𝐴 +_𝑒 -∞) = -∞)
39	34, 38	syl 14	. . . . . . 7 ⊢ (𝐴 ∈ ℝ → (-_𝑒𝐴 +_𝑒 -∞) = -∞)
40	33, 39	sylan9eqr 2293	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) → (-_𝑒𝐴 +_𝑒 -_𝑒𝐵) = -∞)
41	22, 30, 40	3eqtr4a 2297	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 = +∞) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))
42		xnegmnf 10210	. . . . . 6 ⊢ -_𝑒-∞ = +∞
43		oveq2 6083	. . . . . . . 8 ⊢ (𝐵 = -∞ → (𝐴 +_𝑒 𝐵) = (𝐴 +_𝑒 -∞))
44		renepnf 8363	. . . . . . . . 9 ⊢ (𝐴 ∈ ℝ → 𝐴 ≠ +∞)
45		xaddmnf1 10229	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐴 ≠ +∞) → (𝐴 +_𝑒 -∞) = -∞)
46	24, 44, 45	syl2anc 415	. . . . . . . 8 ⊢ (𝐴 ∈ ℝ → (𝐴 +_𝑒 -∞) = -∞)
47	43, 46	sylan9eqr 2293	. . . . . . 7 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 = -∞) → (𝐴 +_𝑒 𝐵) = -∞)
48		xnegeq 10208	. . . . . . 7 ⊢ ((𝐴 +_𝑒 𝐵) = -∞ → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒-∞)
49	47, 48	syl 14	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 = -∞) → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒-∞)
50		xnegeq 10208	. . . . . . . . 9 ⊢ (𝐵 = -∞ → -_𝑒𝐵 = -_𝑒-∞)
51	50, 42	eqtrdi 2287	. . . . . . . 8 ⊢ (𝐵 = -∞ → -_𝑒𝐵 = +∞)
52	51	oveq2d 6091	. . . . . . 7 ⊢ (𝐵 = -∞ → (-_𝑒𝐴 +_𝑒 -_𝑒𝐵) = (-_𝑒𝐴 +_𝑒 +∞))
53		renemnf 8364	. . . . . . . . 9 ⊢ (-_𝑒𝐴 ∈ ℝ → -_𝑒𝐴 ≠ -∞)
54		xaddpnf1 10227	. . . . . . . . 9 ⊢ ((-_𝑒𝐴 ∈ ℝ^* ∧ -_𝑒𝐴 ≠ -∞) → (-_𝑒𝐴 +_𝑒 +∞) = +∞)
55	35, 53, 54	syl2anc 415	. . . . . . . 8 ⊢ (-_𝑒𝐴 ∈ ℝ → (-_𝑒𝐴 +_𝑒 +∞) = +∞)
56	34, 55	syl 14	. . . . . . 7 ⊢ (𝐴 ∈ ℝ → (-_𝑒𝐴 +_𝑒 +∞) = +∞)
57	52, 56	sylan9eqr 2293	. . . . . 6 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 = -∞) → (-_𝑒𝐴 +_𝑒 -_𝑒𝐵) = +∞)
58	42, 49, 57	3eqtr4a 2297	. . . . 5 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 = -∞) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))
59	21, 41, 58	3jaodan 1347	. . . 4 ⊢ ((𝐴 ∈ ℝ ∧ (𝐵 ∈ ℝ ∨ 𝐵 = +∞ ∨ 𝐵 = -∞)) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))
60	2, 59	sylan2b 287	. . 3 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ^*) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))
61		xneg0 10212	. . . . . . 7 ⊢ -_𝑒0 = 0
62		simpr 110	. . . . . . . . . 10 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = -∞) → 𝐵 = -∞)
63	62	oveq2d 6091	. . . . . . . . 9 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = -∞) → (+∞ +_𝑒 𝐵) = (+∞ +_𝑒 -∞))
64		pnfaddmnf 10231	. . . . . . . . 9 ⊢ (+∞ +_𝑒 -∞) = 0
65	63, 64	eqtrdi 2287	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = -∞) → (+∞ +_𝑒 𝐵) = 0)
66		xnegeq 10208	. . . . . . . 8 ⊢ ((+∞ +_𝑒 𝐵) = 0 → -_𝑒(+∞ +_𝑒 𝐵) = -_𝑒0)
67	65, 66	syl 14	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = -∞) → -_𝑒(+∞ +_𝑒 𝐵) = -_𝑒0)
68	51	adantl 277	. . . . . . . . 9 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = -∞) → -_𝑒𝐵 = +∞)
69	68	oveq2d 6091	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = -∞) → (-∞ +_𝑒 -_𝑒𝐵) = (-∞ +_𝑒 +∞))
70		mnfaddpnf 10232	. . . . . . . 8 ⊢ (-∞ +_𝑒 +∞) = 0
71	69, 70	eqtrdi 2287	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = -∞) → (-∞ +_𝑒 -_𝑒𝐵) = 0)
72	61, 67, 71	3eqtr4a 2297	. . . . . 6 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = -∞) → -_𝑒(+∞ +_𝑒 𝐵) = (-∞ +_𝑒 -_𝑒𝐵))
73		xaddpnf2 10228	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ -∞) → (+∞ +_𝑒 𝐵) = +∞)
74		xnegeq 10208	. . . . . . . 8 ⊢ ((+∞ +_𝑒 𝐵) = +∞ → -_𝑒(+∞ +_𝑒 𝐵) = -_𝑒+∞)
75	73, 74	syl 14	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ -∞) → -_𝑒(+∞ +_𝑒 𝐵) = -_𝑒+∞)
76		xnegcl 10213	. . . . . . . 8 ⊢ (𝐵 ∈ ℝ^* → -_𝑒𝐵 ∈ ℝ^*)
77		xnegeq 10208	. . . . . . . . . . . 12 ⊢ (-_𝑒𝐵 = +∞ → -_𝑒-_𝑒𝐵 = -_𝑒+∞)
78	77, 22	eqtrdi 2287	. . . . . . . . . . 11 ⊢ (-_𝑒𝐵 = +∞ → -_𝑒-_𝑒𝐵 = -∞)
79		xnegneg 10214	. . . . . . . . . . . 12 ⊢ (𝐵 ∈ ℝ^* → -_𝑒-_𝑒𝐵 = 𝐵)
80	79	eqeq1d 2247	. . . . . . . . . . 11 ⊢ (𝐵 ∈ ℝ^* → (-_𝑒-_𝑒𝐵 = -∞ ↔ 𝐵 = -∞))
81	78, 80	imbitrid 154	. . . . . . . . . 10 ⊢ (𝐵 ∈ ℝ^* → (-_𝑒𝐵 = +∞ → 𝐵 = -∞))
82	81	necon3d 2464	. . . . . . . . 9 ⊢ (𝐵 ∈ ℝ^* → (𝐵 ≠ -∞ → -_𝑒𝐵 ≠ +∞))
83	82	imp 124	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ -∞) → -_𝑒𝐵 ≠ +∞)
84		xaddmnf2 10230	. . . . . . . 8 ⊢ ((-_𝑒𝐵 ∈ ℝ^* ∧ -_𝑒𝐵 ≠ +∞) → (-∞ +_𝑒 -_𝑒𝐵) = -∞)
85	76, 83, 84	syl2an2r 603	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ -∞) → (-∞ +_𝑒 -_𝑒𝐵) = -∞)
86	22, 75, 85	3eqtr4a 2297	. . . . . 6 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ -∞) → -_𝑒(+∞ +_𝑒 𝐵) = (-∞ +_𝑒 -_𝑒𝐵))
87		xrmnfdc 10224	. . . . . . . 8 ⊢ (𝐵 ∈ ℝ^* → DECID 𝐵 = -∞)
88		exmiddc 848	. . . . . . . 8 ⊢ (DECID 𝐵 = -∞ → (𝐵 = -∞ ∨ ¬ 𝐵 = -∞))
89	87, 88	syl 14	. . . . . . 7 ⊢ (𝐵 ∈ ℝ^* → (𝐵 = -∞ ∨ ¬ 𝐵 = -∞))
90		df-ne 2421	. . . . . . . 8 ⊢ (𝐵 ≠ -∞ ↔ ¬ 𝐵 = -∞)
91	90	orbi2i 774	. . . . . . 7 ⊢ ((𝐵 = -∞ ∨ 𝐵 ≠ -∞) ↔ (𝐵 = -∞ ∨ ¬ 𝐵 = -∞))
92	89, 91	sylibr 134	. . . . . 6 ⊢ (𝐵 ∈ ℝ^* → (𝐵 = -∞ ∨ 𝐵 ≠ -∞))
93	72, 86, 92	mpjaodan 810	. . . . 5 ⊢ (𝐵 ∈ ℝ^* → -_𝑒(+∞ +_𝑒 𝐵) = (-∞ +_𝑒 -_𝑒𝐵))
94	93	adantl 277	. . . 4 ⊢ ((𝐴 = +∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒(+∞ +_𝑒 𝐵) = (-∞ +_𝑒 -_𝑒𝐵))
95		simpl 109	. . . . . 6 ⊢ ((𝐴 = +∞ ∧ 𝐵 ∈ ℝ^*) → 𝐴 = +∞)
96	95	oveq1d 6090	. . . . 5 ⊢ ((𝐴 = +∞ ∧ 𝐵 ∈ ℝ^*) → (𝐴 +_𝑒 𝐵) = (+∞ +_𝑒 𝐵))
97		xnegeq 10208	. . . . 5 ⊢ ((𝐴 +_𝑒 𝐵) = (+∞ +_𝑒 𝐵) → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒(+∞ +_𝑒 𝐵))
98	96, 97	syl 14	. . . 4 ⊢ ((𝐴 = +∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒(+∞ +_𝑒 𝐵))
99		xnegeq 10208	. . . . . . 7 ⊢ (𝐴 = +∞ → -_𝑒𝐴 = -_𝑒+∞)
100	99	adantr 276	. . . . . 6 ⊢ ((𝐴 = +∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒𝐴 = -_𝑒+∞)
101	100, 22	eqtrdi 2287	. . . . 5 ⊢ ((𝐴 = +∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒𝐴 = -∞)
102	101	oveq1d 6090	. . . 4 ⊢ ((𝐴 = +∞ ∧ 𝐵 ∈ ℝ^*) → (-_𝑒𝐴 +_𝑒 -_𝑒𝐵) = (-∞ +_𝑒 -_𝑒𝐵))
103	94, 98, 102	3eqtr4d 2281	. . 3 ⊢ ((𝐴 = +∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))
104		simpr 110	. . . . . . . . . 10 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = +∞) → 𝐵 = +∞)
105	104	oveq2d 6091	. . . . . . . . 9 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = +∞) → (-∞ +_𝑒 𝐵) = (-∞ +_𝑒 +∞))
106	105, 70	eqtrdi 2287	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = +∞) → (-∞ +_𝑒 𝐵) = 0)
107		xnegeq 10208	. . . . . . . 8 ⊢ ((-∞ +_𝑒 𝐵) = 0 → -_𝑒(-∞ +_𝑒 𝐵) = -_𝑒0)
108	106, 107	syl 14	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = +∞) → -_𝑒(-∞ +_𝑒 𝐵) = -_𝑒0)
109	32	adantl 277	. . . . . . . . 9 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = +∞) → -_𝑒𝐵 = -∞)
110	109	oveq2d 6091	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = +∞) → (+∞ +_𝑒 -_𝑒𝐵) = (+∞ +_𝑒 -∞))
111	110, 64	eqtrdi 2287	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = +∞) → (+∞ +_𝑒 -_𝑒𝐵) = 0)
112	61, 108, 111	3eqtr4a 2297	. . . . . 6 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 = +∞) → -_𝑒(-∞ +_𝑒 𝐵) = (+∞ +_𝑒 -_𝑒𝐵))
113		xaddmnf2 10230	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ +∞) → (-∞ +_𝑒 𝐵) = -∞)
114		xnegeq 10208	. . . . . . . 8 ⊢ ((-∞ +_𝑒 𝐵) = -∞ → -_𝑒(-∞ +_𝑒 𝐵) = -_𝑒-∞)
115	113, 114	syl 14	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ +∞) → -_𝑒(-∞ +_𝑒 𝐵) = -_𝑒-∞)
116		xnegeq 10208	. . . . . . . . . . . 12 ⊢ (-_𝑒𝐵 = -∞ → -_𝑒-_𝑒𝐵 = -_𝑒-∞)
117	116, 42	eqtrdi 2287	. . . . . . . . . . 11 ⊢ (-_𝑒𝐵 = -∞ → -_𝑒-_𝑒𝐵 = +∞)
118	79	eqeq1d 2247	. . . . . . . . . . 11 ⊢ (𝐵 ∈ ℝ^* → (-_𝑒-_𝑒𝐵 = +∞ ↔ 𝐵 = +∞))
119	117, 118	imbitrid 154	. . . . . . . . . 10 ⊢ (𝐵 ∈ ℝ^* → (-_𝑒𝐵 = -∞ → 𝐵 = +∞))
120	119	necon3d 2464	. . . . . . . . 9 ⊢ (𝐵 ∈ ℝ^* → (𝐵 ≠ +∞ → -_𝑒𝐵 ≠ -∞))
121	120	imp 124	. . . . . . . 8 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ +∞) → -_𝑒𝐵 ≠ -∞)
122		xaddpnf2 10228	. . . . . . . 8 ⊢ ((-_𝑒𝐵 ∈ ℝ^* ∧ -_𝑒𝐵 ≠ -∞) → (+∞ +_𝑒 -_𝑒𝐵) = +∞)
123	76, 121, 122	syl2an2r 603	. . . . . . 7 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ +∞) → (+∞ +_𝑒 -_𝑒𝐵) = +∞)
124	42, 115, 123	3eqtr4a 2297	. . . . . 6 ⊢ ((𝐵 ∈ ℝ^* ∧ 𝐵 ≠ +∞) → -_𝑒(-∞ +_𝑒 𝐵) = (+∞ +_𝑒 -_𝑒𝐵))
125		xrpnfdc 10223	. . . . . . . 8 ⊢ (𝐵 ∈ ℝ^* → DECID 𝐵 = +∞)
126		exmiddc 848	. . . . . . . 8 ⊢ (DECID 𝐵 = +∞ → (𝐵 = +∞ ∨ ¬ 𝐵 = +∞))
127	125, 126	syl 14	. . . . . . 7 ⊢ (𝐵 ∈ ℝ^* → (𝐵 = +∞ ∨ ¬ 𝐵 = +∞))
128		df-ne 2421	. . . . . . . 8 ⊢ (𝐵 ≠ +∞ ↔ ¬ 𝐵 = +∞)
129	128	orbi2i 774	. . . . . . 7 ⊢ ((𝐵 = +∞ ∨ 𝐵 ≠ +∞) ↔ (𝐵 = +∞ ∨ ¬ 𝐵 = +∞))
130	127, 129	sylibr 134	. . . . . 6 ⊢ (𝐵 ∈ ℝ^* → (𝐵 = +∞ ∨ 𝐵 ≠ +∞))
131	112, 124, 130	mpjaodan 810	. . . . 5 ⊢ (𝐵 ∈ ℝ^* → -_𝑒(-∞ +_𝑒 𝐵) = (+∞ +_𝑒 -_𝑒𝐵))
132	131	adantl 277	. . . 4 ⊢ ((𝐴 = -∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒(-∞ +_𝑒 𝐵) = (+∞ +_𝑒 -_𝑒𝐵))
133		simpl 109	. . . . . 6 ⊢ ((𝐴 = -∞ ∧ 𝐵 ∈ ℝ^*) → 𝐴 = -∞)
134	133	oveq1d 6090	. . . . 5 ⊢ ((𝐴 = -∞ ∧ 𝐵 ∈ ℝ^*) → (𝐴 +_𝑒 𝐵) = (-∞ +_𝑒 𝐵))
135		xnegeq 10208	. . . . 5 ⊢ ((𝐴 +_𝑒 𝐵) = (-∞ +_𝑒 𝐵) → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒(-∞ +_𝑒 𝐵))
136	134, 135	syl 14	. . . 4 ⊢ ((𝐴 = -∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒(𝐴 +_𝑒 𝐵) = -_𝑒(-∞ +_𝑒 𝐵))
137		xnegeq 10208	. . . . . . 7 ⊢ (𝐴 = -∞ → -_𝑒𝐴 = -_𝑒-∞)
138	137	adantr 276	. . . . . 6 ⊢ ((𝐴 = -∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒𝐴 = -_𝑒-∞)
139	138, 42	eqtrdi 2287	. . . . 5 ⊢ ((𝐴 = -∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒𝐴 = +∞)
140	139	oveq1d 6090	. . . 4 ⊢ ((𝐴 = -∞ ∧ 𝐵 ∈ ℝ^*) → (-_𝑒𝐴 +_𝑒 -_𝑒𝐵) = (+∞ +_𝑒 -_𝑒𝐵))
141	132, 136, 140	3eqtr4d 2281	. . 3 ⊢ ((𝐴 = -∞ ∧ 𝐵 ∈ ℝ^*) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))
142	60, 103, 141	3jaoian 1346	. 2 ⊢ (((𝐴 ∈ ℝ ∨ 𝐴 = +∞ ∨ 𝐴 = -∞) ∧ 𝐵 ∈ ℝ^*) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))
143	1, 142	sylanb 284	1 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^*) → -_𝑒(𝐴 +_𝑒 𝐵) = (-_𝑒𝐴 +_𝑒 -_𝑒𝐵))

Colors of variables: wff set class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 104 ∨ wo 720 DECID wdc 846 ∨ w3o 1008 = wceq 1402 ∈ wcel 2209 ≠ wne 2420 (class class class)co 6075 ℂcc 8167 ℝcr 8168 0cc0 8169 + caddc 8172 +∞cpnf 8347 -∞cmnf 8348 ℝ^*cxr 8349 -cneg 8488 -_𝑒cxne 10150 +_𝑒 cxad 10151

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 623 ax-in2 624 ax-io 721 ax-5 1500 ax-7 1501 ax-gen 1502 ax-ie1 1546 ax-ie2 1547 ax-8 1557 ax-10 1558 ax-11 1559 ax-i12 1560 ax-bndl 1562 ax-4 1563 ax-17 1579 ax-i9 1583 ax-ial 1587 ax-i5r 1588 ax-14 2212 ax-ext 2220 ax-sep 4244 ax-pow 4306 ax-pr 4341 ax-un 4573 ax-setind 4679 ax-cnex 8260 ax-resscn 8261 ax-1cn 8262 ax-1re 8263 ax-icn 8264 ax-addcl 8265 ax-addrcl 8266 ax-mulcl 8267 ax-addcom 8269 ax-addass 8271 ax-distr 8273 ax-i2m1 8274 ax-0id 8277 ax-rnegex 8278 ax-cnre 8280

This theorem depends on definitions: df-bi 117 df-dc 847 df-3or 1010 df-3an 1011 df-tru 1405 df-fal 1408 df-nf 1514 df-sb 1816 df-eu 2089 df-mo 2090 df-clab 2225 df-cleq 2231 df-clel 2234 df-nfc 2381 df-ne 2421 df-nel 2516 df-ral 2533 df-rex 2534 df-reu 2535 df-rab 2537 df-v 2823 df-sbc 3052 df-dif 3222 df-un 3224 df-in 3226 df-ss 3233 df-if 3636 df-pw 3687 df-sn 3711 df-pr 3712 df-op 3714 df-uni 3931 df-br 4126 df-opab 4188 df-id 4433 df-xp 4775 df-rel 4776 df-cnv 4777 df-co 4778 df-dm 4779 df-iota 5332 df-fun 5374 df-fv 5380 df-riota 6028 df-ov 6078 df-oprab 6079 df-mpo 6080 df-pnf 8352 df-mnf 8353 df-xr 8354 df-sub 8489 df-neg 8490 df-xneg 10153 df-xadd 10154

This theorem is referenced by: xaddass2 10251 xrminadd 12019

W3C validator