Theorem cnegexlem1 8229

Description: Addition cancellation of a real number from two complex numbers. Lemma for cnegex 8232. (Contributed by Eric Schmidt, 22-May-2007.)

Assertion

Ref	Expression
cnegexlem1	⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ) → ((𝐴 + 𝐵) = (𝐴 + 𝐶) ↔ 𝐵 = 𝐶))

Proof of Theorem cnegexlem1

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		ax-rnegex 8016	. . . 4 ⊢ (𝐴 ∈ ℝ → ∃𝑥 ∈ ℝ (𝐴 + 𝑥) = 0)
2	1	3ad2ant1 1020	. . 3 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ) → ∃𝑥 ∈ ℝ (𝐴 + 𝑥) = 0)
3		recn 8040	. . . 4 ⊢ (𝐴 ∈ ℝ → 𝐴 ∈ ℂ)
4		recn 8040	. . . . . . 7 ⊢ (𝑥 ∈ ℝ → 𝑥 ∈ ℂ)
5		oveq2 5942	. . . . . . . . . . 11 ⊢ ((𝐴 + 𝐵) = (𝐴 + 𝐶) → (𝑥 + (𝐴 + 𝐵)) = (𝑥 + (𝐴 + 𝐶)))
6		simpr 110	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → 𝑥 ∈ ℂ)
7		simpll 527	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → 𝐴 ∈ ℂ)
8		simplrl 535	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → 𝐵 ∈ ℂ)
9	6, 7, 8	addassd 8077	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → ((𝑥 + 𝐴) + 𝐵) = (𝑥 + (𝐴 + 𝐵)))
10		simplrr 536	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → 𝐶 ∈ ℂ)
11	6, 7, 10	addassd 8077	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → ((𝑥 + 𝐴) + 𝐶) = (𝑥 + (𝐴 + 𝐶)))
12	9, 11	eqeq12d 2219	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → (((𝑥 + 𝐴) + 𝐵) = ((𝑥 + 𝐴) + 𝐶) ↔ (𝑥 + (𝐴 + 𝐵)) = (𝑥 + (𝐴 + 𝐶))))
13	5, 12	imbitrrid 156	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → ((𝐴 + 𝐵) = (𝐴 + 𝐶) → ((𝑥 + 𝐴) + 𝐵) = ((𝑥 + 𝐴) + 𝐶)))
14	13	adantr 276	. . . . . . . . 9 ⊢ ((((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) ∧ (𝐴 + 𝑥) = 0) → ((𝐴 + 𝐵) = (𝐴 + 𝐶) → ((𝑥 + 𝐴) + 𝐵) = ((𝑥 + 𝐴) + 𝐶)))
15		addcom 8191	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ 𝑥 ∈ ℂ) → (𝐴 + 𝑥) = (𝑥 + 𝐴))
16	15	eqeq1d 2213	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ 𝑥 ∈ ℂ) → ((𝐴 + 𝑥) = 0 ↔ (𝑥 + 𝐴) = 0))
17	16	adantlr 477	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → ((𝐴 + 𝑥) = 0 ↔ (𝑥 + 𝐴) = 0))
18		oveq1 5941	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 + 𝐴) = 0 → ((𝑥 + 𝐴) + 𝐵) = (0 + 𝐵))
19		oveq1 5941	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 + 𝐴) = 0 → ((𝑥 + 𝐴) + 𝐶) = (0 + 𝐶))
20	18, 19	eqeq12d 2219	. . . . . . . . . . . . . 14 ⊢ ((𝑥 + 𝐴) = 0 → (((𝑥 + 𝐴) + 𝐵) = ((𝑥 + 𝐴) + 𝐶) ↔ (0 + 𝐵) = (0 + 𝐶)))
21	20	adantl 277	. . . . . . . . . . . . 13 ⊢ ((((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) ∧ (𝑥 + 𝐴) = 0) → (((𝑥 + 𝐴) + 𝐵) = ((𝑥 + 𝐴) + 𝐶) ↔ (0 + 𝐵) = (0 + 𝐶)))
22		addlid 8193	. . . . . . . . . . . . . . . 16 ⊢ (𝐵 ∈ ℂ → (0 + 𝐵) = 𝐵)
23		addlid 8193	. . . . . . . . . . . . . . . 16 ⊢ (𝐶 ∈ ℂ → (0 + 𝐶) = 𝐶)
24	22, 23	eqeqan12d 2220	. . . . . . . . . . . . . . 15 ⊢ ((𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ) → ((0 + 𝐵) = (0 + 𝐶) ↔ 𝐵 = 𝐶))
25	24	adantl 277	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) → ((0 + 𝐵) = (0 + 𝐶) ↔ 𝐵 = 𝐶))
26	25	ad2antrr 488	. . . . . . . . . . . . 13 ⊢ ((((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) ∧ (𝑥 + 𝐴) = 0) → ((0 + 𝐵) = (0 + 𝐶) ↔ 𝐵 = 𝐶))
27	21, 26	bitrd 188	. . . . . . . . . . . 12 ⊢ ((((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) ∧ (𝑥 + 𝐴) = 0) → (((𝑥 + 𝐴) + 𝐵) = ((𝑥 + 𝐴) + 𝐶) ↔ 𝐵 = 𝐶))
28	27	ex 115	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → ((𝑥 + 𝐴) = 0 → (((𝑥 + 𝐴) + 𝐵) = ((𝑥 + 𝐴) + 𝐶) ↔ 𝐵 = 𝐶)))
29	17, 28	sylbid 150	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → ((𝐴 + 𝑥) = 0 → (((𝑥 + 𝐴) + 𝐵) = ((𝑥 + 𝐴) + 𝐶) ↔ 𝐵 = 𝐶)))
30	29	imp 124	. . . . . . . . 9 ⊢ ((((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) ∧ (𝐴 + 𝑥) = 0) → (((𝑥 + 𝐴) + 𝐵) = ((𝑥 + 𝐴) + 𝐶) ↔ 𝐵 = 𝐶))
31	14, 30	sylibd 149	. . . . . . . 8 ⊢ ((((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) ∧ (𝐴 + 𝑥) = 0) → ((𝐴 + 𝐵) = (𝐴 + 𝐶) → 𝐵 = 𝐶))
32	31	ex 115	. . . . . . 7 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → ((𝐴 + 𝑥) = 0 → ((𝐴 + 𝐵) = (𝐴 + 𝐶) → 𝐵 = 𝐶)))
33	4, 32	sylan2 286	. . . . . 6 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℝ) → ((𝐴 + 𝑥) = 0 → ((𝐴 + 𝐵) = (𝐴 + 𝐶) → 𝐵 = 𝐶)))
34	33	rexlimdva 2622	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) → (∃𝑥 ∈ ℝ (𝐴 + 𝑥) = 0 → ((𝐴 + 𝐵) = (𝐴 + 𝐶) → 𝐵 = 𝐶)))
35	34	3impb 1201	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ) → (∃𝑥 ∈ ℝ (𝐴 + 𝑥) = 0 → ((𝐴 + 𝐵) = (𝐴 + 𝐶) → 𝐵 = 𝐶)))
36	3, 35	syl3an1 1282	. . 3 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ) → (∃𝑥 ∈ ℝ (𝐴 + 𝑥) = 0 → ((𝐴 + 𝐵) = (𝐴 + 𝐶) → 𝐵 = 𝐶)))
37	2, 36	mpd 13	. 2 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ) → ((𝐴 + 𝐵) = (𝐴 + 𝐶) → 𝐵 = 𝐶))
38		oveq2 5942	. 2 ⊢ (𝐵 = 𝐶 → (𝐴 + 𝐵) = (𝐴 + 𝐶))
39	37, 38	impbid1 142	1 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ) → ((𝐴 + 𝐵) = (𝐴 + 𝐶) ↔ 𝐵 = 𝐶))

