Theorem tglinecom 28908

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 485	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑃𝐿𝑄)) → 𝐺 ∈ TarskiG)
6		tglineelsb2.2	. . . . 5 ⊢ (𝜑 → 𝑄 ∈ 𝐵)
7	6	adantr 485	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑃𝐿𝑄)) → 𝑄 ∈ 𝐵)
8		tglineelsb2.1	. . . . 5 ⊢ (𝜑 → 𝑃 ∈ 𝐵)
9	8	adantr 485	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑃𝐿𝑄)) → 𝑃 ∈ 𝐵)
10		tglineelsb2.4	. . . . . 6 ⊢ (𝜑 → 𝑃 ≠ 𝑄)
11	1, 3, 2, 4, 8, 6, 10	tglnssp 28821	. . . . 5 ⊢ (𝜑 → (𝑃𝐿𝑄) ⊆ 𝐵)
12	11	sselda 3937	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑃𝐿𝑄)) → 𝑥 ∈ 𝐵)
13	10	necomd 3013	. . . . 5 ⊢ (𝜑 → 𝑄 ≠ 𝑃)
14	13	adantr 485	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑃𝐿𝑄)) → 𝑄 ≠ 𝑃)
15		simpr 489	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑃𝐿𝑄)) → 𝑥 ∈ (𝑃𝐿𝑄))
16	1, 2, 3, 5, 7, 9, 12, 14, 15	lncom 28895	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑃𝐿𝑄)) → 𝑥 ∈ (𝑄𝐿𝑃))
17	4	adantr 485	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑄𝐿𝑃)) → 𝐺 ∈ TarskiG)
18	8	adantr 485	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑄𝐿𝑃)) → 𝑃 ∈ 𝐵)
19	6	adantr 485	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑄𝐿𝑃)) → 𝑄 ∈ 𝐵)
20	1, 3, 2, 4, 6, 8, 13	tglnssp 28821	. . . . 5 ⊢ (𝜑 → (𝑄𝐿𝑃) ⊆ 𝐵)
21	20	sselda 3937	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑄𝐿𝑃)) → 𝑥 ∈ 𝐵)
22	10	adantr 485	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑄𝐿𝑃)) → 𝑃 ≠ 𝑄)
23		simpr 489	. . . 4 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑄𝐿𝑃)) → 𝑥 ∈ (𝑄𝐿𝑃))
24	1, 2, 3, 17, 18, 19, 21, 22, 23	lncom 28895	. . 3 ⊢ ((𝜑 ∧ 𝑥 ∈ (𝑄𝐿𝑃)) → 𝑥 ∈ (𝑃𝐿𝑄))
25	16, 24	impbida 812	. 2 ⊢ (𝜑 → (𝑥 ∈ (𝑃𝐿𝑄) ↔ 𝑥 ∈ (𝑄𝐿𝑃)))
26	25	eqrdv 2761	1 ⊢ (𝜑 → (𝑃𝐿𝑄) = (𝑄𝐿𝑃))

Syntax hints:   → wi 4   ∧ wa 400   = wceq 1570   ∈ wcel 2143   ≠ wne 2958  ‘cfv 6536  (class class class)co 7410  Basecbs 17264  TarskiGcstrkg 28696  Itvcitv 28702  LineGclng 28703

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-sep 5257  ax-nul 5269  ax-pr 5404

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-ral 3080  df-rex 3090  df-rab 3417  df-v 3457  df-sbc 3745  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4873  df-br 5110  df-opab 5174  df-id 5556  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-iota 6492  df-fun 6538  df-fv 6544  df-ov 7413  df-oprab 7414  df-mpo 7415  df-trkgc 28717  df-trkgb 28718  df-trkgcb 28719  df-trkg 28722

This theorem is referenced by:  tglinethru  28909  coltr3  28922  symquadprlnglem  28970  footeq  29004  colperpexlem3  29013  mideulem2  29015  opphllem  29016  midex  29018  opphllem3  29030  opphllem5  29032  plngrotlem1  29069  plngrotlem2  29070  lnssplnglem  29073  lnssplng  29074  lmicom  29097  lmiisolem  29105  symquadmid  29108  lnperpex  29113  trgcopy  29115  perpeqlem  29150  prlngmid2  29211  symquadprlng  29212  prlngsymquadlem  29213  prlngsymquadopp  29215  quadcgrprlng  29216  tgaltai  29217