Theorem lmodprop2d 14668

Description: If two structures have the same components (properties), one is a left module iff the other one is. This version of lmodpropd 14669 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 14613	. . . 4 ⊢ (𝐾 ∈ LMod → 𝐾 ∈ Grp)
2	1	a1i 9	. . 3 ⊢ (𝜑 → (𝐾 ∈ LMod → 𝐾 ∈ Grp))
3		eqid 2238	. . . . . 6 ⊢ (Base‘𝐾) = (Base‘𝐾)
4		eqid 2238	. . . . . 6 ⊢ (+g‘𝐾) = (+g‘𝐾)
5		eqid 2238	. . . . . 6 ⊢ ( ·𝑠 ‘𝐾) = ( ·𝑠 ‘𝐾)
6		lmodprop2d.f	. . . . . 6 ⊢ 𝐹 = (Scalar‘𝐾)
7		eqid 2238	. . . . . 6 ⊢ (Base‘𝐹) = (Base‘𝐹)
8		eqid 2238	. . . . . 6 ⊢ (+g‘𝐹) = (+g‘𝐹)
9		eqid 2238	. . . . . 6 ⊢ (.r‘𝐹) = (.r‘𝐹)
10		eqid 2238	. . . . . 6 ⊢ (1r‘𝐹) = (1r‘𝐹)
11	3, 4, 5, 6, 7, 8, 9, 10	islmod 14610	. . . . 5 ⊢ (𝐾 ∈ LMod ↔ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑞 ∈ (Base‘𝐹)∀𝑟 ∈ (Base‘𝐹)∀𝑧 ∈ (Base‘𝐾)∀𝑤 ∈ (Base‘𝐾)(((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ (Base‘𝐾) ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤))))
12	11	simp2bi 1044	. . . 4 ⊢ (𝐾 ∈ LMod → 𝐹 ∈ Ring)
13	12	a1i 9	. . 3 ⊢ (𝜑 → (𝐾 ∈ LMod → 𝐹 ∈ Ring))
14		simplr 533	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝐾 ∈ LMod)
15		simprl 535	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑥 ∈ 𝑃)
16		lmodprop2d.p1	. . . . . . . . 9 ⊢ (𝜑 → 𝑃 = (Base‘𝐹))
17	16	ad2antrr 492	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑃 = (Base‘𝐹))
18	15, 17	eleqtrd 2317	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑥 ∈ (Base‘𝐹))
19		simprr 537	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑦 ∈ 𝐵)
20		lmodprop2d.b1	. . . . . . . . 9 ⊢ (𝜑 → 𝐵 = (Base‘𝐾))
21	20	ad2antrr 492	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝐵 = (Base‘𝐾))
22	19, 21	eleqtrd 2317	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑦 ∈ (Base‘𝐾))
23	3, 6, 5, 7	lmodvscl 14624	. . . . . . 7 ⊢ ((𝐾 ∈ LMod ∧ 𝑥 ∈ (Base‘𝐹) ∧ 𝑦 ∈ (Base‘𝐾)) → (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ (Base‘𝐾))
24	14, 18, 22, 23	syl3anc 1278	. . . . . 6 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ (Base‘𝐾))
25	24, 21	eleqtrrd 2318	. . . . 5 ⊢ (((𝜑 ∧ 𝐾 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)
26	25	ralrimivva 2632	. . . 4 ⊢ ((𝜑 ∧ 𝐾 ∈ LMod) → ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)
27	26	ex 115	. . 3 ⊢ (𝜑 → (𝐾 ∈ LMod → ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵))
28	2, 13, 27	3jcad 1209	. 2 ⊢ (𝜑 → (𝐾 ∈ LMod → (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)))
29		lmodgrp 14613	. . . 4 ⊢ (𝐿 ∈ LMod → 𝐿 ∈ Grp)
30		lmodprop2d.b2	. . . . 5 ⊢ (𝜑 → 𝐵 = (Base‘𝐿))
31		lmodprop2d.1	. . . . 5 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝐵 ∧ 𝑦 ∈ 𝐵)) → (𝑥(+g‘𝐾)𝑦) = (𝑥(+g‘𝐿)𝑦))
32	20, 30, 31	grppropd 13805	. . . 4 ⊢ (𝜑 → (𝐾 ∈ Grp ↔ 𝐿 ∈ Grp))
33	29, 32	imbitrrid 156	. . 3 ⊢ (𝜑 → (𝐿 ∈ LMod → 𝐾 ∈ Grp))
34		eqid 2238	. . . . . 6 ⊢ (Base‘𝐿) = (Base‘𝐿)
35		eqid 2238	. . . . . 6 ⊢ (+g‘𝐿) = (+g‘𝐿)
36		eqid 2238	. . . . . 6 ⊢ ( ·𝑠 ‘𝐿) = ( ·𝑠 ‘𝐿)
37		lmodprop2d.g	. . . . . 6 ⊢ 𝐺 = (Scalar‘𝐿)
38		eqid 2238	. . . . . 6 ⊢ (Base‘𝐺) = (Base‘𝐺)
39		eqid 2238	. . . . . 6 ⊢ (+g‘𝐺) = (+g‘𝐺)
40		eqid 2238	. . . . . 6 ⊢ (.r‘𝐺) = (.r‘𝐺)
41		eqid 2238	. . . . . 6 ⊢ (1r‘𝐺) = (1r‘𝐺)
42	34, 35, 36, 37, 38, 39, 40, 41	islmod 14610	. . . . 5 ⊢ (𝐿 ∈ LMod ↔ (𝐿 ∈ Grp ∧ 𝐺 ∈ Ring ∧ ∀𝑞 ∈ (Base‘𝐺)∀𝑟 ∈ (Base‘𝐺)∀𝑧 ∈ (Base‘𝐿)∀𝑤 ∈ (Base‘𝐿)(((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ (Base‘𝐿) ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
43	42	simp2bi 1044	. . . 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 14326	. . . 4 ⊢ (𝜑 → (𝐹 ∈ Ring ↔ 𝐺 ∈ Ring))
48	43, 47	imbitrrid 156	. . 3 ⊢ (𝜑 → (𝐿 ∈ LMod → 𝐹 ∈ Ring))
49		simplr 533	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝐿 ∈ LMod)
50		simprl 535	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑥 ∈ 𝑃)
51	44	ad2antrr 492	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑃 = (Base‘𝐺))
52	50, 51	eleqtrd 2317	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑥 ∈ (Base‘𝐺))
53		simprr 537	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑦 ∈ 𝐵)
54	30	ad2antrr 492	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝐵 = (Base‘𝐿))
55	53, 54	eleqtrd 2317	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → 𝑦 ∈ (Base‘𝐿))
56	34, 37, 36, 38	lmodvscl 14624	. . . . . . 7 ⊢ ((𝐿 ∈ LMod ∧ 𝑥 ∈ (Base‘𝐺) ∧ 𝑦 ∈ (Base‘𝐿)) → (𝑥( ·𝑠 ‘𝐿)𝑦) ∈ (Base‘𝐿))
57	49, 52, 55, 56	syl3anc 1278	. . . . . 6 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → (𝑥( ·𝑠 ‘𝐿)𝑦) ∈ (Base‘𝐿))
58		lmodprop2d.4	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → (𝑥( ·𝑠 ‘𝐾)𝑦) = (𝑥( ·𝑠 ‘𝐿)𝑦))
59	58	adantlr 481	. . . . . 6 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → (𝑥( ·𝑠 ‘𝐾)𝑦) = (𝑥( ·𝑠 ‘𝐿)𝑦))
60	57, 59, 54	3eltr4d 2322	. . . . 5 ⊢ (((𝜑 ∧ 𝐿 ∈ LMod) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝐵)) → (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)
61	60	ralrimivva 2632	. . . 4 ⊢ ((𝜑 ∧ 𝐿 ∈ LMod) → ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)
62	61	ex 115	. . 3 ⊢ (𝜑 → (𝐿 ∈ LMod → ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵))
63	33, 48, 62	3jcad 1209	. 2 ⊢ (𝜑 → (𝐿 ∈ LMod → (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)))
64	32	adantr 276	. . . . 5 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (𝐾 ∈ Grp ↔ 𝐿 ∈ Grp))
65	47	adantr 276	. . . . 5 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (𝐹 ∈ Ring ↔ 𝐺 ∈ Ring))
66		simpll 531	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝜑)
67		simprlr 544	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑟 ∈ 𝑃)
68		simprrr 546	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑤 ∈ 𝐵)
69	58	oveqrspc2v 6106	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑟 ∈ 𝑃 ∧ 𝑤 ∈ 𝐵)) → (𝑟( ·𝑠 ‘𝐾)𝑤) = (𝑟( ·𝑠 ‘𝐿)𝑤))
70	66, 67, 68, 69	syl12anc 1276	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑟( ·𝑠 ‘𝐾)𝑤) = (𝑟( ·𝑠 ‘𝐿)𝑤))
71	70	eleq1d 2307	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ↔ (𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵))
72		simplr1 1070	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝐾 ∈ Grp)
73	20	ad2antrr 492	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝐵 = (Base‘𝐾))
74	68, 73	eleqtrd 2317	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑤 ∈ (Base‘𝐾))
75		simprrl 545	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑧 ∈ 𝐵)
76	75, 73	eleqtrd 2317	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑧 ∈ (Base‘𝐾))
77	3, 4, 72, 74, 76	grpcld 13802	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑤(+g‘𝐾)𝑧) ∈ (Base‘𝐾))
78	77, 73	eleqtrrd 2318	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑤(+g‘𝐾)𝑧) ∈ 𝐵)
79	58	oveqrspc2v 6106	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑟 ∈ 𝑃 ∧ (𝑤(+g‘𝐾)𝑧) ∈ 𝐵)) → (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐾)𝑧)))
80	66, 67, 78, 79	syl12anc 1276	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐾)𝑧)))
81	31	oveqrspc2v 6106	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑤 ∈ 𝐵 ∧ 𝑧 ∈ 𝐵)) → (𝑤(+g‘𝐾)𝑧) = (𝑤(+g‘𝐿)𝑧))
82	66, 68, 75, 81	syl12anc 1276	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑤(+g‘𝐾)𝑧) = (𝑤(+g‘𝐿)𝑧))
83	82	oveq2d 6095	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐾)𝑧)) = (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)))
84	80, 83	eqtrd 2271	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)))
85		simplr3 1072	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)
86		ovrspc2v 6105	. . . . . . . . . . . . . . 15 ⊢ (((𝑟 ∈ 𝑃 ∧ 𝑤 ∈ 𝐵) ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵) → (𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵)
87	67, 68, 85, 86	syl21anc 1277	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵)
88		ovrspc2v 6105	. . . . . . . . . . . . . . 15 ⊢ (((𝑟 ∈ 𝑃 ∧ 𝑧 ∈ 𝐵) ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵) → (𝑟( ·𝑠 ‘𝐾)𝑧) ∈ 𝐵)
89	67, 75, 85, 88	syl21anc 1277	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑟( ·𝑠 ‘𝐾)𝑧) ∈ 𝐵)
90	31	oveqrspc2v 6106	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)𝑧) ∈ 𝐵)) → ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑧)))
91	66, 87, 89, 90	syl12anc 1276	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑧)))
92	58	oveqrspc2v 6106	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑟 ∈ 𝑃 ∧ 𝑧 ∈ 𝐵)) → (𝑟( ·𝑠 ‘𝐾)𝑧) = (𝑟( ·𝑠 ‘𝐿)𝑧))
93	66, 67, 75, 92	syl12anc 1276	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑟( ·𝑠 ‘𝐾)𝑧) = (𝑟( ·𝑠 ‘𝐿)𝑧))
94	70, 93	oveq12d 6097	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)))
95	91, 94	eqtrd 2271	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)))
96	84, 95	eqeq12d 2253	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ↔ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧))))
97		simplr2 1071	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝐹 ∈ Ring)
98		simprll 543	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑞 ∈ 𝑃)
99	16	ad2antrr 492	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑃 = (Base‘𝐹))
100	98, 99	eleqtrd 2317	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑞 ∈ (Base‘𝐹))
101	67, 99	eleqtrd 2317	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → 𝑟 ∈ (Base‘𝐹))
102	7, 8	ringacl 14318	. . . . . . . . . . . . . . . 16 ⊢ ((𝐹 ∈ Ring ∧ 𝑞 ∈ (Base‘𝐹) ∧ 𝑟 ∈ (Base‘𝐹)) → (𝑞(+g‘𝐹)𝑟) ∈ (Base‘𝐹))
103	97, 100, 101, 102	syl3anc 1278	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞(+g‘𝐹)𝑟) ∈ (Base‘𝐹))
104	103, 99	eleqtrrd 2318	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞(+g‘𝐹)𝑟) ∈ 𝑃)
105	58	oveqrspc2v 6106	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑞(+g‘𝐹)𝑟) ∈ 𝑃 ∧ 𝑤 ∈ 𝐵)) → ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐿)𝑤))
106	66, 104, 68, 105	syl12anc 1276	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐿)𝑤))
107	45	oveqrspc2v 6106	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃)) → (𝑞(+g‘𝐹)𝑟) = (𝑞(+g‘𝐺)𝑟))
108	107	ad2ant2r 513	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞(+g‘𝐹)𝑟) = (𝑞(+g‘𝐺)𝑟))
109	108	oveq1d 6094	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤))
110	106, 109	eqtrd 2271	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤))
111		ovrspc2v 6105	. . . . . . . . . . . . . . 15 ⊢ (((𝑞 ∈ 𝑃 ∧ 𝑤 ∈ 𝐵) ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵) → (𝑞( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵)
112	98, 68, 85, 111	syl21anc 1277	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵)
113	31	oveqrspc2v 6106	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑞( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵)) → ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑤)))
114	66, 112, 87, 113	syl12anc 1276	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑤)))
115	58	oveqrspc2v 6106	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑞 ∈ 𝑃 ∧ 𝑤 ∈ 𝐵)) → (𝑞( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐿)𝑤))
116	66, 98, 68, 115	syl12anc 1276	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐿)𝑤))
117	116, 70	oveq12d 6097	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑤)) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)))
118	114, 117	eqtrd 2271	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)))
119	110, 118	eqeq12d 2253	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ↔ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))))
120	71, 96, 119	3anbi123d 1353	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ↔ ((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)))))
121	7, 9	ringcl 14300	. . . . . . . . . . . . . . . 16 ⊢ ((𝐹 ∈ Ring ∧ 𝑞 ∈ (Base‘𝐹) ∧ 𝑟 ∈ (Base‘𝐹)) → (𝑞(.r‘𝐹)𝑟) ∈ (Base‘𝐹))
122	97, 100, 101, 121	syl3anc 1278	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞(.r‘𝐹)𝑟) ∈ (Base‘𝐹))
123	122, 99	eleqtrrd 2318	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞(.r‘𝐹)𝑟) ∈ 𝑃)
124	58	oveqrspc2v 6106	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((𝑞(.r‘𝐹)𝑟) ∈ 𝑃 ∧ 𝑤 ∈ 𝐵)) → ((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐿)𝑤))
125	66, 123, 68, 124	syl12anc 1276	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐿)𝑤))
126	46	oveqrspc2v 6106	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ (𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃)) → (𝑞(.r‘𝐹)𝑟) = (𝑞(.r‘𝐺)𝑟))
127	126	ad2ant2r 513	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞(.r‘𝐹)𝑟) = (𝑞(.r‘𝐺)𝑟))
128	127	oveq1d 6094	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤))
129	125, 128	eqtrd 2271	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤))
130	58	oveqrspc2v 6106	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ (𝑞 ∈ 𝑃 ∧ (𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵)) → (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑤)))
131	66, 98, 87, 130	syl12anc 1276	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑤)))
132	70	oveq2d 6095	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐾)𝑤)) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)))
133	131, 132	eqtrd 2271	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)))
134	129, 133	eqeq12d 2253	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ↔ ((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))))
135	7, 10	ringidcl 14308	. . . . . . . . . . . . . . . 16 ⊢ (𝐹 ∈ Ring → (1r‘𝐹) ∈ (Base‘𝐹))
136	97, 135	syl 14	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (1r‘𝐹) ∈ (Base‘𝐹))
137	136, 99	eleqtrrd 2318	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (1r‘𝐹) ∈ 𝑃)
138	58	oveqrspc2v 6106	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ ((1r‘𝐹) ∈ 𝑃 ∧ 𝑤 ∈ 𝐵)) → ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = ((1r‘𝐹)( ·𝑠 ‘𝐿)𝑤))
139	66, 137, 68, 138	syl12anc 1276	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = ((1r‘𝐹)( ·𝑠 ‘𝐿)𝑤))
140	16	3ad2ant1 1049	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝐾 ∈ Grp ∧ 𝐹 ∈ Ring) → 𝑃 = (Base‘𝐹))
141	44	3ad2ant1 1049	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝐾 ∈ Grp ∧ 𝐹 ∈ Ring) → 𝑃 = (Base‘𝐺))
142	46	3ad2antl1 1190	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝐾 ∈ Grp ∧ 𝐹 ∈ Ring) ∧ (𝑥 ∈ 𝑃 ∧ 𝑦 ∈ 𝑃)) → (𝑥(.r‘𝐹)𝑦) = (𝑥(.r‘𝐺)𝑦))
143		simp3 1030	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝐾 ∈ Grp ∧ 𝐹 ∈ Ring) → 𝐹 ∈ Ring)
144	47	biimpa 296	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝐹 ∈ Ring) → 𝐺 ∈ Ring)
145	144	3adant2 1047	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝐾 ∈ Grp ∧ 𝐹 ∈ Ring) → 𝐺 ∈ Ring)
146	140, 141, 142, 143, 145	rngidpropdg 14436	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝐾 ∈ Grp ∧ 𝐹 ∈ Ring) → (1r‘𝐹) = (1r‘𝐺))
147	66, 72, 97, 146	syl3anc 1278	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (1r‘𝐹) = (1r‘𝐺))
148	147	oveq1d 6094	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((1r‘𝐹)( ·𝑠 ‘𝐿)𝑤) = ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤))
149	139, 148	eqtrd 2271	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤))
150	149	eqeq1d 2247	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → (((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤 ↔ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))
151	134, 150	anbi12d 477	. . . . . . . . . 10 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤) ↔ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤)))
152	120, 151	anbi12d 477	. . . . . . . . 9 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ ((𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵))) → ((((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤)) ↔ (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
153	152	anassrs 404	. . . . . . . 8 ⊢ ((((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ (𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃)) ∧ (𝑧 ∈ 𝐵 ∧ 𝑤 ∈ 𝐵)) → ((((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤)) ↔ (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
154	153	2ralbidva 2572	. . . . . . 7 ⊢ (((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) ∧ (𝑞 ∈ 𝑃 ∧ 𝑟 ∈ 𝑃)) → (∀𝑧 ∈ 𝐵 ∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤)) ↔ ∀𝑧 ∈ 𝐵 ∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
155	154	2ralbidva 2572	. . . . . 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 2308	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → ((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ↔ (𝑟( ·𝑠 ‘𝐾)𝑤) ∈ (Base‘𝐾)))
159	158	3anbi1d 1357	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ↔ ((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ (Base‘𝐾) ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)))))
160	159	anbi1d 469	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → ((((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤)) ↔ (((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ (Base‘𝐾) ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤))))
161	157, 160	raleqbidv 2765	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤)) ↔ ∀𝑤 ∈ (Base‘𝐾)(((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ (Base‘𝐾) ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤))))
162	157, 161	raleqbidv 2765	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (∀𝑧 ∈ 𝐵 ∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤)) ↔ ∀𝑧 ∈ (Base‘𝐾)∀𝑤 ∈ (Base‘𝐾)(((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ (Base‘𝐾) ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤))))
163	156, 162	raleqbidv 2765	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (∀𝑟 ∈ 𝑃 ∀𝑧 ∈ 𝐵 ∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤)) ↔ ∀𝑟 ∈ (Base‘𝐹)∀𝑧 ∈ (Base‘𝐾)∀𝑤 ∈ (Base‘𝐾)(((𝑟( ·𝑠 ‘𝐾)𝑤) ∈ (Base‘𝐾) ∧ (𝑟( ·𝑠 ‘𝐾)(𝑤(+g‘𝐾)𝑧)) = ((𝑟( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑧)) ∧ ((𝑞(+g‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = ((𝑞( ·𝑠 ‘𝐾)𝑤)(+g‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤))) ∧ (((𝑞(.r‘𝐹)𝑟)( ·𝑠 ‘𝐾)𝑤) = (𝑞( ·𝑠 ‘𝐾)(𝑟( ·𝑠 ‘𝐾)𝑤)) ∧ ((1r‘𝐹)( ·𝑠 ‘𝐾)𝑤) = 𝑤))))
164	156, 163	raleqbidv 2765	. . . . . 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 2308	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → ((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ↔ (𝑟( ·𝑠 ‘𝐿)𝑤) ∈ (Base‘𝐿)))
168	167	3anbi1d 1357	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ↔ ((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ (Base‘𝐿) ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)))))
169	168	anbi1d 469	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → ((((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤)) ↔ (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ (Base‘𝐿) ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
170	166, 169	raleqbidv 2765	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤)) ↔ ∀𝑤 ∈ (Base‘𝐿)(((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ (Base‘𝐿) ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
171	166, 170	raleqbidv 2765	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (∀𝑧 ∈ 𝐵 ∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤)) ↔ ∀𝑧 ∈ (Base‘𝐿)∀𝑤 ∈ (Base‘𝐿)(((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ (Base‘𝐿) ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
172	165, 171	raleqbidv 2765	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐾 ∈ Grp ∧ 𝐹 ∈ Ring ∧ ∀𝑥 ∈ 𝑃 ∀𝑦 ∈ 𝐵 (𝑥( ·𝑠 ‘𝐾)𝑦) ∈ 𝐵)) → (∀𝑟 ∈ 𝑃 ∀𝑧 ∈ 𝐵 ∀𝑤 ∈ 𝐵 (((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ 𝐵 ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤)) ↔ ∀𝑟 ∈ (Base‘𝐺)∀𝑧 ∈ (Base‘𝐿)∀𝑤 ∈ (Base‘𝐿)(((𝑟( ·𝑠 ‘𝐿)𝑤) ∈ (Base‘𝐿) ∧ (𝑟( ·𝑠 ‘𝐿)(𝑤(+g‘𝐿)𝑧)) = ((𝑟( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑧)) ∧ ((𝑞(+g‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = ((𝑞( ·𝑠 ‘𝐿)𝑤)(+g‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤))) ∧ (((𝑞(.r‘𝐺)𝑟)( ·𝑠 ‘𝐿)𝑤) = (𝑞( ·𝑠 ‘𝐿)(𝑟( ·𝑠 ‘𝐿)𝑤)) ∧ ((1r‘𝐺)( ·𝑠 ‘𝐿)𝑤) = 𝑤))))
173	165, 172	raleqbidv 2765	. . . . . 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 1353	. . . 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 717	1 ⊢ (𝜑 → (𝐾 ∈ LMod ↔ 𝐿 ∈ LMod))

Syntax hints:   → wi 4   ∧ wa 104   ↔ wb 105   ∧ w3a 1009   = wceq 1402   ∈ wcel 2209  ∀wral 2528  ‘cfv 5375  (class class class)co 6079  Basecbs 13335  +_gcplusg 13414  ._rcmulr 13415  Scalarcsca 13417   ·_𝑠 cvsca 13418  Grpcgrp 13788  1_rcur 14245  Ringcrg 14283  LModclmod 14606

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 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-sep 4247  ax-pow 4309  ax-pr 4344  ax-un 4576  ax-setind 4682  ax-cnex 8264  ax-resscn 8265  ax-1cn 8266  ax-1re 8267  ax-icn 8268  ax-addcl 8269  ax-addrcl 8270  ax-mulcl 8271  ax-addcom 8273  ax-addass 8275  ax-i2m1 8278  ax-0lt1 8279  ax-0id 8281  ax-rnegex 8282  ax-pre-ltirr 8285  ax-pre-ltadd 8289

This theorem depends on definitions:  df-bi 117  df-3an 1011  df-tru 1405  df-fal 1408  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-nel 2516  df-ral 2533  df-rex 2534  df-reu 2535  df-rmo 2536  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-nul 3521  df-pw 3690  df-sn 3714  df-pr 3715  df-op 3717  df-uni 3934  df-int 3969  df-br 4129  df-opab 4191  df-mpt 4192  df-id 4436  df-xp 4778  df-rel 4779  df-cnv 4780  df-co 4781  df-dm 4782  df-rn 4783  df-res 4784  df-ima 4785  df-iota 5335  df-fun 5377  df-fn 5378  df-fv 5383  df-riota 6032  df-ov 6082  df-oprab 6083  df-mpo 6084  df-pnf 8356  df-mnf 8357  df-ltxr 8359  df-inn 9288  df-2 9346  df-3 9347  df-4 9348  df-5 9349  df-6 9350  df-ndx 13338  df-slot 13339  df-base 13341  df-sets 13342  df-plusg 13427  df-mulr 13428  df-sca 13430  df-vsca 13431  df-0g 13595  df-mgm 13659  df-sgrp 13700  df-mnd 13713  df-grp 13791  df-mgp 14201  df-ur 14246  df-ring 14285  df-lmod 14608

This theorem is referenced by:  lmodpropd  14669