Theorem axtgbtwnid 25365

Description: Identity of Betweenness. Axiom A6 of [Schwabhauser] p. 11. (Contributed by Thierry Arnoux, 15-Mar-2019.)

Hypotheses

Ref	Expression
axtrkg.p	|- P = ( Base ` G )
axtrkg.d	|- .- = ( dist ` G )
axtrkg.i	|- I = (Itv ` G )
axtrkg.g	|- ( ph -> G e. TarskiG )
axtgbtwnid.1	|- ( ph -> X e. P )
axtgbtwnid.2	|- ( ph -> Y e. P )
axtgbtwnid.3	|- ( ph -> Y e. ( X I X ) )

Assertion

Ref	Expression
axtgbtwnid	|- ( ph -> X = Y )

Proof of Theorem axtgbtwnid

Dummy variables f i p x y z a b v s t u are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-trkg 25352	. . . . 5 |- TarskiG = ( (TarskiGC i^i TarskiGB ) i^i (TarskiGCB i^i { f | [. ( Base ` f ) / p ]. [. (Itv ` f ) / i ]. (LineG ` f ) = ( x e. p , y e. ( p \ { x } ) |-> { z e. p | ( z e. ( x i y ) \/ x e. ( z i y ) \/ y e. ( x i z ) ) } ) } ) )
2		inss1 3833	. . . . . 6 |- ( (TarskiGC i^i TarskiGB ) i^i (TarskiGCB i^i { f | [. ( Base ` f ) / p ]. [. (Itv ` f ) / i ]. (LineG ` f ) = ( x e. p , y e. ( p \ { x } ) |-> { z e. p | ( z e. ( x i y ) \/ x e. ( z i y ) \/ y e. ( x i z ) ) } ) } ) ) C_ (TarskiGC i^i TarskiGB )
3		inss2 3834	. . . . . 6 |- (TarskiGC i^i TarskiGB ) C_ TarskiGB
4	2, 3	sstri 3612	. . . . 5 |- ( (TarskiGC i^i TarskiGB ) i^i (TarskiGCB i^i { f | [. ( Base ` f ) / p ]. [. (Itv ` f ) / i ]. (LineG ` f ) = ( x e. p , y e. ( p \ { x } ) |-> { z e. p | ( z e. ( x i y ) \/ x e. ( z i y ) \/ y e. ( x i z ) ) } ) } ) ) C_ TarskiGB
5	1, 4	eqsstri 3635	. . . 4 |- TarskiG C_ TarskiGB
6		axtrkg.g	. . . 4 |- ( ph -> G e. TarskiG )
7	5, 6	sseldi 3601	. . 3 |- ( ph -> G e. TarskiGB )
8		axtrkg.p	. . . . . 6 |- P = ( Base ` G )
9		axtrkg.d	. . . . . 6 |- .- = ( dist ` G )
10		axtrkg.i	. . . . . 6 |- I = (Itv ` G )
11	8, 9, 10	istrkgb 25354	. . . . 5 |- ( G e. TarskiGB <-> ( G e. _V /\ ( A. x e. P A. y e. P ( y e. ( x I x ) -> x = y ) /\ A. x e. P A. y e. P A. z e. P A. u e. P A. v e. P ( ( u e. ( x I z ) /\ v e. ( y I z ) ) -> E. a e. P ( a e. ( u I y ) /\ a e. ( v I x ) ) ) /\ A. s e. ~P P A. t e. ~P P ( E. a e. P A. x e. s A. y e. t x e. ( a I y ) -> E. b e. P A. x e. s A. y e. t b e. ( x I y ) ) ) ) )
12	11	simprbi 480	. . . 4 |- ( G e. TarskiGB -> ( A. x e. P A. y e. P ( y e. ( x I x ) -> x = y ) /\ A. x e. P A. y e. P A. z e. P A. u e. P A. v e. P ( ( u e. ( x I z ) /\ v e. ( y I z ) ) -> E. a e. P ( a e. ( u I y ) /\ a e. ( v I x ) ) ) /\ A. s e. ~P P A. t e. ~P P ( E. a e. P A. x e. s A. y e. t x e. ( a I y ) -> E. b e. P A. x e. s A. y e. t b e. ( x I y ) ) ) )
13	12	simp1d 1073	. . 3 |- ( G e. TarskiGB -> A. x e. P A. y e. P ( y e. ( x I x ) -> x = y ) )
14	7, 13	syl 17	. 2 |- ( ph -> A. x e. P A. y e. P ( y e. ( x I x ) -> x = y ) )
15		axtgbtwnid.3	. 2 |- ( ph -> Y e. ( X I X ) )
16		axtgbtwnid.1	. . 3 |- ( ph -> X e. P )
17		axtgbtwnid.2	. . 3 |- ( ph -> Y e. P )
18		id 22	. . . . . . 7 |- ( x = X -> x = X )
19	18, 18	oveq12d 6668	. . . . . 6 |- ( x = X -> ( x I x ) = ( X I X ) )
20	19	eleq2d 2687	. . . . 5 |- ( x = X -> ( y e. ( x I x ) <-> y e. ( X I X ) ) )
21		eqeq1 2626	. . . . 5 |- ( x = X -> ( x = y <-> X = y ) )
22	20, 21	imbi12d 334	. . . 4 |- ( x = X -> ( ( y e. ( x I x ) -> x = y ) <-> ( y e. ( X I X ) -> X = y ) ) )
23		eleq1 2689	. . . . 5 |- ( y = Y -> ( y e. ( X I X ) <-> Y e. ( X I X ) ) )
24		eqeq2 2633	. . . . 5 |- ( y = Y -> ( X = y <-> X = Y ) )
25	23, 24	imbi12d 334	. . . 4 |- ( y = Y -> ( ( y e. ( X I X ) -> X = y ) <-> ( Y e. ( X I X ) -> X = Y ) ) )
26	22, 25	rspc2v 3322	. . 3 |- ( ( X e. P /\ Y e. P ) -> ( A. x e. P A. y e. P ( y e. ( x I x ) -> x = y ) -> ( Y e. ( X I X ) -> X = Y ) ) )
27	16, 17, 26	syl2anc 693	. 2 |- ( ph -> ( A. x e. P A. y e. P ( y e. ( x I x ) -> x = y ) -> ( Y e. ( X I X ) -> X = Y ) ) )
28	14, 15, 27	mp2d 49	1 |- ( ph -> X = Y )

Syntax hints:   -> wi 4   /\ wa 384   \/ w3o 1036   /\ w3a 1037   = wceq 1483   e. wcel 1990   {cab 2608   A.wral 2912   E.wrex 2913   {crab 2916   _Vcvv 3200   [.wsbc 3435   \ cdif 3571   i^i cin 3573   ~Pcpw 4158   {csn 4177   ` cfv 5888  (class class class)co 6650   |-> cmpt2 6652   Basecbs 15857   distcds 15950  TarskiGcstrkg 25329  TarskiG_Ccstrkgc 25330  TarskiG_Bcstrkgb 25331  TarskiG_CBcstrkgcb 25332  Itvcitv 25335  LineGclng 25336

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-nul 4789

This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3an 1039  df-tru 1486  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ral 2917  df-rex 2918  df-rab 2921  df-v 3202  df-sbc 3436  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-nul 3916  df-if 4087  df-pw 4160  df-sn 4178  df-pr 4180  df-op 4184  df-uni 4437  df-br 4654  df-iota 5851  df-fv 5896  df-ov 6653  df-trkgb 25348  df-trkg 25352

This theorem is referenced by:  tgbtwncom  25383  tgbtwnne  25385  tgbtwnswapid  25387  tgbtwnintr  25388  tgifscgr  25403  tgidinside  25466  tgbtwnconn1lem3  25469  coltr3  25543  mirinv  25561  miriso  25565  krippenlem  25585  midexlem  25587  colperpexlem3  25624  oppne3  25635  oppnid  25638  opphllem1  25639  hlpasch  25648  midid  25673  lmiisolem  25688  f1otrg  25751