Theorem lmodprop2d 14154

Description: If two structures have the same components (properties), one is a left module iff the other one is. This version of lmodpropd 14155 also breaks up the components of the scalar ring. (Contributed by Mario Carneiro, 27-Jun-2015.)

Hypotheses

Ref	Expression
lmodprop2d.b1	⊢ (𝜑 → 𝐵 = (Base‘𝐾))
lmodprop2d.b2	⊢ (𝜑 → 𝐵 = (Base‘𝐿))
lmodprop2d.f	⊢ 𝐹 = (Scalar‘𝐾)
lmodprop2d.g	⊢ 𝐺 = (Scalar‘𝐿)
lmodprop2d.p1	⊢ (𝜑 → 𝑃 = (Base‘𝐹))
lmodprop2d.p2	⊢ (𝜑 → 𝑃 = (Base‘𝐺))
lmodprop2d.1	⊢ ((𝜑 ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐵)) → (𝑥(+g‘𝐾)𝑦) = (𝑥(+g‘𝐿)𝑦))
lmodprop2d.2	⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝑃)) → (𝑥(+g‘𝐹)𝑦) = (𝑥(+g‘𝐺)𝑦))
lmodprop2d.3	⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝑃)) → (𝑥(.r‘𝐹)𝑦) = (𝑥(.r‘𝐺)𝑦))
lmodprop2d.4	⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → (𝑥( ·𝑠 ‘𝐾)𝑦) = (𝑥( ·𝑠 ‘𝐿)𝑦))

Assertion

Ref	Expression
lmodprop2d	⊢ (𝜑 → (𝐾 ∈ LMod ↔ 𝐿 ∈ LMod))

Distinct variable groups:   𝑥,𝑦,𝐵   𝑥,𝐹,𝑦   𝜑,𝑥,𝑦   𝑥,𝐺,𝑦   𝑥,𝐾,𝑦   𝑥,𝐿,𝑦   𝑥,𝑃,𝑦

Proof of Theorem lmodprop2d

