Theorem grpidssd 18935

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	⊢ (𝜑 → 𝑀 ∈ Grp)
grpidssd.s	⊢ (𝜑 → 𝑆 ∈ Grp)
grpidssd.b	⊢ 𝐵 = (Base‘𝑆)
grpidssd.c	⊢ (𝜑 → 𝐵 ⊆ (Base‘𝑀))
grpidssd.o	⊢ (𝜑 → ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 (𝑥(+g‘𝑀)𝑦) = (𝑥(+g‘𝑆)𝑦))

Assertion

Ref	Expression
grpidssd	⊢ (𝜑 → (0g‘𝑀) = (0g‘𝑆))

Distinct variable groups:   𝑥,𝐵,𝑦   𝑥,𝑀,𝑦   𝑥,𝑆,𝑦

Allowed substitution hints:   𝜑(𝑥,𝑦)

Proof of Theorem grpidssd

Step	Hyp	Ref	Expression
1		grpidssd.s	. . . . . 6 ⊢ (𝜑 → 𝑆 ∈ Grp)
2		grpidssd.b	. . . . . . 7 ⊢ 𝐵 = (Base‘𝑆)
3		eqid 2730	. . . . . . 7 ⊢ (0g‘𝑆) = (0g‘𝑆)
4	2, 3	grpidcl 18886	. . . . . 6 ⊢ (𝑆 ∈ Grp → (0g‘𝑆) ∈ 𝐵)
5	1, 4	syl 17	. . . . 5 ⊢ (𝜑 → (0g‘𝑆) ∈ 𝐵)
6		grpidssd.o	. . . . 5 ⊢ (𝜑 → ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 (𝑥(+g‘𝑀)𝑦) = (𝑥(+g‘𝑆)𝑦))
7		oveq1 7418	. . . . . . 7 ⊢ (𝑥 = (0g‘𝑆) → (𝑥(+g‘𝑀)𝑦) = ((0g‘𝑆)(+g‘𝑀)𝑦))
8		oveq1 7418	. . . . . . 7 ⊢ (𝑥 = (0g‘𝑆) → (𝑥(+g‘𝑆)𝑦) = ((0g‘𝑆)(+g‘𝑆)𝑦))
9	7, 8	eqeq12d 2746	. . . . . 6 ⊢ (𝑥 = (0g‘𝑆) → ((𝑥(+g‘𝑀)𝑦) = (𝑥(+g‘𝑆)𝑦) ↔ ((0g‘𝑆)(+g‘𝑀)𝑦) = ((0g‘𝑆)(+g‘𝑆)𝑦)))
10		oveq2 7419	. . . . . . 7 ⊢ (𝑦 = (0g‘𝑆) → ((0g‘𝑆)(+g‘𝑀)𝑦) = ((0g‘𝑆)(+g‘𝑀)(0g‘𝑆)))
11		oveq2 7419	. . . . . . 7 ⊢ (𝑦 = (0g‘𝑆) → ((0g‘𝑆)(+g‘𝑆)𝑦) = ((0g‘𝑆)(+g‘𝑆)(0g‘𝑆)))
12	10, 11	eqeq12d 2746	. . . . . 6 ⊢ (𝑦 = (0g‘𝑆) → (((0g‘𝑆)(+g‘𝑀)𝑦) = ((0g‘𝑆)(+g‘𝑆)𝑦) ↔ ((0g‘𝑆)(+g‘𝑀)(0g‘𝑆)) = ((0g‘𝑆)(+g‘𝑆)(0g‘𝑆))))
13	9, 12	rspc2va 3622	. . . . 5 ⊢ ((((0g‘𝑆) ∈ 𝐵 ∧ (0g‘𝑆) ∈ 𝐵) ∧ ∀𝑥 ∈ 𝐵 ∀𝑦 ∈ 𝐵 (𝑥(+g‘𝑀)𝑦) = (𝑥(+g‘𝑆)𝑦)) → ((0g‘𝑆)(+g‘𝑀)(0g‘𝑆)) = ((0g‘𝑆)(+g‘𝑆)(0g‘𝑆)))
14	5, 5, 6, 13	syl21anc 834	. . . 4 ⊢ (𝜑 → ((0g‘𝑆)(+g‘𝑀)(0g‘𝑆)) = ((0g‘𝑆)(+g‘𝑆)(0g‘𝑆)))
15		eqid 2730	. . . . . 6 ⊢ (+g‘𝑆) = (+g‘𝑆)
16	2, 15, 3	grplid 18888	. . . . 5 ⊢ ((𝑆 ∈ Grp ∧ (0g‘𝑆) ∈ 𝐵) → ((0g‘𝑆)(+g‘𝑆)(0g‘𝑆)) = (0g‘𝑆))
17	1, 4, 16	syl2anc2 583	. . . 4 ⊢ (𝜑 → ((0g‘𝑆)(+g‘𝑆)(0g‘𝑆)) = (0g‘𝑆))
18	14, 17	eqtrd 2770	. . 3 ⊢ (𝜑 → ((0g‘𝑆)(+g‘𝑀)(0g‘𝑆)) = (0g‘𝑆))
19		grpidssd.m	. . . 4 ⊢ (𝜑 → 𝑀 ∈ Grp)
20		grpidssd.c	. . . . 5 ⊢ (𝜑 → 𝐵 ⊆ (Base‘𝑀))
21	20, 5	sseldd 3982	. . . 4 ⊢ (𝜑 → (0g‘𝑆) ∈ (Base‘𝑀))
22		eqid 2730	. . . . 5 ⊢ (Base‘𝑀) = (Base‘𝑀)
23		eqid 2730	. . . . 5 ⊢ (+g‘𝑀) = (+g‘𝑀)
24		eqid 2730	. . . . 5 ⊢ (0g‘𝑀) = (0g‘𝑀)
25	22, 23, 24	grpidlcan 18925	. . . 4 ⊢ ((𝑀 ∈ Grp ∧ (0g‘𝑆) ∈ (Base‘𝑀) ∧ (0g‘𝑆) ∈ (Base‘𝑀)) → (((0g‘𝑆)(+g‘𝑀)(0g‘𝑆)) = (0g‘𝑆) ↔ (0g‘𝑆) = (0g‘𝑀)))
26	19, 21, 21, 25	syl3anc 1369	. . 3 ⊢ (𝜑 → (((0g‘𝑆)(+g‘𝑀)(0g‘𝑆)) = (0g‘𝑆) ↔ (0g‘𝑆) = (0g‘𝑀)))
27	18, 26	mpbid 231	. 2 ⊢ (𝜑 → (0g‘𝑆) = (0g‘𝑀))
28	27	eqcomd 2736	1 ⊢ (𝜑 → (0g‘𝑀) = (0g‘𝑆))

