Theorem tglinecom 28804

Description: Commutativity law for lines. Part of theorem 6.17 of [Schwabhauser] p. 45. (Contributed by Thierry Arnoux, 17-May-2019.)

Hypotheses

Ref	Expression
tglineelsb2.p	⊢ 𝐵 = (Base‘𝐺)
tglineelsb2.i	⊢ 𝐼 = (Itv‘𝐺)
tglineelsb2.l	⊢ 𝐿 = (LineG‘𝐺)
tglineelsb2.g	⊢ (𝜑 → 𝐺 ∈ TarskiG)
tglineelsb2.1	⊢ (𝜑 → 𝑃 ∈ 𝐵)
tglineelsb2.2	⊢ (𝜑 → 𝑄 ∈ 𝐵)
tglineelsb2.4	⊢ (𝜑 → 𝑃 ≠ 𝑄)

Assertion

Ref	Expression
tglinecom	⊢ (𝜑 → (𝑃𝐿𝑄) = (𝑄𝐿𝑃))

Proof of Theorem tglinecom

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		tglineelsb2.p	. . . 4 ⊢ 𝐵 = (Base‘𝐺)
2		tglineelsb2.i	. . . 4 ⊢ 𝐼 = (Itv‘𝐺)
3		tglineelsb2.l	. . . 4 ⊢ 𝐿 = (LineG‘𝐺)
4		tglineelsb2.g	. . . . 5 ⊢ (𝜑 → 𝐺 ∈ TarskiG)
5	4	adantr 484	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑃𝐿𝑄)) → 𝐺 ∈ TarskiG)
6		tglineelsb2.2	. . . . 5 ⊢ (𝜑 → 𝑄 ∈ 𝐵)
7	6	adantr 484	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑃𝐿𝑄)) → 𝑄 ∈ 𝐵)
8		tglineelsb2.1	. . . . 5 ⊢ (𝜑 → 𝑃 ∈ 𝐵)
9	8	adantr 484	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑃𝐿𝑄)) → 𝑃 ∈ 𝐵)
10		tglineelsb2.4	. . . . . 6 ⊢ (𝜑 → 𝑃 ≠ 𝑄)
11	1, 3, 2, 4, 8, 6, 10	tglnssp 28721	. . . . 5 ⊢ (𝜑 → (𝑃𝐿𝑄) ⊆ 𝐵)
12	11	sselda 3936	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑃𝐿𝑄)) → 𝑥 ∈ 𝐵)
13	10	necomd 3012	. . . . 5 ⊢ (𝜑 → 𝑄 ≠ 𝑃)
14	13	adantr 484	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑃𝐿𝑄)) → 𝑄 ≠ 𝑃)
15		simpr 488	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑃𝐿𝑄)) → 𝑥 ∈ (𝑃𝐿𝑄))
16	1, 2, 3, 5, 7, 9, 12, 14, 15	lncom 28791	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑃𝐿𝑄)) → 𝑥 ∈ (𝑄𝐿𝑃))
17	4	adantr 484	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑄𝐿𝑃)) → 𝐺 ∈ TarskiG)
18	8	adantr 484	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑄𝐿𝑃)) → 𝑃 ∈ 𝐵)
19	6	adantr 484	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑄𝐿𝑃)) → 𝑄 ∈ 𝐵)
20	1, 3, 2, 4, 6, 8, 13	tglnssp 28721	. . . . 5 ⊢ (𝜑 → (𝑄𝐿𝑃) ⊆ 𝐵)
21	20	sselda 3936	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑄𝐿𝑃)) → 𝑥 ∈ 𝐵)
22	10	adantr 484	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑄𝐿𝑃)) → 𝑃 ≠ 𝑄)
23		simpr 488	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑄𝐿𝑃)) → 𝑥 ∈ (𝑄𝐿𝑃))
24	1, 2, 3, 17, 18, 19, 21, 22, 23	lncom 28791	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑄𝐿𝑃)) → 𝑥 ∈ (𝑃𝐿𝑄))
25	16, 24	impbida 810	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝑃𝐿𝑄) ↔ 𝑥 ∈ (𝑄𝐿𝑃)))
26	25	eqrdv 2760	1 ⊢ (𝜑 → (𝑃𝐿𝑄) = (𝑄𝐿𝑃))

Syntax hints:   → wi 4   ∧ wa 399   = wceq 1560   ∈ wcel 2142   ≠ wne 2957  ‘cfv 6521  (class class class)co 7396  Basecbs 17245  TarskiGcstrkg 28596  Itvcitv 28602  LineGclng 28603

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1815  ax-4 1829  ax-5 1930  ax-6 1987  ax-7 2028  ax-8 2144  ax-9 2152  ax-10 2175  ax-11 2191  ax-12 2212  ax-ext 2734  ax-sep 5246  ax-nul 5256  ax-pr 5390

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1099  df-3an 1100  df-tru 1563  df-fal 1573  df-ex 1800  df-nf 1804  df-sb 2091  df-mo 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3077  df-rex 3087  df-rab 3415  df-v 3456  df-sbc 3745  df-dif 3907  df-un 3909  df-in 3911  df-ss 3921  df-nul 4286  df-if 4481  df-pw 4557  df-sn 4583  df-pr 4585  df-op 4589  df-uni 4866  df-br 5101  df-opab 5163  df-id 5542  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-iota 6477  df-fun 6523  df-fv 6529  df-ov 7399  df-oprab 7400  df-mpo 7401  df-trkgc 28617  df-trkgb 28618  df-trkgcb 28619  df-trkg 28622

This theorem is referenced by:  tglinethru  28805  coltr3  28818  footeq  28897  colperpexlem3  28905  mideulem2  28907  opphllem  28908  midex  28910  opphllem3  28922  opphllem5  28924  lmicom  28961  lmiisolem  28969  lnperpex  28976  trgcopy  28977  plngrotlem1  28994  plngrotlem2  28995  lnssplnglem  28998  lnssplng  28999