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

Theorem apsym 7983
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.
StepHypRef Expression
1 cnre 7387 . . 3 (𝐵 ∈ ℂ → ∃𝑧 ∈ ℝ ∃𝑤 ∈ ℝ 𝐵 = (𝑧 + (i · 𝑤)))
21adantl 271 . 2 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ∃𝑧 ∈ ℝ ∃𝑤 ∈ ℝ 𝐵 = (𝑧 + (i · 𝑤)))
3 cnre 7387 . . . . . 6 (𝐴 ∈ ℂ → ∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ 𝐴 = (𝑥 + (i · 𝑦)))
43ad3antrrr 476 . . . . 5 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) → ∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ 𝐴 = (𝑥 + (i · 𝑦)))
5 simplrl 502 . . . . . . . . . . . 12 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → 𝑥 ∈ ℝ)
6 simplrl 502 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) → 𝑧 ∈ ℝ)
76ad2antrr 472 . . . . . . . . . . . 12 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → 𝑧 ∈ ℝ)
8 reaplt 7965 . . . . . . . . . . . 12 ((𝑥 ∈ ℝ ∧ 𝑧 ∈ ℝ) → (𝑥 # 𝑧 ↔ (𝑥 < 𝑧𝑧 < 𝑥)))
95, 7, 8syl2anc 403 . . . . . . . . . . 11 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝑥 # 𝑧 ↔ (𝑥 < 𝑧𝑧 < 𝑥)))
10 reaplt 7965 . . . . . . . . . . . . 13 ((𝑧 ∈ ℝ ∧ 𝑥 ∈ ℝ) → (𝑧 # 𝑥 ↔ (𝑧 < 𝑥𝑥 < 𝑧)))
117, 5, 10syl2anc 403 . . . . . . . . . . . 12 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝑧 # 𝑥 ↔ (𝑧 < 𝑥𝑥 < 𝑧)))
12 orcom 680 . . . . . . . . . . . 12 ((𝑥 < 𝑧𝑧 < 𝑥) ↔ (𝑧 < 𝑥𝑥 < 𝑧))
1311, 12syl6bbr 196 . . . . . . . . . . 11 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝑧 # 𝑥 ↔ (𝑥 < 𝑧𝑧 < 𝑥)))
149, 13bitr4d 189 . . . . . . . . . 10 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝑥 # 𝑧𝑧 # 𝑥))
15 simplrr 503 . . . . . . . . . . . 12 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → 𝑦 ∈ ℝ)
16 simplrr 503 . . . . . . . . . . . . 13 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) → 𝑤 ∈ ℝ)
1716ad2antrr 472 . . . . . . . . . . . 12 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → 𝑤 ∈ ℝ)
18 reaplt 7965 . . . . . . . . . . . 12 ((𝑦 ∈ ℝ ∧ 𝑤 ∈ ℝ) → (𝑦 # 𝑤 ↔ (𝑦 < 𝑤𝑤 < 𝑦)))
1915, 17, 18syl2anc 403 . . . . . . . . . . 11 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝑦 # 𝑤 ↔ (𝑦 < 𝑤𝑤 < 𝑦)))
20 reaplt 7965 . . . . . . . . . . . . 13 ((𝑤 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝑤 # 𝑦 ↔ (𝑤 < 𝑦𝑦 < 𝑤)))
2117, 15, 20syl2anc 403 . . . . . . . . . . . 12 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝑤 # 𝑦 ↔ (𝑤 < 𝑦𝑦 < 𝑤)))
22 orcom 680 . . . . . . . . . . . 12 ((𝑦 < 𝑤𝑤 < 𝑦) ↔ (𝑤 < 𝑦𝑦 < 𝑤))
2321, 22syl6bbr 196 . . . . . . . . . . 11 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝑤 # 𝑦 ↔ (𝑦 < 𝑤𝑤 < 𝑦)))
2419, 23bitr4d 189 . . . . . . . . . 10 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝑦 # 𝑤𝑤 # 𝑦))
2514, 24orbi12d 740 . . . . . . . . 9 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → ((𝑥 # 𝑧𝑦 # 𝑤) ↔ (𝑧 # 𝑥𝑤 # 𝑦)))
26 apreim 7980 . . . . . . . . . 10 (((𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) → ((𝑥 + (i · 𝑦)) # (𝑧 + (i · 𝑤)) ↔ (𝑥 # 𝑧𝑦 # 𝑤)))
275, 15, 7, 17, 26syl22anc 1171 . . . . . . . . 9 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → ((𝑥 + (i · 𝑦)) # (𝑧 + (i · 𝑤)) ↔ (𝑥 # 𝑧𝑦 # 𝑤)))
28 apreim 7980 . . . . . . . . . 10 (((𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) → ((𝑧 + (i · 𝑤)) # (𝑥 + (i · 𝑦)) ↔ (𝑧 # 𝑥𝑤 # 𝑦)))
297, 17, 5, 15, 28syl22anc 1171 . . . . . . . . 9 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → ((𝑧 + (i · 𝑤)) # (𝑥 + (i · 𝑦)) ↔ (𝑧 # 𝑥𝑤 # 𝑦)))
3025, 27, 293bitr4d 218 . . . . . . . 8 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → ((𝑥 + (i · 𝑦)) # (𝑧 + (i · 𝑤)) ↔ (𝑧 + (i · 𝑤)) # (𝑥 + (i · 𝑦))))
31 simpr 108 . . . . . . . . 9 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → 𝐴 = (𝑥 + (i · 𝑦)))
32 simpllr 501 . . . . . . . . 9 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → 𝐵 = (𝑧 + (i · 𝑤)))
3331, 32breq12d 3824 . . . . . . . 8 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝐴 # 𝐵 ↔ (𝑥 + (i · 𝑦)) # (𝑧 + (i · 𝑤))))
3432, 31breq12d 3824 . . . . . . . 8 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝐵 # 𝐴 ↔ (𝑧 + (i · 𝑤)) # (𝑥 + (i · 𝑦))))
3530, 33, 343bitr4d 218 . . . . . . 7 ((((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) ∧ 𝐴 = (𝑥 + (i · 𝑦))) → (𝐴 # 𝐵𝐵 # 𝐴))
3635ex 113 . . . . . 6 (((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) ∧ (𝑥 ∈ ℝ ∧ 𝑦 ∈ ℝ)) → (𝐴 = (𝑥 + (i · 𝑦)) → (𝐴 # 𝐵𝐵 # 𝐴)))
3736rexlimdvva 2490 . . . . 5 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) → (∃𝑥 ∈ ℝ ∃𝑦 ∈ ℝ 𝐴 = (𝑥 + (i · 𝑦)) → (𝐴 # 𝐵𝐵 # 𝐴)))
384, 37mpd 13 . . . 4 ((((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) ∧ 𝐵 = (𝑧 + (i · 𝑤))) → (𝐴 # 𝐵𝐵 # 𝐴))
3938ex 113 . . 3 (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝑧 ∈ ℝ ∧ 𝑤 ∈ ℝ)) → (𝐵 = (𝑧 + (i · 𝑤)) → (𝐴 # 𝐵𝐵 # 𝐴)))
4039rexlimdvva 2490 . 2 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (∃𝑧 ∈ ℝ ∃𝑤 ∈ ℝ 𝐵 = (𝑧 + (i · 𝑤)) → (𝐴 # 𝐵𝐵 # 𝐴)))
412, 40mpd 13 1 ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐴 # 𝐵𝐵 # 𝐴))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 102  wb 103  wo 662   = wceq 1285  wcel 1434  wrex 2354   class class class wbr 3811  (class class class)co 5591  cc 7251  cr 7252  ici 7255   + caddc 7256   · cmul 7258   < clt 7425   # cap 7958
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-in1 577  ax-in2 578  ax-io 663  ax-5 1377  ax-7 1378  ax-gen 1379  ax-ie1 1423  ax-ie2 1424  ax-8 1436  ax-10 1437  ax-11 1438  ax-i12 1439  ax-bndl 1440  ax-4 1441  ax-13 1445  ax-14 1446  ax-17 1460  ax-i9 1464  ax-ial 1468  ax-i5r 1469  ax-ext 2065  ax-sep 3922  ax-pow 3974  ax-pr 4000  ax-un 4224  ax-setind 4316  ax-cnex 7339  ax-resscn 7340  ax-1cn 7341  ax-1re 7342  ax-icn 7343  ax-addcl 7344  ax-addrcl 7345  ax-mulcl 7346  ax-mulrcl 7347  ax-addcom 7348  ax-mulcom 7349  ax-addass 7350  ax-mulass 7351  ax-distr 7352  ax-i2m1 7353  ax-0lt1 7354  ax-1rid 7355  ax-0id 7356  ax-rnegex 7357  ax-precex 7358  ax-cnre 7359  ax-pre-ltirr 7360  ax-pre-lttrn 7362  ax-pre-apti 7363  ax-pre-ltadd 7364  ax-pre-mulgt0 7365
This theorem depends on definitions:  df-bi 115  df-3an 922  df-tru 1288  df-fal 1291  df-nf 1391  df-sb 1688  df-eu 1946  df-mo 1947  df-clab 2070  df-cleq 2076  df-clel 2079  df-nfc 2212  df-ne 2250  df-nel 2345  df-ral 2358  df-rex 2359  df-reu 2360  df-rab 2362  df-v 2614  df-sbc 2827  df-dif 2986  df-un 2988  df-in 2990  df-ss 2997  df-pw 3408  df-sn 3428  df-pr 3429  df-op 3431  df-uni 3628  df-br 3812  df-opab 3866  df-id 4084  df-xp 4407  df-rel 4408  df-cnv 4409  df-co 4410  df-dm 4411  df-iota 4934  df-fun 4971  df-fv 4977  df-riota 5547  df-ov 5594  df-oprab 5595  df-mpt2 5596  df-pnf 7427  df-mnf 7428  df-ltxr 7430  df-sub 7558  df-neg 7559  df-reap 7952  df-ap 7959
This theorem is referenced by:  addext  7987  mulext  7991  ltapii  8010  ltapd  8013  recgt0  8205  prodgt0  8207  sqrt2irraplemnn  10937
  Copyright terms: Public domain W3C validator