Theorem apsym 8876

Description: Apartness is symmetric. This theorem for real numbers is part of Definition 11.2.7(v) of [HoTT], p. (varies). (Contributed by Jim Kingdon, 16-Feb-2020.)

Assertion

Ref	Expression
apsym	⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐴 # 𝐵 ↔ 𝐵 # 𝐴))

Proof of Theorem apsym

Dummy variables 𝑤 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		cnre 8266	. . 3 ⊢ (𝐵 ∈ ℂ → ∃𝑧 ∈ ℝ ∃𝑤 ∈ ℝ 𝐵 = (𝑧 + (i · 𝑤)))
2	1	adantl 277	. 2 ⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ∃𝑧 ∈ ℝ ∃𝑤 ∈ ℝ 𝐵 = (𝑧 + (i · 𝑤)))
3		cnre 8266	. . . . . 6 ⊢ (𝐴 ∈ ℂ → ∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ 𝐴 = (𝑥 + (i · 𝑦)))
4	3	ad3antrrr 492	. . . . 5 ⊢ ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) → ∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ 𝐴 = (𝑥 + (i · 𝑦)))
5		simplrl 537	. . . . . . . . . . . 12 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → 𝑥 ∈ ℝ)
6		simplrl 537	. . . . . . . . . . . . 13 ⊢ ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) → 𝑧 ∈ ℝ)
7	6	ad2antrr 488	. . . . . . . . . . . 12 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → 𝑧 ∈ ℝ)
8		reaplt 8858	. . . . . . . . . . . 12 ⊢ ((𝑥 ∈ ℝ ∧ 𝑧 ∈ ℝ) → (𝑥 # 𝑧 ↔ (𝑥 < 𝑧 ∨ 𝑧 < 𝑥)))
9	5, 7, 8	syl2anc 411	. . . . . . . . . . 11 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝑥 # 𝑧 ↔ (𝑥 < 𝑧 ∨ 𝑧 < 𝑥)))
10		reaplt 8858	. . . . . . . . . . . . 13 ⊢ ((𝑧 ∈ ℝ ∧ 𝑥 ∈ ℝ) → (𝑧 # 𝑥 ↔ (𝑧 < 𝑥 ∨ 𝑥 < 𝑧)))
11	7, 5, 10	syl2anc 411	. . . . . . . . . . . 12 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝑧 # 𝑥 ↔ (𝑧 < 𝑥 ∨ 𝑥 < 𝑧)))
12		orcom 736	. . . . . . . . . . . 12 ⊢ ((𝑥 < 𝑧 ∨ 𝑧 < 𝑥) ↔ (𝑧 < 𝑥 ∨ 𝑥 < 𝑧))
13	11, 12	bitr4di 198	. . . . . . . . . . 11 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝑧 # 𝑥 ↔ (𝑥 < 𝑧 ∨ 𝑧 < 𝑥)))
14	9, 13	bitr4d 191	. . . . . . . . . 10 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝑥 # 𝑧 ↔ 𝑧 # 𝑥))
15		simplrr 538	. . . . . . . . . . . 12 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → 𝑦 ∈ ℝ)
16		simplrr 538	. . . . . . . . . . . . 13 ⊢ ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) → 𝑤 ∈ ℝ)
17	16	ad2antrr 488	. . . . . . . . . . . 12 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → 𝑤 ∈ ℝ)
18		reaplt 8858	. . . . . . . . . . . 12 ⊢ ((𝑦 ∈ ℝ ∧ 𝑤 ∈ ℝ) → (𝑦 # 𝑤 ↔ (𝑦 < 𝑤 ∨ 𝑤 < 𝑦)))
19	15, 17, 18	syl2anc 411	. . . . . . . . . . 11 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝑦 # 𝑤 ↔ (𝑦 < 𝑤 ∨ 𝑤 < 𝑦)))
20		reaplt 8858	. . . . . . . . . . . . 13 ⊢ ((𝑤 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝑤 # 𝑦 ↔ (𝑤 < 𝑦 ∨ 𝑦 < 𝑤)))
21	17, 15, 20	syl2anc 411	. . . . . . . . . . . 12 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝑤 # 𝑦 ↔ (𝑤 < 𝑦 ∨ 𝑦 < 𝑤)))
22		orcom 736	. . . . . . . . . . . 12 ⊢ ((𝑦 < 𝑤 ∨ 𝑤 < 𝑦) ↔ (𝑤 < 𝑦 ∨ 𝑦 < 𝑤))
23	21, 22	bitr4di 198	. . . . . . . . . . 11 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝑤 # 𝑦 ↔ (𝑦 < 𝑤 ∨ 𝑤 < 𝑦)))
24	19, 23	bitr4d 191	. . . . . . . . . 10 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝑦 # 𝑤 ↔ 𝑤 # 𝑦))
25	14, 24	orbi12d 801	. . . . . . . . 9 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → ((𝑥 # 𝑧 ∨ 𝑦 # 𝑤) ↔ (𝑧 # 𝑥 ∨ 𝑤 # 𝑦)))
26		apreim 8873	. . . . . . . . . 10 ⊢ (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) → ((𝑥 + (i · 𝑦)) # (𝑧 + (i · 𝑤)) ↔ (𝑥 # 𝑧 ∨ 𝑦 # 𝑤)))
27	5, 15, 7, 17, 26	syl22anc 1275	. . . . . . . . 9 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → ((𝑥 + (i · 𝑦)) # (𝑧 + (i · 𝑤)) ↔ (𝑥 # 𝑧 ∨ 𝑦 # 𝑤)))
28		apreim 8873	. . . . . . . . . 10 ⊢ (((𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) → ((𝑧 + (i · 𝑤)) # (𝑥 + (i · 𝑦)) ↔ (𝑧 # 𝑥 ∨ 𝑤 # 𝑦)))
29	7, 17, 5, 15, 28	syl22anc 1275	. . . . . . . . 9 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → ((𝑧 + (i · 𝑤)) # (𝑥 + (i · 𝑦)) ↔ (𝑧 # 𝑥 ∨ 𝑤 # 𝑦)))
30	25, 27, 29	3bitr4d 220	. . . . . . . 8 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → ((𝑥 + (i · 𝑦)) # (𝑧 + (i · 𝑤)) ↔ (𝑧 + (i · 𝑤)) # (𝑥 + (i · 𝑦))))
31		simpr 110	. . . . . . . . 9 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → 𝐴 = (𝑥 + (i · 𝑦)))
32		simpllr 536	. . . . . . . . 9 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → 𝐵 = (𝑧 + (i · 𝑤)))
33	31, 32	breq12d 4121	. . . . . . . 8 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝐴 # 𝐵 ↔ (𝑥 + (i · 𝑦)) # (𝑧 + (i · 𝑤))))
34	32, 31	breq12d 4121	. . . . . . . 8 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝐵 # 𝐴 ↔ (𝑧 + (i · 𝑤)) # (𝑥 + (i · 𝑦))))
35	30, 33, 34	3bitr4d 220	. . . . . . 7 ⊢ ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝐴 # 𝐵 ↔ 𝐵 # 𝐴))
36	35	ex 115	. . . . . 6 ⊢ (((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) → (𝐴 = (𝑥 + (i · 𝑦)) → (𝐴 # 𝐵 ↔ 𝐵 # 𝐴)))
37	36	rexlimdvva 2668	. . . . 5 ⊢ ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) → (∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ 𝐴 = (𝑥 + (i · 𝑦)) → (𝐴 # 𝐵 ↔ 𝐵 # 𝐴)))
38	4, 37	mpd 13	. . . 4 ⊢ ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) → (𝐴 # 𝐵 ↔ 𝐵 # 𝐴))
39	38	ex 115	. . 3 ⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) → (𝐵 = (𝑧 + (i · 𝑤)) → (𝐴 # 𝐵 ↔ 𝐵 # 𝐴)))
40	39	rexlimdvva 2668	. 2 ⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (∃𝑧 ∈ ℝ ∃𝑤 ∈ ℝ 𝐵 = (𝑧 + (i · 𝑤)) → (𝐴 # 𝐵 ↔ 𝐵 # 𝐴)))
41	2, 40	mpd 13	1 ⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐴 # 𝐵 ↔ 𝐵 # 𝐴))

Syntax hints:   → wi 4   ∧ wa 104   ↔ wb 105   ∨ wo 716   = wceq 1398   ∈ wcel 2203  ∃wrex 2521   class class class wbr 4108  (class class class)co 6049  ℂcc 8121  ℝcr 8122  ici 8125   + caddc 8126   · cmul 8128   < clt 8304   # cap 8851

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 619  ax-in2 620  ax-io 717  ax-5 1496  ax-7 1497  ax-gen 1498  ax-ie1 1542  ax-ie2 1543  ax-8 1553  ax-10 1554  ax-11 1555  ax-i12 1556  ax-bndl 1558  ax-4 1559  ax-17 1575  ax-i9 1579  ax-ial 1583  ax-i5r 1584  ax-13 2205  ax-14 2206  ax-ext 2214  ax-sep 4227  ax-pow 4286  ax-pr 4321  ax-un 4553  ax-setind 4658  ax-cnex 8214  ax-resscn 8215  ax-1cn 8216  ax-1re 8217  ax-icn 8218  ax-addcl 8219  ax-addrcl 8220  ax-mulcl 8221  ax-mulrcl 8222  ax-addcom 8223  ax-mulcom 8224  ax-addass 8225  ax-mulass 8226  ax-distr 8227  ax-i2m1 8228  ax-0lt1 8229  ax-1rid 8230  ax-0id 8231  ax-rnegex 8232  ax-precex 8233  ax-cnre 8234  ax-pre-ltirr 8235  ax-pre-lttrn 8237  ax-pre-apti 8238  ax-pre-ltadd 8239  ax-pre-mulgt0 8240

This theorem depends on definitions:  df-bi 117  df-3an 1007  df-tru 1401  df-fal 1404  df-nf 1510  df-sb 1812  df-eu 2083  df-mo 2084  df-clab 2219  df-cleq 2225  df-clel 2228  df-nfc 2373  df-ne 2413  df-nel 2508  df-ral 2525  df-rex 2526  df-reu 2527  df-rab 2529  df-v 2814  df-sbc 3042  df-dif 3212  df-un 3214  df-in 3216  df-ss 3223  df-pw 3670  df-sn 3694  df-pr 3695  df-op 3697  df-uni 3914  df-br 4109  df-opab 4171  df-id 4413  df-xp 4754  df-rel 4755  df-cnv 4756  df-co 4757  df-dm 4758  df-iota 5311  df-fun 5353  df-fv 5359  df-riota 6002  df-ov 6052  df-oprab 6053  df-mpo 6054  df-pnf 8306  df-mnf 8307  df-ltxr 8309  df-sub 8442  df-neg 8443  df-reap 8845  df-ap 8852

This theorem is referenced by:  addext  8880  mulext  8884  ltapii  8905  ltapd  8908  aptap  8920  apdivmuld  9083  div2subap  9107  recgt0  9120  prodgt0  9122  irrmulap  9976  pwm1geoserap1  12187  absgtap  12189  geolim  12190  geolim2  12191  geo2sum2  12194  geoisum1c  12199  tanaddap  12418  egt2lt3  12459  sqrt2irraplemnn  12869  1sgm2ppw  15850  triap  16800  apdiff  16819