MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  cgraswap Structured version   Visualization version   GIF version

Theorem cgraswap 25832
Description: Swap rays in a congruence relation. Theorem 11.9 of [Schwabhauser] p. 96. (Contributed by Thierry Arnoux, 5-Mar-2020.)
Hypotheses
Ref Expression
cgraid.p 𝑃 = (Base‘𝐺)
cgraid.i 𝐼 = (Itv‘𝐺)
cgraid.g (𝜑𝐺 ∈ TarskiG)
cgraid.k 𝐾 = (hlG‘𝐺)
cgraid.a (𝜑𝐴𝑃)
cgraid.b (𝜑𝐵𝑃)
cgraid.c (𝜑𝐶𝑃)
cgraid.1 (𝜑𝐴𝐵)
cgraid.2 (𝜑𝐵𝐶)
Assertion
Ref Expression
cgraswap (𝜑 → ⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐶𝐵𝐴”⟩)

Proof of Theorem cgraswap
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 cgraid.p . . . . . . . 8 𝑃 = (Base‘𝐺)
2 eqid 2724 . . . . . . . 8 (dist‘𝐺) = (dist‘𝐺)
3 cgraid.i . . . . . . . 8 𝐼 = (Itv‘𝐺)
4 cgraid.g . . . . . . . . 9 (𝜑𝐺 ∈ TarskiG)
54ad3antrrr 768 . . . . . . . 8 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝐺 ∈ TarskiG)
6 cgraid.b . . . . . . . . 9 (𝜑𝐵𝑃)
76ad3antrrr 768 . . . . . . . 8 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝐵𝑃)
8 simpllr 817 . . . . . . . 8 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝑥𝑃)
9 cgraid.a . . . . . . . . 9 (𝜑𝐴𝑃)
109ad3antrrr 768 . . . . . . . 8 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝐴𝑃)
11 simprlr 822 . . . . . . . 8 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴))
121, 2, 3, 5, 7, 8, 7, 10, 11tgcgrcomlr 25495 . . . . . . 7 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝑥(dist‘𝐺)𝐵) = (𝐴(dist‘𝐺)𝐵))
1312eqcomd 2730 . . . . . 6 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝐴(dist‘𝐺)𝐵) = (𝑥(dist‘𝐺)𝐵))
14 simprrr 824 . . . . . . 7 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶))
1514eqcomd 2730 . . . . . 6 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝐵(dist‘𝐺)𝐶) = (𝐵(dist‘𝐺)𝑦))
16 simplr 809 . . . . . . . 8 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝑦𝑃)
17 cgraid.c . . . . . . . . 9 (𝜑𝐶𝑃)
1817ad3antrrr 768 . . . . . . . 8 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝐶𝑃)
19 eqid 2724 . . . . . . . . 9 (LineG‘𝐺) = (LineG‘𝐺)
20 eqid 2724 . . . . . . . . 9 (cgrG‘𝐺) = (cgrG‘𝐺)
21 cgraid.k . . . . . . . . . . . 12 𝐾 = (hlG‘𝐺)
22 simprll 821 . . . . . . . . . . . 12 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝑥(𝐾𝐵)𝐶)
231, 3, 21, 8, 18, 7, 5, 19, 22hlln 25622 . . . . . . . . . . 11 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝑥 ∈ (𝐶(LineG‘𝐺)𝐵))
2423orcd 406 . . . . . . . . . 10 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝑥 ∈ (𝐶(LineG‘𝐺)𝐵) ∨ 𝐶 = 𝐵))
251, 19, 3, 5, 18, 7, 8, 24colrot1 25574 . . . . . . . . 9 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝐶 ∈ (𝐵(LineG‘𝐺)𝑥) ∨ 𝐵 = 𝑥))
26 eqid 2724 . . . . . . . . . . 11 (≤G‘𝐺) = (≤G‘𝐺)
271, 3, 21, 8, 18, 7, 5ishlg 25617 . . . . . . . . . . . . . 14 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝑥(𝐾𝐵)𝐶 ↔ (𝑥𝐵𝐶𝐵 ∧ (𝑥 ∈ (𝐵𝐼𝐶) ∨ 𝐶 ∈ (𝐵𝐼𝑥)))))
2822, 27mpbid 222 . . . . . . . . . . . . 13 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝑥𝐵𝐶𝐵 ∧ (𝑥 ∈ (𝐵𝐼𝐶) ∨ 𝐶 ∈ (𝐵𝐼𝑥))))
2928simp3d 1136 . . . . . . . . . . . 12 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝑥 ∈ (𝐵𝐼𝐶) ∨ 𝐶 ∈ (𝐵𝐼𝑥)))
3029orcomd 402 . . . . . . . . . . 11 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝐶 ∈ (𝐵𝐼𝑥) ∨ 𝑥 ∈ (𝐵𝐼𝐶)))
31 simprrl 823 . . . . . . . . . . . . 13 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝑦(𝐾𝐵)𝐴)
321, 3, 21, 16, 10, 7, 5ishlg 25617 . . . . . . . . . . . . 13 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝑦(𝐾𝐵)𝐴 ↔ (𝑦𝐵𝐴𝐵 ∧ (𝑦 ∈ (𝐵𝐼𝐴) ∨ 𝐴 ∈ (𝐵𝐼𝑦)))))
3331, 32mpbid 222 . . . . . . . . . . . 12 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝑦𝐵𝐴𝐵 ∧ (𝑦 ∈ (𝐵𝐼𝐴) ∨ 𝐴 ∈ (𝐵𝐼𝑦))))
3433simp3d 1136 . . . . . . . . . . 11 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝑦 ∈ (𝐵𝐼𝐴) ∨ 𝐴 ∈ (𝐵𝐼𝑦)))
351, 2, 3, 26, 5, 7, 18, 8, 7, 7, 16, 10, 30, 34, 15, 11tgcgrsub2 25610 . . . . . . . . . 10 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝐶(dist‘𝐺)𝑥) = (𝑦(dist‘𝐺)𝐴))
361, 2, 20, 5, 7, 18, 8, 7, 16, 10, 15, 35, 12trgcgr 25531 . . . . . . . . 9 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → ⟨“𝐵𝐶𝑥”⟩(cgrG‘𝐺)⟨“𝐵𝑦𝐴”⟩)
371, 2, 3, 5, 18, 16axtgcgrrflx 25481 . . . . . . . . 9 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝐶(dist‘𝐺)𝑦) = (𝑦(dist‘𝐺)𝐶))
38 cgraid.2 . . . . . . . . . 10 (𝜑𝐵𝐶)
3938ad3antrrr 768 . . . . . . . . 9 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → 𝐵𝐶)
401, 19, 3, 5, 7, 18, 8, 20, 7, 16, 2, 16, 10, 18, 25, 36, 14, 37, 39tgfscgr 25583 . . . . . . . 8 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝑥(dist‘𝐺)𝑦) = (𝐴(dist‘𝐺)𝐶))
411, 2, 3, 5, 8, 16, 10, 18, 40tgcgrcomlr 25495 . . . . . . 7 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝑦(dist‘𝐺)𝑥) = (𝐶(dist‘𝐺)𝐴))
4241eqcomd 2730 . . . . . 6 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (𝐶(dist‘𝐺)𝐴) = (𝑦(dist‘𝐺)𝑥))
4313, 15, 423jca 1379 . . . . 5 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → ((𝐴(dist‘𝐺)𝐵) = (𝑥(dist‘𝐺)𝐵) ∧ (𝐵(dist‘𝐺)𝐶) = (𝐵(dist‘𝐺)𝑦) ∧ (𝐶(dist‘𝐺)𝐴) = (𝑦(dist‘𝐺)𝑥)))
4443ad2ant1 1125 . . . . . . . 8 ((𝜑𝑥𝑃𝑦𝑃) → 𝐺 ∈ TarskiG)
4593ad2ant1 1125 . . . . . . . 8 ((𝜑𝑥𝑃𝑦𝑃) → 𝐴𝑃)
4663ad2ant1 1125 . . . . . . . 8 ((𝜑𝑥𝑃𝑦𝑃) → 𝐵𝑃)
47173ad2ant1 1125 . . . . . . . 8 ((𝜑𝑥𝑃𝑦𝑃) → 𝐶𝑃)
48 simp2 1129 . . . . . . . 8 ((𝜑𝑥𝑃𝑦𝑃) → 𝑥𝑃)
49 simp3 1130 . . . . . . . 8 ((𝜑𝑥𝑃𝑦𝑃) → 𝑦𝑃)
501, 2, 20, 44, 45, 46, 47, 48, 46, 49trgcgrg 25530 . . . . . . 7 ((𝜑𝑥𝑃𝑦𝑃) → (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝐵𝑦”⟩ ↔ ((𝐴(dist‘𝐺)𝐵) = (𝑥(dist‘𝐺)𝐵) ∧ (𝐵(dist‘𝐺)𝐶) = (𝐵(dist‘𝐺)𝑦) ∧ (𝐶(dist‘𝐺)𝐴) = (𝑦(dist‘𝐺)𝑥))))
51503expa 1111 . . . . . 6 (((𝜑𝑥𝑃) ∧ 𝑦𝑃) → (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝐵𝑦”⟩ ↔ ((𝐴(dist‘𝐺)𝐵) = (𝑥(dist‘𝐺)𝐵) ∧ (𝐵(dist‘𝐺)𝐶) = (𝐵(dist‘𝐺)𝑦) ∧ (𝐶(dist‘𝐺)𝐴) = (𝑦(dist‘𝐺)𝑥))))
5251adantr 472 . . . . 5 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝐵𝑦”⟩ ↔ ((𝐴(dist‘𝐺)𝐵) = (𝑥(dist‘𝐺)𝐵) ∧ (𝐵(dist‘𝐺)𝐶) = (𝐵(dist‘𝐺)𝑦) ∧ (𝐶(dist‘𝐺)𝐴) = (𝑦(dist‘𝐺)𝑥))))
5343, 52mpbird 247 . . . 4 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → ⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝐵𝑦”⟩)
5453, 22, 313jca 1379 . . 3 ((((𝜑𝑥𝑃) ∧ 𝑦𝑃) ∧ ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))) → (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝐵𝑦”⟩ ∧ 𝑥(𝐾𝐵)𝐶𝑦(𝐾𝐵)𝐴))
5538necomd 2951 . . . . 5 (𝜑𝐶𝐵)
56 cgraid.1 . . . . . 6 (𝜑𝐴𝐵)
5756necomd 2951 . . . . 5 (𝜑𝐵𝐴)
581, 3, 21, 6, 6, 9, 4, 17, 2, 55, 57hlcgrex 25631 . . . 4 (𝜑 → ∃𝑥𝑃 (𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)))
591, 3, 21, 6, 6, 17, 4, 9, 2, 56, 38hlcgrex 25631 . . . 4 (𝜑 → ∃𝑦𝑃 (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶)))
60 reeanv 3209 . . . 4 (∃𝑥𝑃𝑦𝑃 ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶))) ↔ (∃𝑥𝑃 (𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ ∃𝑦𝑃 (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶))))
6158, 59, 60sylanbrc 701 . . 3 (𝜑 → ∃𝑥𝑃𝑦𝑃 ((𝑥(𝐾𝐵)𝐶 ∧ (𝐵(dist‘𝐺)𝑥) = (𝐵(dist‘𝐺)𝐴)) ∧ (𝑦(𝐾𝐵)𝐴 ∧ (𝐵(dist‘𝐺)𝑦) = (𝐵(dist‘𝐺)𝐶))))
6254, 61reximddv2 3122 . 2 (𝜑 → ∃𝑥𝑃𝑦𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝐵𝑦”⟩ ∧ 𝑥(𝐾𝐵)𝐶𝑦(𝐾𝐵)𝐴))
631, 3, 21, 4, 9, 6, 17, 17, 6, 9iscgra 25821 . 2 (𝜑 → (⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐶𝐵𝐴”⟩ ↔ ∃𝑥𝑃𝑦𝑃 (⟨“𝐴𝐵𝐶”⟩(cgrG‘𝐺)⟨“𝑥𝐵𝑦”⟩ ∧ 𝑥(𝐾𝐵)𝐶𝑦(𝐾𝐵)𝐴)))
6462, 63mpbird 247 1 (𝜑 → ⟨“𝐴𝐵𝐶”⟩(cgrA‘𝐺)⟨“𝐶𝐵𝐴”⟩)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 196  wo 382  wa 383  w3a 1072   = wceq 1596  wcel 2103  wne 2896  wrex 3015   class class class wbr 4760  cfv 6001  (class class class)co 6765  ⟨“cs3 13708  Basecbs 15980  distcds 16073  TarskiGcstrkg 25449  Itvcitv 25455  LineGclng 25456  cgrGccgrg 25525  ≤Gcleg 25597  hlGchlg 25615  cgrAccgra 25819
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1835  ax-4 1850  ax-5 1952  ax-6 2018  ax-7 2054  ax-8 2105  ax-9 2112  ax-10 2132  ax-11 2147  ax-12 2160  ax-13 2355  ax-ext 2704  ax-rep 4879  ax-sep 4889  ax-nul 4897  ax-pow 4948  ax-pr 5011  ax-un 7066  ax-cnex 10105  ax-resscn 10106  ax-1cn 10107  ax-icn 10108  ax-addcl 10109  ax-addrcl 10110  ax-mulcl 10111  ax-mulrcl 10112  ax-mulcom 10113  ax-addass 10114  ax-mulass 10115  ax-distr 10116  ax-i2m1 10117  ax-1ne0 10118  ax-1rid 10119  ax-rnegex 10120  ax-rrecex 10121  ax-cnre 10122  ax-pre-lttri 10123  ax-pre-lttrn 10124  ax-pre-ltadd 10125  ax-pre-mulgt0 10126
This theorem depends on definitions:  df-bi 197  df-or 384  df-an 385  df-3or 1073  df-3an 1074  df-tru 1599  df-ex 1818  df-nf 1823  df-sb 2011  df-eu 2575  df-mo 2576  df-clab 2711  df-cleq 2717  df-clel 2720  df-nfc 2855  df-ne 2897  df-nel 3000  df-ral 3019  df-rex 3020  df-reu 3021  df-rmo 3022  df-rab 3023  df-v 3306  df-sbc 3542  df-csb 3640  df-dif 3683  df-un 3685  df-in 3687  df-ss 3694  df-pss 3696  df-nul 4024  df-if 4195  df-pw 4268  df-sn 4286  df-pr 4288  df-tp 4290  df-op 4292  df-uni 4545  df-int 4584  df-iun 4630  df-br 4761  df-opab 4821  df-mpt 4838  df-tr 4861  df-id 5128  df-eprel 5133  df-po 5139  df-so 5140  df-fr 5177  df-we 5179  df-xp 5224  df-rel 5225  df-cnv 5226  df-co 5227  df-dm 5228  df-rn 5229  df-res 5230  df-ima 5231  df-pred 5793  df-ord 5839  df-on 5840  df-lim 5841  df-suc 5842  df-iota 5964  df-fun 6003  df-fn 6004  df-f 6005  df-f1 6006  df-fo 6007  df-f1o 6008  df-fv 6009  df-riota 6726  df-ov 6768  df-oprab 6769  df-mpt2 6770  df-om 7183  df-1st 7285  df-2nd 7286  df-wrecs 7527  df-recs 7588  df-rdg 7626  df-1o 7680  df-oadd 7684  df-er 7862  df-map 7976  df-pm 7977  df-en 8073  df-dom 8074  df-sdom 8075  df-fin 8076  df-card 8878  df-cda 9103  df-pnf 10189  df-mnf 10190  df-xr 10191  df-ltxr 10192  df-le 10193  df-sub 10381  df-neg 10382  df-nn 11134  df-2 11192  df-3 11193  df-n0 11406  df-xnn0 11477  df-z 11491  df-uz 11801  df-fz 12441  df-fzo 12581  df-hash 13233  df-word 13406  df-concat 13408  df-s1 13409  df-s2 13714  df-s3 13715  df-trkgc 25467  df-trkgb 25468  df-trkgcb 25469  df-trkg 25472  df-cgrg 25526  df-leg 25598  df-hlg 25616  df-cgra 25820
This theorem is referenced by:  cgraswaplr  25836  oacgr  25843  tgasa1  25859  isoas  25864
  Copyright terms: Public domain W3C validator