Syntax hints:   → wi 4   ↔ wb 205   = wceq 1539   ∈ wcel 2104  ∀wral 3059   ⊆ wss 3947  ‘cfv 6542  (class class class)co 7411  Basecbs 17148  +_gcplusg 17201  0_gc0g 17389  Grpcgrp 18855

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1911  ax-6 1969  ax-7 2009  ax-8 2106  ax-9 2114  ax-10 2135  ax-11 2152  ax-12 2169  ax-ext 2701  ax-sep 5298  ax-nul 5305  ax-pr 5426

This theorem depends on definitions:  df-bi 206  df-an 395  df-or 844  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2532  df-eu 2561  df-clab 2708  df-cleq 2722  df-clel 2808  df-nfc 2883  df-ne 2939  df-ral 3060  df-rex 3069  df-rmo 3374  df-reu 3375  df-rab 3431  df-v 3474  df-sbc 3777  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-nul 4322  df-if 4528  df-sn 4628  df-pr 4630  df-op 4634  df-uni 4908  df-br 5148  df-opab 5210  df-mpt 5231  df-id 5573  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-iota 6494  df-fun 6544  df-fv 6550  df-riota 7367  df-ov 7414  df-0g 17391  df-mgm 18565  df-sgrp 18644  df-mnd 18660  df-grp 18858

This theorem is referenced by:  grpinvssd  18936