ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  grpidssd Unicode version

Theorem grpidssd 13379
Description: If the base set of a group is contained in the base set of another group, and the group operation of the group is the restriction of the group operation of the other group to its base set, then both groups have the same identity element. (Contributed by AV, 15-Mar-2019.)
Hypotheses
Ref Expression
grpidssd.m  |-  ( ph  ->  M  e.  Grp )
grpidssd.s  |-  ( ph  ->  S  e.  Grp )
grpidssd.b  |-  B  =  ( Base `  S
)
grpidssd.c  |-  ( ph  ->  B  C_  ( Base `  M ) )
grpidssd.o  |-  ( ph  ->  A. x  e.  B  A. y  e.  B  ( x ( +g  `  M ) y )  =  ( x ( +g  `  S ) y ) )
Assertion
Ref Expression
grpidssd  |-  ( ph  ->  ( 0g `  M
)  =  ( 0g
`  S ) )
Distinct variable groups:    x, B, y   
x, M, y    x, S, y
Allowed substitution hints:    ph( x, y)

Proof of Theorem grpidssd
StepHypRef Expression
1 grpidssd.s . . . . . 6  |-  ( ph  ->  S  e.  Grp )
2 grpidssd.b . . . . . . 7  |-  B  =  ( Base `  S
)
3 eqid 2204 . . . . . . 7  |-  ( 0g
`  S )  =  ( 0g `  S
)
42, 3grpidcl 13332 . . . . . 6  |-  ( S  e.  Grp  ->  ( 0g `  S )  e.  B )
51, 4syl 14 . . . . 5  |-  ( ph  ->  ( 0g `  S
)  e.  B )
6 grpidssd.o . . . . 5  |-  ( ph  ->  A. x  e.  B  A. y  e.  B  ( x ( +g  `  M ) y )  =  ( x ( +g  `  S ) y ) )
7 oveq1 5950 . . . . . . 7  |-  ( x  =  ( 0g `  S )  ->  (
x ( +g  `  M
) y )  =  ( ( 0g `  S ) ( +g  `  M ) y ) )
8 oveq1 5950 . . . . . . 7  |-  ( x  =  ( 0g `  S )  ->  (
x ( +g  `  S
) y )  =  ( ( 0g `  S ) ( +g  `  S ) y ) )
97, 8eqeq12d 2219 . . . . . 6  |-  ( x  =  ( 0g `  S )  ->  (
( x ( +g  `  M ) y )  =  ( x ( +g  `  S ) y )  <->  ( ( 0g `  S ) ( +g  `  M ) y )  =  ( ( 0g `  S
) ( +g  `  S
) y ) ) )
10 oveq2 5951 . . . . . . 7  |-  ( y  =  ( 0g `  S )  ->  (
( 0g `  S
) ( +g  `  M
) y )  =  ( ( 0g `  S ) ( +g  `  M ) ( 0g
`  S ) ) )
11 oveq2 5951 . . . . . . 7  |-  ( y  =  ( 0g `  S )  ->  (
( 0g `  S
) ( +g  `  S
) y )  =  ( ( 0g `  S ) ( +g  `  S ) ( 0g
`  S ) ) )
1210, 11eqeq12d 2219 . . . . . 6  |-  ( y  =  ( 0g `  S )  ->  (
( ( 0g `  S ) ( +g  `  M ) y )  =  ( ( 0g
`  S ) ( +g  `  S ) y )  <->  ( ( 0g `  S ) ( +g  `  M ) ( 0g `  S
) )  =  ( ( 0g `  S
) ( +g  `  S
) ( 0g `  S ) ) ) )
139, 12rspc2va 2890 . . . . 5  |-  ( ( ( ( 0g `  S )  e.  B  /\  ( 0g `  S
)  e.  B )  /\  A. x  e.  B  A. y  e.  B  ( x ( +g  `  M ) y )  =  ( x ( +g  `  S
) y ) )  ->  ( ( 0g
`  S ) ( +g  `  M ) ( 0g `  S
) )  =  ( ( 0g `  S
) ( +g  `  S
) ( 0g `  S ) ) )
145, 5, 6, 13syl21anc 1248 . . . 4  |-  ( ph  ->  ( ( 0g `  S ) ( +g  `  M ) ( 0g
`  S ) )  =  ( ( 0g
`  S ) ( +g  `  S ) ( 0g `  S
) ) )
15 eqid 2204 . . . . . 6  |-  ( +g  `  S )  =  ( +g  `  S )
162, 15, 3grplid 13334 . . . . 5  |-  ( ( S  e.  Grp  /\  ( 0g `  S )  e.  B )  -> 
( ( 0g `  S ) ( +g  `  S ) ( 0g
`  S ) )  =  ( 0g `  S ) )
171, 4, 16syl2anc2 412 . . . 4  |-  ( ph  ->  ( ( 0g `  S ) ( +g  `  S ) ( 0g
`  S ) )  =  ( 0g `  S ) )
1814, 17eqtrd 2237 . . 3  |-  ( ph  ->  ( ( 0g `  S ) ( +g  `  M ) ( 0g
`  S ) )  =  ( 0g `  S ) )
19 grpidssd.m . . . 4  |-  ( ph  ->  M  e.  Grp )
20 grpidssd.c . . . . 5  |-  ( ph  ->  B  C_  ( Base `  M ) )
2120, 5sseldd 3193 . . . 4  |-  ( ph  ->  ( 0g `  S
)  e.  ( Base `  M ) )
22 eqid 2204 . . . . 5  |-  ( Base `  M )  =  (
Base `  M )
23 eqid 2204 . . . . 5  |-  ( +g  `  M )  =  ( +g  `  M )
24 eqid 2204 . . . . 5  |-  ( 0g
`  M )  =  ( 0g `  M
)
2522, 23, 24grpidlcan 13369 . . . 4  |-  ( ( M  e.  Grp  /\  ( 0g `  S )  e.  ( Base `  M
)  /\  ( 0g `  S )  e.  (
Base `  M )
)  ->  ( (
( 0g `  S
) ( +g  `  M
) ( 0g `  S ) )  =  ( 0g `  S
)  <->  ( 0g `  S )  =  ( 0g `  M ) ) )
2619, 21, 21, 25syl3anc 1249 . . 3  |-  ( ph  ->  ( ( ( 0g
`  S ) ( +g  `  M ) ( 0g `  S
) )  =  ( 0g `  S )  <-> 
( 0g `  S
)  =  ( 0g
`  M ) ) )
2718, 26mpbid 147 . 2  |-  ( ph  ->  ( 0g `  S
)  =  ( 0g
`  M ) )
2827eqcomd 2210 1  |-  ( ph  ->  ( 0g `  M
)  =  ( 0g
`  S ) )
Colors of variables: wff set class
Syntax hints:    -> wi 4    <-> wb 105    = wceq 1372    e. wcel 2175   A.wral 2483    C_ wss 3165   ` cfv 5270  (class class class)co 5943   Basecbs 12803   +g cplusg 12880   0gc0g 13059   Grpcgrp 13303
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-io 710  ax-5 1469  ax-7 1470  ax-gen 1471  ax-ie1 1515  ax-ie2 1516  ax-8 1526  ax-10 1527  ax-11 1528  ax-i12 1529  ax-bndl 1531  ax-4 1532  ax-17 1548  ax-i9 1552  ax-ial 1556  ax-i5r 1557  ax-13 2177  ax-14 2178  ax-ext 2186  ax-sep 4161  ax-pow 4217  ax-pr 4252  ax-un 4479  ax-cnex 8015  ax-resscn 8016  ax-1re 8018  ax-addrcl 8021
This theorem depends on definitions:  df-bi 117  df-3an 982  df-tru 1375  df-nf 1483  df-sb 1785  df-eu 2056  df-mo 2057  df-clab 2191  df-cleq 2197  df-clel 2200  df-nfc 2336  df-ral 2488  df-rex 2489  df-reu 2490  df-rmo 2491  df-rab 2492  df-v 2773  df-sbc 2998  df-csb 3093  df-un 3169  df-in 3171  df-ss 3178  df-pw 3617  df-sn 3638  df-pr 3639  df-op 3641  df-uni 3850  df-int 3885  df-br 4044  df-opab 4105  df-mpt 4106  df-id 4339  df-xp 4680  df-rel 4681  df-cnv 4682  df-co 4683  df-dm 4684  df-rn 4685  df-res 4686  df-iota 5231  df-fun 5272  df-fn 5273  df-fv 5278  df-riota 5898  df-ov 5946  df-inn 9036  df-2 9094  df-ndx 12806  df-slot 12807  df-base 12809  df-plusg 12893  df-0g 13061  df-mgm 13159  df-sgrp 13205  df-mnd 13220  df-grp 13306
This theorem is referenced by:  grpinvssd  13380
  Copyright terms: Public domain W3C validator