Dummy variables 𝑟 𝑞 𝑤 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		lmodgrp 14100	. . . 4 ⊢ (𝐾 ∈ LMod → 𝐾 ∈ Grp)
2	1	a1i 9	. . 3 ⊢ (𝜑 → (𝐾 ∈ LMod → 𝐾 ∈ Grp))
3		eqid 2206	. . . . . 6 ⊢ (Base‘𝐾) = (Base‘𝐾)
4		eqid 2206	. . . . . 6 ⊢ (+g‘𝐾) = (+g‘𝐾)
5		eqid 2206	. . . . . 6 ⊢ ( ·𝑠 ‘𝐾) = ( ·𝑠 ‘𝐾)
6		lmodprop2d.f	. . . . . 6 ⊢ 𝐹 = (Scalar‘𝐾)
7		eqid 2206	. . . . . 6 ⊢ (Base‘𝐹) = (Base‘𝐹)
8		eqid 2206	. . . . . 6 ⊢ (+g‘𝐹) = (+g‘𝐹)
9		eqid 2206	. . . . . 6 ⊢ (.r‘𝐹) = (.r‘𝐹)
10		eqid 2206	. . . . . 6 ⊢ (1r‘𝐹) = (1r‘𝐹)
11	3, 4, 5, 6, 7, 8, 9, 10	islmod 14097	. . . . 5 ⊢ (𝐾 ∈ LMod ↔ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑞 ∈ (Base‘𝐹)∀𝑟 ∈ (Base‘𝐹)∀𝑧 ∈ (Base‘𝐾)∀𝑤 ∈ (Base‘𝐾)(((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ (Base‘𝐾) ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤))))
12	11	simp2bi 1016	. . . 4 ⊢ (𝐾 ∈ LMod → 𝐹 ∈ Ring)
13	12	a1i 9	. . 3 ⊢ (𝜑 → (𝐾 ∈ LMod → 𝐹 ∈ Ring))
14		simplr 528	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝐾 ∈ LMod)
15		simprl 529	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑥 ∈ 𝑃)
16		lmodprop2d.p1	. . . . . . . . 9 ⊢ (𝜑 → 𝑃 = (Base‘𝐹))
17	16	ad2antrr 488	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑃 = (Base‘𝐹))
18	15, 17	eleqtrd 2285	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑥 ∈ (Base‘𝐹))
19		simprr 531	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑦 ∈ 𝐵)
20		lmodprop2d.b1	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 = (Base‘𝐾))
21	20	ad2antrr 488	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝐵 = (Base‘𝐾))
22	19, 21	eleqtrd 2285	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑦 ∈ (Base‘𝐾))
23	3, 6, 5, 7	lmodvscl 14111	. . . . . . 7 ⊢ ((𝐾 ∈ LMod ∧ 𝑥 ∈ (Base‘𝐹) ∧ 𝑦 ∈ (Base‘𝐾)) → (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ (Base‘𝐾))
24	14, 18, 22, 23	syl3anc 1250	. . . . . 6 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ (Base‘𝐾))
25	24, 21	eleqtrrd 2286	. . . . 5 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)
26	25	ralrimivva 2589	. . . 4 ⊢ ((𝜑 ∧ 𝐾 ∈ LMod) → ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)
27	26	ex 115	. . 3 ⊢ (𝜑 → (𝐾 ∈ LMod → ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵))
28	2, 13, 27	3jcad 1181	. 2 ⊢ (𝜑 → (𝐾 ∈ LMod → (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)))
29		lmodgrp 14100	. . . 4 ⊢ (𝐿 ∈ LMod → 𝐿 ∈ Grp)
30		lmodprop2d.b2	. . . . 5 ⊢ (𝜑 → 𝐵 = (Base‘𝐿))
31		lmodprop2d.1	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐵)) → (𝑥(+g‘𝐾)𝑦) = (𝑥(+g‘𝐿)𝑦))
32	20, 30, 31	grppropd 13393	. . . 4 ⊢ (𝜑 → (𝐾 ∈ Grp ↔ 𝐿 ∈ Grp))
33	29, 32	imbitrrid 156	. . 3 ⊢ (𝜑 → (𝐿 ∈ LMod → 𝐾 ∈ Grp))
34		eqid 2206	. . . . . 6 ⊢ (Base‘𝐿) = (Base‘𝐿)
35		eqid 2206	. . . . . 6 ⊢ (+g‘𝐿) = (+g‘𝐿)
36		eqid 2206	. . . . . 6 ⊢ ( ·𝑠 ‘𝐿) = ( ·𝑠 ‘𝐿)
37		lmodprop2d.g	. . . . . 6 ⊢ 𝐺 = (Scalar‘𝐿)
38		eqid 2206	. . . . . 6 ⊢ (Base‘𝐺) = (Base‘𝐺)
39		eqid 2206	. . . . . 6 ⊢ (+g‘𝐺) = (+g‘𝐺)
40		eqid 2206	. . . . . 6 ⊢ (.r‘𝐺) = (.r‘𝐺)
41		eqid 2206	. . . . . 6 ⊢ (1r‘𝐺) = (1r‘𝐺)
42	34, 35, 36, 37, 38, 39, 40, 41	islmod 14097	. . . . 5 ⊢ (𝐿 ∈ LMod ↔ (𝐿 ∈ Grp ∧ 𝐺 ∈ Ring ∧ ∀𝑞 ∈ (Base‘𝐺)∀𝑟 ∈ (Base‘𝐺)∀𝑧 ∈ (Base‘𝐿)∀𝑤 ∈ (Base‘𝐿)(((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ (Base‘𝐿) ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
43	42	simp2bi 1016	. . . 4 ⊢ (𝐿 ∈ LMod → 𝐺 ∈ Ring)
44		lmodprop2d.p2	. . . . 5 ⊢ (𝜑 → 𝑃 = (Base‘𝐺))
45		lmodprop2d.2	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝑃)) → (𝑥(+g‘𝐹)𝑦) = (𝑥(+g‘𝐺)𝑦))
46		lmodprop2d.3	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝑃)) → (𝑥(.r‘𝐹)𝑦) = (𝑥(.r‘𝐺)𝑦))
47	16, 44, 45, 46	ringpropd 13844	. . . 4 ⊢ (𝜑 → (𝐹 ∈ Ring ↔ 𝐺 ∈ Ring))
48	43, 47	imbitrrid 156	. . 3 ⊢ (𝜑 → (𝐿 ∈ LMod → 𝐹 ∈ Ring))
49		simplr 528	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝐿 ∈ LMod)
50		simprl 529	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑥 ∈ 𝑃)
51	44	ad2antrr 488	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑃 = (Base‘𝐺))
52	50, 51	eleqtrd 2285	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑥 ∈ (Base‘𝐺))
53		simprr 531	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑦 ∈ 𝐵)
54	30	ad2antrr 488	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝐵 = (Base‘𝐿))
55	53, 54	eleqtrd 2285	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑦 ∈ (Base‘𝐿))
56	34, 37, 36, 38	lmodvscl 14111	. . . . . . 7 ⊢ ((𝐿 ∈ LMod ∧ 𝑥 ∈ (Base‘𝐺) ∧ 𝑦 ∈ (Base‘𝐿)) → (𝑥( ·𝑠 ‘𝐿)𝑦) ∈ (Base‘𝐿))
57	49, 52, 55, 56	syl3anc 1250	. . . . . 6 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → (𝑥( ·𝑠 ‘𝐿)𝑦) ∈ (Base‘𝐿))
58		lmodprop2d.4	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → (𝑥( ·𝑠 ‘𝐾)𝑦) = (𝑥( ·𝑠 ‘𝐿)𝑦))
59	58	adantlr 477	. . . . . 6 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → (𝑥( ·𝑠 ‘𝐾)𝑦) = (𝑥( ·𝑠 ‘𝐿)𝑦))
60	57, 59, 54	3eltr4d 2290	. . . . 5 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)
61	60	ralrimivva 2589	. . . 4 ⊢ ((𝜑 ∧ 𝐿 ∈ LMod) → ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)
62	61	ex 115	. . 3 ⊢ (𝜑 → (𝐿 ∈ LMod → ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵))
63	33, 48, 62	3jcad 1181	. 2 ⊢ (𝜑 → (𝐿 ∈ LMod → (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)))
64	32	adantr 276	. . . . 5 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (𝐾 ∈ Grp ↔ 𝐿 ∈ Grp))
65	47	adantr 276	. . . . 5 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (𝐹 ∈ Ring ↔ 𝐺 ∈ Ring))
66		simpll 527	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝜑)
67		simprlr 538	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑟 ∈ 𝑃)
68		simprrr 540	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑤 ∈ 𝐵)
69	58	oveqrspc2v 5978	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑟 ∈ 𝑃 ∧ 𝑤 ∈ 𝐵)) → (𝑟( ·𝑠 ‘𝐾)𝑤) = (𝑟( ·𝑠 ‘𝐿)𝑤))
70	66, 67, 68, 69	syl12anc 1248	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑟( ·𝑠 ‘𝐾)𝑤) = (𝑟( ·𝑠 ‘𝐿)𝑤))
71	70	eleq1d 2275	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ↔ (𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵))
72		simplr1 1042	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝐾 ∈ Grp)
73	20	ad2antrr 488	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝐵 = (Base‘𝐾))
74	68, 73	eleqtrd 2285	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑤 ∈ (Base‘𝐾))
75		simprrl 539	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑧 ∈ 𝐵)
76	75, 73	eleqtrd 2285	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑧 ∈ (Base‘𝐾))
77	3, 4, 72, 74, 76	grpcld 13390	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑤(+g‘𝐾)𝑧) ∈ (Base‘𝐾))
78	77, 73	eleqtrrd 2286	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑤(+g‘𝐾)𝑧) ∈ 𝐵)
79	58	oveqrspc2v 5978	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑟 ∈ 𝑃 ∧ (𝑤(+g‘𝐾)𝑧) ∈ 𝐵)) → (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐾)𝑧)))
80	66, 67, 78, 79	syl12anc 1248	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐾)𝑧)))
81	31	oveqrspc2v 5978	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑤 ∈ 𝐵 ∧ 𝑧 ∈ 𝐵)) → (𝑤(+g‘𝐾)𝑧) = (𝑤(+g‘𝐿)𝑧))
82	66, 68, 75, 81	syl12anc 1248	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑤(+g‘𝐾)𝑧) = (𝑤(+g‘𝐿)𝑧))
83	82	oveq2d 5967	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐾)𝑧)) = (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)))
84	80, 83	eqtrd 2239	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)))
85		simplr3 1044	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)
86		ovrspc2v 5977	. . . . . . . . . . . . . . 15 ⊢ (((𝑟 ∈ 𝑃 ∧ 𝑤 ∈ 𝐵) ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵) → (𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵)
87	67, 68, 85, 86	syl21anc 1249	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵)
88		ovrspc2v 5977	. . . . . . . . . . . . . . 15 ⊢ (((𝑟 ∈ 𝑃 ∧ 𝑧 ∈ 𝐵) ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵) → (𝑟( ·𝑠 ‘𝐾)𝑧) ∈ 𝐵)
89	67, 75, 85, 88	syl21anc 1249	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑟( ·𝑠 ‘𝐾)𝑧) ∈ 𝐵)
90	31	oveqrspc2v 5978	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)𝑧) ∈ 𝐵)) → ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑧)))
91	66, 87, 89, 90	syl12anc 1248	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑧)))
92	58	oveqrspc2v 5978	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑟 ∈ 𝑃 ∧ 𝑧 ∈ 𝐵)) → (𝑟( ·𝑠 ‘𝐾)𝑧) = (𝑟( ·𝑠 ‘𝐿)𝑧))
93	66, 67, 75, 92	syl12anc 1248	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑟( ·𝑠 ‘𝐾)𝑧) = (𝑟( ·𝑠 ‘𝐿)𝑧))
94	70, 93	oveq12d 5969	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)))
95	91, 94	eqtrd 2239	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)))
96	84, 95	eqeq12d 2221	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ↔ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧))))
97		simplr2 1043	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝐹 ∈ Ring)
98		simprll 537	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑞 ∈ 𝑃)
99	16	ad2antrr 488	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑃 = (Base‘𝐹))
100	98, 99	eleqtrd 2285	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑞 ∈ (Base‘𝐹))
101	67, 99	eleqtrd 2285	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑟 ∈ (Base‘𝐹))
102	7, 8	ringacl 13836	. . . . . . . . . . . . . . . 16 ⊢ ((𝐹 ∈ Ring ∧ 𝑞 ∈ (Base‘𝐹) ∧ 𝑟 ∈ (Base‘𝐹)) → (𝑞(+g‘𝐹)𝑟) ∈ (Base‘𝐹))
103	97, 100, 101, 102	syl3anc 1250	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞(+g‘𝐹)𝑟) ∈ (Base‘𝐹))
104	103, 99	eleqtrrd 2286	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞(+g‘𝐹)𝑟) ∈ 𝑃)
105	58	oveqrspc2v 5978	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑞(+g‘𝐹)𝑟) ∈ 𝑃 ∧ 𝑤 ∈ 𝐵)) → ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐿)𝑤))
106	66, 104, 68, 105	syl12anc 1248	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐿)𝑤))
107	45	oveqrspc2v 5978	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃)) → (𝑞(+g‘𝐹)𝑟) = (𝑞(+g‘𝐺)𝑟))
108	107	ad2ant2r 509	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞(+g‘𝐹)𝑟) = (𝑞(+g‘𝐺)𝑟))
109	108	oveq1d 5966	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤))
110	106, 109	eqtrd 2239	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤))
111		ovrspc2v 5977	. . . . . . . . . . . . . . 15 ⊢ (((𝑞 ∈ 𝑃 ∧ 𝑤 ∈ 𝐵) ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵) → (𝑞( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵)
112	98, 68, 85, 111	syl21anc 1249	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵)
113	31	oveqrspc2v 5978	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑞( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵)) → ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑤)))
114	66, 112, 87, 113	syl12anc 1248	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑤)))
115	58	oveqrspc2v 5978	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑞 ∈ 𝑃 ∧ 𝑤 ∈ 𝐵)) → (𝑞( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐿)𝑤))
116	66, 98, 68, 115	syl12anc 1248	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐿)𝑤))
117	116, 70	oveq12d 5969	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑤)) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)))
118	114, 117	eqtrd 2239	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)))
119	110, 118	eqeq12d 2221	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ↔ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))))
120	71, 96, 119	3anbi123d 1325	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ↔ ((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)))))
121	7, 9	ringcl 13819	. . . . . . . . . . . . . . . 16 ⊢ ((𝐹 ∈ Ring ∧ 𝑞 ∈ (Base‘𝐹) ∧ 𝑟 ∈ (Base‘𝐹)) → (𝑞(.r‘𝐹)𝑟) ∈ (Base‘𝐹))
122	97, 100, 101, 121	syl3anc 1250	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞(.r‘𝐹)𝑟) ∈ (Base‘𝐹))
123	122, 99	eleqtrrd 2286	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞(.r‘𝐹)𝑟) ∈ 𝑃)
124	58	oveqrspc2v 5978	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑞(.r‘𝐹)𝑟) ∈ 𝑃 ∧ 𝑤 ∈ 𝐵)) → ((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐿)𝑤))
125	66, 123, 68, 124	syl12anc 1248	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐿)𝑤))
126	46	oveqrspc2v 5978	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃)) → (𝑞(.r‘𝐹)𝑟) = (𝑞(.r‘𝐺)𝑟))
127	126	ad2ant2r 509	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞(.r‘𝐹)𝑟) = (𝑞(.r‘𝐺)𝑟))
128	127	oveq1d 5966	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤))
129	125, 128	eqtrd 2239	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤))
130	58	oveqrspc2v 5978	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑞 ∈ 𝑃 ∧ (𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵)) → (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑤)))
131	66, 98, 87, 130	syl12anc 1248	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑤)))
132	70	oveq2d 5967	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑤)) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)))
133	131, 132	eqtrd 2239	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)))
134	129, 133	eqeq12d 2221	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ↔ ((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))))
135	7, 10	ringidcl 13826	. . . . . . . . . . . . . . . 16 ⊢ (𝐹 ∈ Ring → (1r‘𝐹) ∈ (Base‘𝐹))
136	97, 135	syl 14	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (1r‘𝐹) ∈ (Base‘𝐹))
137	136, 99	eleqtrrd 2286	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (1r‘𝐹) ∈ 𝑃)
138	58	oveqrspc2v 5978	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((1r‘𝐹) ∈ 𝑃 ∧ 𝑤 ∈ 𝐵)) → ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = ((1r‘𝐹)( ·𝑠 ‘𝐿)𝑤))
139	66, 137, 68, 138	syl12anc 1248	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = ((1r‘𝐹)( ·𝑠 ‘𝐿)𝑤))
140	16	3ad2ant1 1021	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝐾 ∈ Grp ∧ 𝐹 ∈ Ring) → 𝑃 = (Base‘𝐹))
141	44	3ad2ant1 1021	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝐾 ∈ Grp ∧ 𝐹 ∈ Ring) → 𝑃 = (Base‘𝐺))
142	46	3ad2antl1 1162	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝐾 ∈ Grp ∧ 𝐹 ∈ Ring) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝑃)) → (𝑥(.r‘𝐹)𝑦) = (𝑥(.r‘𝐺)𝑦))
143		simp3 1002	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝐾 ∈ Grp ∧ 𝐹 ∈ Ring) → 𝐹 ∈ Ring)
144	47	biimpa 296	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝐹 ∈ Ring) → 𝐺 ∈ Ring)
145	144	3adant2 1019	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝐾 ∈ Grp ∧ 𝐹 ∈ Ring) → 𝐺 ∈ Ring)
146	140, 141, 142, 143, 145	rngidpropdg 13952	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝐾 ∈ Grp ∧ 𝐹 ∈ Ring) → (1r‘𝐹) = (1r‘𝐺))
147	66, 72, 97, 146	syl3anc 1250	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (1r‘𝐹) = (1r‘𝐺))
148	147	oveq1d 5966	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((1r‘𝐹)( ·𝑠 ‘𝐿)𝑤) = ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤))
149	139, 148	eqtrd 2239	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤))
150	149	eqeq1d 2215	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤 ↔ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))
151	134, 150	anbi12d 473	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤) ↔ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤)))
152	120, 151	anbi12d 473	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤)) ↔ (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
153	152	anassrs 400	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ (𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃)) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵)) → ((((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤)) ↔ (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
154	153	2ralbidva 2529	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ (𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃)) → (∀𝑧 ∈ 𝐵 ∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤)) ↔ ∀𝑧 ∈ 𝐵 ∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
155	154	2ralbidva 2529	. . . . . 6 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (∀𝑞 ∈ 𝑃 ∀𝑟 ∈ 𝑃 ∀𝑧 ∈ 𝐵 ∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤)) ↔ ∀𝑞 ∈ 𝑃 ∀𝑟 ∈ 𝑃 ∀𝑧 ∈ 𝐵 ∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
156	16	adantr 276	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → 𝑃 = (Base‘𝐹))
157	20	adantr 276	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → 𝐵 = (Base‘𝐾))
158	157	eleq2d 2276	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → ((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ↔ (𝑟( ·𝑠 ‘𝐾)𝑤) ∈ (Base‘𝐾)))
159	158	3anbi1d 1329	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ↔ ((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ (Base‘𝐾) ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)))))
160	159	anbi1d 465	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → ((((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤)) ↔ (((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ (Base‘𝐾) ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤))))
161	157, 160	raleqbidv 2719	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤)) ↔ ∀𝑤 ∈ (Base‘𝐾)(((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ (Base‘𝐾) ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤))))
162	157, 161	raleqbidv 2719	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (∀𝑧 ∈ 𝐵 ∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤)) ↔ ∀𝑧 ∈ (Base‘𝐾)∀𝑤 ∈ (Base‘𝐾)(((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ (Base‘𝐾) ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤))))
163	156, 162	raleqbidv 2719	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (∀𝑟 ∈ 𝑃 ∀𝑧 ∈ 𝐵 ∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤)) ↔ ∀𝑟 ∈ (Base‘𝐹)∀𝑧 ∈ (Base‘𝐾)∀𝑤 ∈ (Base‘𝐾)(((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ (Base‘𝐾) ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤))))
164	156, 163	raleqbidv 2719	. . . . . 6 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (∀𝑞 ∈ 𝑃 ∀𝑟 ∈ 𝑃 ∀𝑧 ∈ 𝐵 ∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤)) ↔ ∀𝑞 ∈ (Base‘𝐹)∀𝑟 ∈ (Base‘𝐹)∀𝑧 ∈ (Base‘𝐾)∀𝑤 ∈ (Base‘𝐾)(((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ (Base‘𝐾) ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤))))
165	44	adantr 276	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → 𝑃 = (Base‘𝐺))
166	30	adantr 276	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → 𝐵 = (Base‘𝐿))
167	166	eleq2d 2276	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → ((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ↔ (𝑟( ·𝑠 ‘𝐿)𝑤) ∈ (Base‘𝐿)))
168	167	3anbi1d 1329	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ↔ ((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ (Base‘𝐿) ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)))))
169	168	anbi1d 465	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → ((((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤)) ↔ (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ (Base‘𝐿) ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
170	166, 169	raleqbidv 2719	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤)) ↔ ∀𝑤 ∈ (Base‘𝐿)(((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ (Base‘𝐿) ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
171	166, 170	raleqbidv 2719	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (∀𝑧 ∈ 𝐵 ∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤)) ↔ ∀𝑧 ∈ (Base‘𝐿)∀𝑤 ∈ (Base‘𝐿)(((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ (Base‘𝐿) ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
172	165, 171	raleqbidv 2719	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (∀𝑟 ∈ 𝑃 ∀𝑧 ∈ 𝐵 ∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤)) ↔ ∀𝑟 ∈ (Base‘𝐺)∀𝑧 ∈ (Base‘𝐿)∀𝑤 ∈ (Base‘𝐿)(((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ (Base‘𝐿) ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
173	165, 172	raleqbidv 2719	. . . . . 6 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (∀𝑞 ∈ 𝑃 ∀𝑟 ∈ 𝑃 ∀𝑧 ∈ 𝐵 ∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤)) ↔ ∀𝑞 ∈ (Base‘𝐺)∀𝑟 ∈ (Base‘𝐺)∀𝑧 ∈ (Base‘𝐿)∀𝑤 ∈ (Base‘𝐿)(((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ (Base‘𝐿) ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
174	155, 164, 173	3bitr3d 218	. . . . 5 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (∀𝑞 ∈ (Base‘𝐹)∀𝑟 ∈ (Base‘𝐹)∀𝑧 ∈ (Base‘𝐾)∀𝑤 ∈ (Base‘𝐾)(((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ (Base‘𝐾) ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤)) ↔ ∀𝑞 ∈ (Base‘𝐺)∀𝑟 ∈ (Base‘𝐺)∀𝑧 ∈ (Base‘𝐿)∀𝑤 ∈ (Base‘𝐿)(((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ (Base‘𝐿) ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
175	64, 65, 174	3anbi123d 1325	. . . 4 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → ((𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑞 ∈ (Base‘𝐹)∀𝑟 ∈ (Base‘𝐹)∀𝑧 ∈ (Base‘𝐾)∀𝑤 ∈ (Base‘𝐾)(((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ (Base‘𝐾) ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤))) ↔ (𝐿 ∈ Grp ∧ 𝐺 ∈ Ring ∧ ∀𝑞 ∈ (Base‘𝐺)∀𝑟 ∈ (Base‘𝐺)∀𝑧 ∈ (Base‘𝐿)∀𝑤 ∈ (Base‘𝐿)(((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ (Base‘𝐿) ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤)))))
176	175, 11, 42	3bitr4g 223	. . 3 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (𝐾 ∈ LMod ↔ 𝐿 ∈ LMod))
177	176	ex 115	. 2 ⊢ (𝜑 → ((𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵) → (𝐾 ∈ LMod ↔ 𝐿 ∈ LMod)))
178	28, 63, 177	pm5.21ndd 707	1 ⊢ (𝜑 → (𝐾 ∈ LMod ↔ 𝐿 ∈ LMod))

Syntax hints:   → wi 4   ∧ wa 104   ↔ wb 105   ∧ w3a 981   = wceq 1373   ∈ wcel 2177  ∀wral 2485  ‘cfv 5276  (class class class)co 5951  Basecbs 12876  +_gcplusg 12953  ._rcmulr 12954  Scalarcsca 12956   ·_𝑠 cvsca 12957  Grpcgrp 13376  1_rcur 13765  Ringcrg 13802  LModclmod 14093

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-in1 615  ax-in2 616  ax-io 711  ax-5 1471  ax-7 1472  ax-gen 1473  ax-ie1 1517  ax-ie2 1518  ax-8 1528  ax-10 1529  ax-11 1530  ax-i12 1531  ax-bndl 1533  ax-4 1534  ax-17 1550  ax-i9 1554  ax-ial 1558  ax-i5r 1559  ax-13 2179  ax-14 2180  ax-ext 2188  ax-sep 4166  ax-pow 4222  ax-pr 4257  ax-un 4484  ax-setind 4589  ax-cnex 8023  ax-resscn 8024  ax-1cn 8025  ax-1re 8026  ax-icn 8027  ax-addcl 8028  ax-addrcl 8029  ax-mulcl 8030  ax-addcom 8032  ax-addass 8034  ax-i2m1 8037  ax-0lt1 8038  ax-0id 8040  ax-rnegex 8041  ax-pre-ltirr 8044  ax-pre-ltadd 8048

This theorem depends on definitions:  df-bi 117  df-3an 983  df-tru 1376  df-fal 1379  df-nf 1485  df-sb 1787  df-eu 2058  df-mo 2059  df-clab 2193  df-cleq 2199  df-clel 2202  df-nfc 2338  df-ne 2378  df-nel 2473  df-ral 2490  df-rex 2491  df-reu 2492  df-rmo 2493  df-rab 2494  df-v 2775  df-sbc 3000  df-csb 3095  df-dif 3169  df-un 3171  df-in 3173  df-ss 3180  df-nul 3462  df-pw 3619  df-sn 3640  df-pr 3641  df-op 3643  df-uni 3853  df-int 3888  df-br 4048  df-opab 4110  df-mpt 4111  df-id 4344  df-xp 4685  df-rel 4686  df-cnv 4687  df-co 4688  df-dm 4689  df-rn 4690  df-res 4691  df-ima 4692  df-iota 5237  df-fun 5278  df-fn 5279  df-fv 5284  df-riota 5906  df-ov 5954  df-oprab 5955  df-mpo 5956  df-pnf 8116  df-mnf 8117  df-ltxr 8119  df-inn 9044  df-2 9102  df-3 9103  df-4 9104  df-5 9105  df-6 9106  df-ndx 12879  df-slot 12880  df-base 12882  df-sets 12883  df-plusg 12966  df-mulr 12967  df-sca 12969  df-vsca 12970  df-0g 13134  df-mgm 13232  df-sgrp 13278  df-mnd 13293  df-grp 13379  df-mgp 13727  df-ur 13766  df-ring 13804  df-lmod 14095

This theorem is referenced by:  lmodpropd  14155