Syntax hints:   → wi 4   ∧ wa 104   ↔ wb 105   ∧ w3a 980   = wceq 1372   ∈ wcel 2175  ∃wrex 2484  (class class class)co 5934  ℂcc 7905  ℝcr 7906  0cc0 7907   + caddc 7910

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-io 710  ax-5 1469  ax-7 1470  ax-gen 1471  ax-ie1 1515  ax-ie2 1516  ax-8 1526  ax-10 1527  ax-11 1528  ax-i12 1529  ax-bndl 1531  ax-4 1532  ax-17 1548  ax-i9 1552  ax-ial 1556  ax-i5r 1557  ax-ext 2186  ax-resscn 7999  ax-1cn 8000  ax-icn 8002  ax-addcl 8003  ax-mulcl 8005  ax-addcom 8007  ax-addass 8009  ax-i2m1 8012  ax-0id 8015  ax-rnegex 8016

This theorem depends on definitions:  df-bi 117  df-3an 982  df-tru 1375  df-nf 1483  df-sb 1785  df-clab 2191  df-cleq 2197  df-clel 2200  df-nfc 2336  df-ral 2488  df-rex 2489  df-v 2773  df-un 3169  df-in 3171  df-ss 3178  df-sn 3638  df-pr 3639  df-op 3641  df-uni 3850  df-br 4044  df-iota 5229  df-fv 5276  df-ov 5937

This theorem is referenced by:  cnegexlem3  8231