Theorem cnegexlem1 8194

Description: Addition cancellation of a real number from two complex numbers. Lemma for cnegex 8197. (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 7981	. . . 4 ⊢ (𝐴 ∈ ℝ → ∃𝑥 ∈ ℝ (𝐴 + 𝑥) = 0)
2	1	3ad2ant1 1020	. . 3 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ) → ∃𝑥 ∈ ℝ (𝐴 + 𝑥) = 0)
3		recn 8005	. . . 4 ⊢ (𝐴 ∈ ℝ → 𝐴 ∈ ℂ)
4		recn 8005	. . . . . . 7 ⊢ (𝑥 ∈ ℝ → 𝑥 ∈ ℂ)
5		oveq2 5926	. . . . . . . . . . 11 ⊢ ((𝐴 + 𝐵) = (𝐴 + 𝐶) → (𝑥 + (𝐴 + 𝐵)) = (𝑥 + (𝐴 + 𝐶)))
6		simpr 110	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → 𝑥 ∈ ℂ)
7		simpll 527	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → 𝐴 ∈ ℂ)
8		simplrl 535	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → 𝐵 ∈ ℂ)
9	6, 7, 8	addassd 8042	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → ((𝑥 + 𝐴) + 𝐵) = (𝑥 + (𝐴 + 𝐵)))
10		simplrr 536	. . . . . . . . . . . . 13 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → 𝐶 ∈ ℂ)
11	6, 7, 10	addassd 8042	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → ((𝑥 + 𝐴) + 𝐶) = (𝑥 + (𝐴 + 𝐶)))
12	9, 11	eqeq12d 2208	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → (((𝑥 + 𝐴) + 𝐵) = ((𝑥 + 𝐴) + 𝐶) ↔ (𝑥 + (𝐴 + 𝐵)) = (𝑥 + (𝐴 + 𝐶))))
13	5, 12	imbitrrid 156	. . . . . . . . . 10 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → ((𝐴 + 𝐵) = (𝐴 + 𝐶) → ((𝑥 + 𝐴) + 𝐵) = ((𝑥 + 𝐴) + 𝐶)))
14	13	adantr 276	. . . . . . . . 9 ⊢ ((((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) ∧ (𝐴 + 𝑥) = 0) → ((𝐴 + 𝐵) = (𝐴 + 𝐶) → ((𝑥 + 𝐴) + 𝐵) = ((𝑥 + 𝐴) + 𝐶)))
15		addcom 8156	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ ℂ ∧ 𝑥 ∈ ℂ) → (𝐴 + 𝑥) = (𝑥 + 𝐴))
16	15	eqeq1d 2202	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ ℂ ∧ 𝑥 ∈ ℂ) → ((𝐴 + 𝑥) = 0 ↔ (𝑥 + 𝐴) = 0))
17	16	adantlr 477	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) → ((𝐴 + 𝑥) = 0 ↔ (𝑥 + 𝐴) = 0))
18		oveq1 5925	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 + 𝐴) = 0 → ((𝑥 + 𝐴) + 𝐵) = (0 + 𝐵))
19		oveq1 5925	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 + 𝐴) = 0 → ((𝑥 + 𝐴) + 𝐶) = (0 + 𝐶))
20	18, 19	eqeq12d 2208	. . . . . . . . . . . . . 14 ⊢ ((𝑥 + 𝐴) = 0 → (((𝑥 + 𝐴) + 𝐵) = ((𝑥 + 𝐴) + 𝐶) ↔ (0 + 𝐵) = (0 + 𝐶)))
21	20	adantl 277	. . . . . . . . . . . . 13 ⊢ ((((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) ∧ 𝑥 ∈ ℂ) ∧ (𝑥 + 𝐴) = 0) → (((𝑥 + 𝐴) + 𝐵) = ((𝑥 + 𝐴) + 𝐶) ↔ (0 + 𝐵) = (0 + 𝐶)))
22		addlid 8158	. . . . . . . . . . . . . . . 16 ⊢ (𝐵 ∈ ℂ → (0 + 𝐵) = 𝐵)
23		addlid 8158	. . . . . . . . . . . . . . . 16 ⊢ (𝐶 ∈ ℂ → (0 + 𝐶) = 𝐶)
24	22, 23	eqeqan12d 2209	. . . . . . . . . . . . . . 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 2611	. . . . 5 ⊢ ((𝐴 ∈ ℂ ∧ (𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ)) → (∃𝑥 ∈ ℝ (𝐴 + 𝑥) = 0 → ((𝐴 + 𝐵) = (𝐴 + 𝐶) → 𝐵 = 𝐶)))
35	34	3impb 1201	. . . 4 ⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ) → (∃𝑥 ∈ ℝ (𝐴 + 𝑥) = 0 → ((𝐴 + 𝐵) = (𝐴 + 𝐶) → 𝐵 = 𝐶)))
36	3, 35	syl3an1 1282	. . 3 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ) → (∃𝑥 ∈ ℝ (𝐴 + 𝑥) = 0 → ((𝐴 + 𝐵) = (𝐴 + 𝐶) → 𝐵 = 𝐶)))
37	2, 36	mpd 13	. 2 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ) → ((𝐴 + 𝐵) = (𝐴 + 𝐶) → 𝐵 = 𝐶))
38		oveq2 5926	. 2 ⊢ (𝐵 = 𝐶 → (𝐴 + 𝐵) = (𝐴 + 𝐶))
39	37, 38	impbid1 142	1 ⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℂ ∧ 𝐶 ∈ ℂ) → ((𝐴 + 𝐵) = (𝐴 + 𝐶) ↔ 𝐵 = 𝐶))

Syntax hints:   → wi 4   ∧ wa 104   ↔ wb 105   ∧ w3a 980   = wceq 1364   ∈ wcel 2164  ∃wrex 2473  (class class class)co 5918  ℂcc 7870  ℝcr 7871  0cc0 7872   + caddc 7875

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 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-ext 2175  ax-resscn 7964  ax-1cn 7965  ax-icn 7967  ax-addcl 7968  ax-mulcl 7970  ax-addcom 7972  ax-addass 7974  ax-i2m1 7977  ax-0id 7980  ax-rnegex 7981

This theorem depends on definitions:  df-bi 117  df-3an 982  df-tru 1367  df-nf 1472  df-sb 1774  df-clab 2180  df-cleq 2186  df-clel 2189  df-nfc 2325  df-ral 2477  df-rex 2478  df-v 2762  df-un 3157  df-in 3159  df-ss 3166  df-sn 3624  df-pr 3625  df-op 3627  df-uni 3836  df-br 4030  df-iota 5215  df-fv 5262  df-ov 5921

This theorem is referenced by:  cnegexlem3  8196