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

Theorem axtgcgrid 25362
Description: Axiom of identity of congruence, Axiom A3 of [Schwabhauser] p. 10. (Contributed by Thierry Arnoux, 14-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 )
axtgcgrid.1  |-  ( ph  ->  X  e.  P )
axtgcgrid.2  |-  ( ph  ->  Y  e.  P )
axtgcgrid.3  |-  ( ph  ->  Z  e.  P )
axtgcgrid.4  |-  ( ph  ->  ( X  .-  Y
)  =  ( Z 
.-  Z ) )
Assertion
Ref Expression
axtgcgrid  |-  ( ph  ->  X  =  Y )

Proof of Theorem axtgcgrid
Dummy variables  f 
i  p  x  y  z are mutually distinct and distinct from all other variables.
StepHypRef 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 inss1 3833 . . . . . 6  |-  (TarskiGC  i^i TarskiGB )  C_ TarskiGC
42, 3sstri 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_ TarskiGC
51, 4eqsstri 3635 . . . 4  |- TarskiG  C_ TarskiGC
6 axtrkg.g . . . 4  |-  ( ph  ->  G  e. TarskiG )
75, 6sseldi 3601 . . 3  |-  ( ph  ->  G  e. TarskiGC )
8 axtrkg.p . . . . . 6  |-  P  =  ( Base `  G
)
9 axtrkg.d . . . . . 6  |-  .-  =  ( dist `  G )
10 axtrkg.i . . . . . 6  |-  I  =  (Itv `  G )
118, 9, 10istrkgc 25353 . . . . 5  |-  ( G  e. TarskiGC  <->  ( G  e.  _V  /\  ( A. x  e.  P  A. y  e.  P  ( x  .-  y )  =  ( y  .-  x )  /\  A. x  e.  P  A. y  e.  P  A. z  e.  P  (
( x  .-  y
)  =  ( z 
.-  z )  ->  x  =  y )
) ) )
1211simprbi 480 . . . 4  |-  ( G  e. TarskiGC 
->  ( A. x  e.  P  A. y  e.  P  ( x  .-  y )  =  ( y  .-  x )  /\  A. x  e.  P  A. y  e.  P  A. z  e.  P  ( ( x 
.-  y )  =  ( z  .-  z
)  ->  x  =  y ) ) )
1312simprd 479 . . 3  |-  ( G  e. TarskiGC 
->  A. x  e.  P  A. y  e.  P  A. z  e.  P  ( ( x  .-  y )  =  ( z  .-  z )  ->  x  =  y ) )
147, 13syl 17 . 2  |-  ( ph  ->  A. x  e.  P  A. y  e.  P  A. z  e.  P  ( ( x  .-  y )  =  ( z  .-  z )  ->  x  =  y ) )
15 axtgcgrid.4 . 2  |-  ( ph  ->  ( X  .-  Y
)  =  ( Z 
.-  Z ) )
16 axtgcgrid.1 . . 3  |-  ( ph  ->  X  e.  P )
17 axtgcgrid.2 . . 3  |-  ( ph  ->  Y  e.  P )
18 axtgcgrid.3 . . 3  |-  ( ph  ->  Z  e.  P )
19 oveq1 6657 . . . . . 6  |-  ( x  =  X  ->  (
x  .-  y )  =  ( X  .-  y ) )
2019eqeq1d 2624 . . . . 5  |-  ( x  =  X  ->  (
( x  .-  y
)  =  ( z 
.-  z )  <->  ( X  .-  y )  =  ( z  .-  z ) ) )
21 eqeq1 2626 . . . . 5  |-  ( x  =  X  ->  (
x  =  y  <->  X  =  y ) )
2220, 21imbi12d 334 . . . 4  |-  ( x  =  X  ->  (
( ( x  .-  y )  =  ( z  .-  z )  ->  x  =  y )  <->  ( ( X 
.-  y )  =  ( z  .-  z
)  ->  X  =  y ) ) )
23 oveq2 6658 . . . . . 6  |-  ( y  =  Y  ->  ( X  .-  y )  =  ( X  .-  Y
) )
2423eqeq1d 2624 . . . . 5  |-  ( y  =  Y  ->  (
( X  .-  y
)  =  ( z 
.-  z )  <->  ( X  .-  Y )  =  ( z  .-  z ) ) )
25 eqeq2 2633 . . . . 5  |-  ( y  =  Y  ->  ( X  =  y  <->  X  =  Y ) )
2624, 25imbi12d 334 . . . 4  |-  ( y  =  Y  ->  (
( ( X  .-  y )  =  ( z  .-  z )  ->  X  =  y )  <->  ( ( X 
.-  Y )  =  ( z  .-  z
)  ->  X  =  Y ) ) )
27 id 22 . . . . . . 7  |-  ( z  =  Z  ->  z  =  Z )
2827, 27oveq12d 6668 . . . . . 6  |-  ( z  =  Z  ->  (
z  .-  z )  =  ( Z  .-  Z ) )
2928eqeq2d 2632 . . . . 5  |-  ( z  =  Z  ->  (
( X  .-  Y
)  =  ( z 
.-  z )  <->  ( X  .-  Y )  =  ( Z  .-  Z ) ) )
3029imbi1d 331 . . . 4  |-  ( z  =  Z  ->  (
( ( X  .-  Y )  =  ( z  .-  z )  ->  X  =  Y )  <->  ( ( X 
.-  Y )  =  ( Z  .-  Z
)  ->  X  =  Y ) ) )
3122, 26, 30rspc3v 3325 . . 3  |-  ( ( X  e.  P  /\  Y  e.  P  /\  Z  e.  P )  ->  ( A. x  e.  P  A. y  e.  P  A. z  e.  P  ( ( x 
.-  y )  =  ( z  .-  z
)  ->  x  =  y )  ->  (
( X  .-  Y
)  =  ( Z 
.-  Z )  ->  X  =  Y )
) )
3216, 17, 18, 31syl3anc 1326 . 2  |-  ( ph  ->  ( A. x  e.  P  A. y  e.  P  A. z  e.  P  ( ( x 
.-  y )  =  ( z  .-  z
)  ->  x  =  y )  ->  (
( X  .-  Y
)  =  ( Z 
.-  Z )  ->  X  =  Y )
) )
3314, 15, 32mp2d 49 1  |-  ( ph  ->  X  =  Y )
Colors of variables: wff setvar class
Syntax hints:    -> wi 4    /\ wa 384    \/ w3o 1036    = wceq 1483    e. wcel 1990   {cab 2608   A.wral 2912   {crab 2916   _Vcvv 3200   [.wsbc 3435    \ cdif 3571    i^i cin 3573   {csn 4177   ` cfv 5888  (class class class)co 6650    |-> cmpt2 6652   Basecbs 15857   distcds 15950  TarskiGcstrkg 25329  TarskiGCcstrkgc 25330  TarskiGBcstrkgb 25331  TarskiGCBcstrkgcb 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-sn 4178  df-pr 4180  df-op 4184  df-uni 4437  df-br 4654  df-iota 5851  df-fv 5896  df-ov 6653  df-trkgc 25347  df-trkg 25352
This theorem is referenced by:  tgcgreqb  25376  tgcgrtriv  25379  tgsegconeq  25381  tgbtwntriv2  25382  tgbtwndiff  25401  tgifscgr  25403  tgbtwnxfr  25425  lnid  25465  tgbtwnconn1lem2  25468  tgbtwnconn1lem3  25469  legtri3  25485  legeq  25488  legbtwn  25489  mirreu3  25549  colmid  25583  krippenlem  25585  lmiisolem  25688  hypcgrlem1  25691  hypcgrlem2  25692  f1otrg  25751
  Copyright terms: Public domain W3C validator