rngoisocnv - Mathbox for Jeff Madsen

	Mathbox for Jeff Madsen		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > rngoisocnv		Structured version Visualization version GIF version

Theorem rngoisocnv 36066

Description: The inverse of a ring isomorphism is a ring isomorphism. (Contributed by Jeff Madsen, 16-Jun-2011.)

**Assertion**
Ref	Expression
rngoisocnv	⊢ ((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngIso 𝑆)) → ^◡𝐹 ∈ (𝑆 RngIso 𝑅))

Proof of Theorem rngoisocnv Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		f1ocnv 6712	. . . . . . . 8 ⊢ (𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) → ^◡𝐹:ran (1^st ‘𝑆)–1-1-onto→ran (1^st ‘𝑅))
2		f1of 6700	. . . . . . . 8 ⊢ (^◡𝐹:ran (1^st ‘𝑆)–1-1-onto→ran (1^st ‘𝑅) → ^◡𝐹:ran (1^st ‘𝑆)⟶ran (1^st ‘𝑅))
3	1, 2	syl 17	. . . . . . 7 ⊢ (𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) → ^◡𝐹:ran (1^st ‘𝑆)⟶ran (1^st ‘𝑅))
4	3	ad2antll 725	. . . . . 6 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) → ^◡𝐹:ran (1^st ‘𝑆)⟶ran (1^st ‘𝑅))
5		eqid 2738	. . . . . . . . . 10 ⊢ (2^nd ‘𝑅) = (2^nd ‘𝑅)
6		eqid 2738	. . . . . . . . . 10 ⊢ (GId‘(2^nd ‘𝑅)) = (GId‘(2^nd ‘𝑅))
7		eqid 2738	. . . . . . . . . 10 ⊢ (2^nd ‘𝑆) = (2^nd ‘𝑆)
8		eqid 2738	. . . . . . . . . 10 ⊢ (GId‘(2^nd ‘𝑆)) = (GId‘(2^nd ‘𝑆))
9	5, 6, 7, 8	rngohom1 36053	. . . . . . . . 9 ⊢ ((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) → (𝐹‘(GId‘(2^nd ‘𝑅))) = (GId‘(2^nd ‘𝑆)))
10	9	3expa 1116	. . . . . . . 8 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) → (𝐹‘(GId‘(2^nd ‘𝑅))) = (GId‘(2^nd ‘𝑆)))
11	10	adantrr 713	. . . . . . 7 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) → (𝐹‘(GId‘(2^nd ‘𝑅))) = (GId‘(2^nd ‘𝑆)))
12		eqid 2738	. . . . . . . . . . 11 ⊢ ran (1^st ‘𝑅) = ran (1^st ‘𝑅)
13	12, 5, 6	rngo1cl 36024	. . . . . . . . . 10 ⊢ (𝑅 ∈ RingOps → (GId‘(2^nd ‘𝑅)) ∈ ran (1^st ‘𝑅))
14		f1ocnvfv 7131	. . . . . . . . . 10 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (GId‘(2^nd ‘𝑅)) ∈ ran (1^st ‘𝑅)) → ((𝐹‘(GId‘(2^nd ‘𝑅))) = (GId‘(2^nd ‘𝑆)) → (^◡𝐹‘(GId‘(2^nd ‘𝑆))) = (GId‘(2^nd ‘𝑅))))
15	13, 14	sylan2 592	. . . . . . . . 9 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ 𝑅 ∈ RingOps) → ((𝐹‘(GId‘(2^nd ‘𝑅))) = (GId‘(2^nd ‘𝑆)) → (^◡𝐹‘(GId‘(2^nd ‘𝑆))) = (GId‘(2^nd ‘𝑅))))
16	15	ancoms 458	. . . . . . . 8 ⊢ ((𝑅 ∈ RingOps ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) → ((𝐹‘(GId‘(2^nd ‘𝑅))) = (GId‘(2^nd ‘𝑆)) → (^◡𝐹‘(GId‘(2^nd ‘𝑆))) = (GId‘(2^nd ‘𝑅))))
17	16	ad2ant2rl 745	. . . . . . 7 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) → ((𝐹‘(GId‘(2^nd ‘𝑅))) = (GId‘(2^nd ‘𝑆)) → (^◡𝐹‘(GId‘(2^nd ‘𝑆))) = (GId‘(2^nd ‘𝑅))))
18	11, 17	mpd 15	. . . . . 6 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) → (^◡𝐹‘(GId‘(2^nd ‘𝑆))) = (GId‘(2^nd ‘𝑅)))
19		f1ocnvfv2 7130	. . . . . . . . . . . . . 14 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ 𝑥 ∈ ran (1^st ‘𝑆)) → (𝐹‘(^◡𝐹‘𝑥)) = 𝑥)
20		f1ocnvfv2 7130	. . . . . . . . . . . . . 14 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)) → (𝐹‘(^◡𝐹‘𝑦)) = 𝑦)
21	19, 20	anim12dan 618	. . . . . . . . . . . . 13 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((𝐹‘(^◡𝐹‘𝑥)) = 𝑥 ∧ (𝐹‘(^◡𝐹‘𝑦)) = 𝑦))
22		oveq12 7264	. . . . . . . . . . . . 13 ⊢ (((𝐹‘(^◡𝐹‘𝑥)) = 𝑥 ∧ (𝐹‘(^◡𝐹‘𝑦)) = 𝑦) → ((𝐹‘(^◡𝐹‘𝑥))(1^st ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))) = (𝑥(1^st ‘𝑆)𝑦))
23	21, 22	syl 17	. . . . . . . . . . . 12 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((𝐹‘(^◡𝐹‘𝑥))(1^st ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))) = (𝑥(1^st ‘𝑆)𝑦))
24	23	adantll 710	. . . . . . . . . . 11 ⊢ (((𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((𝐹‘(^◡𝐹‘𝑥))(1^st ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))) = (𝑥(1^st ‘𝑆)𝑦))
25	24	adantll 710	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((𝐹‘(^◡𝐹‘𝑥))(1^st ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))) = (𝑥(1^st ‘𝑆)𝑦))
26		f1ocnvdm 7137	. . . . . . . . . . . . . . . 16 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ 𝑥 ∈ ran (1^st ‘𝑆)) → (^◡𝐹‘𝑥) ∈ ran (1^st ‘𝑅))
27		f1ocnvdm 7137	. . . . . . . . . . . . . . . 16 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)) → (^◡𝐹‘𝑦) ∈ ran (1^st ‘𝑅))
28	26, 27	anim12dan 618	. . . . . . . . . . . . . . 15 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((^◡𝐹‘𝑥) ∈ ran (1^st ‘𝑅) ∧ (^◡𝐹‘𝑦) ∈ ran (1^st ‘𝑅)))
29		eqid 2738	. . . . . . . . . . . . . . . 16 ⊢ (1^st ‘𝑅) = (1^st ‘𝑅)
30		eqid 2738	. . . . . . . . . . . . . . . 16 ⊢ (1^st ‘𝑆) = (1^st ‘𝑆)
31	29, 12, 30	rngohomadd 36054	. . . . . . . . . . . . . . 15 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) ∧ ((^◡𝐹‘𝑥) ∈ ran (1^st ‘𝑅) ∧ (^◡𝐹‘𝑦) ∈ ran (1^st ‘𝑅))) → (𝐹‘((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦))) = ((𝐹‘(^◡𝐹‘𝑥))(1^st ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))))
32	28, 31	sylan2 592	. . . . . . . . . . . . . 14 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) ∧ (𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)))) → (𝐹‘((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦))) = ((𝐹‘(^◡𝐹‘𝑥))(1^st ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))))
33	32	exp32 420	. . . . . . . . . . . . 13 ⊢ ((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) → (𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) → ((𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)) → (𝐹‘((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦))) = ((𝐹‘(^◡𝐹‘𝑥))(1^st ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))))))
34	33	3expa 1116	. . . . . . . . . . . 12 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) → (𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) → ((𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)) → (𝐹‘((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦))) = ((𝐹‘(^◡𝐹‘𝑥))(1^st ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))))))
35	34	impr 454	. . . . . . . . . . 11 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) → ((𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)) → (𝐹‘((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦))) = ((𝐹‘(^◡𝐹‘𝑥))(1^st ‘𝑆)(𝐹‘(^◡𝐹‘𝑦)))))
36	35	imp 406	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (𝐹‘((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦))) = ((𝐹‘(^◡𝐹‘𝑥))(1^st ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))))
37		eqid 2738	. . . . . . . . . . . . . . . 16 ⊢ ran (1^st ‘𝑆) = ran (1^st ‘𝑆)
38	30, 37	rngogcl 35997	. . . . . . . . . . . . . . 15 ⊢ ((𝑆 ∈ RingOps ∧ 𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)) → (𝑥(1^st ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆))
39	38	3expb 1118	. . . . . . . . . . . . . 14 ⊢ ((𝑆 ∈ RingOps ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (𝑥(1^st ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆))
40		f1ocnvfv2 7130	. . . . . . . . . . . . . . 15 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥(1^st ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆)) → (𝐹‘(^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦))) = (𝑥(1^st ‘𝑆)𝑦))
41	40	ancoms 458	. . . . . . . . . . . . . 14 ⊢ (((𝑥(1^st ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) → (𝐹‘(^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦))) = (𝑥(1^st ‘𝑆)𝑦))
42	39, 41	sylan 579	. . . . . . . . . . . . 13 ⊢ (((𝑆 ∈ RingOps ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) → (𝐹‘(^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦))) = (𝑥(1^st ‘𝑆)𝑦))
43	42	an32s 648	. . . . . . . . . . . 12 ⊢ (((𝑆 ∈ RingOps ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (𝐹‘(^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦))) = (𝑥(1^st ‘𝑆)𝑦))
44	43	adantlll 714	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (𝐹‘(^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦))) = (𝑥(1^st ‘𝑆)𝑦))
45	44	adantlrl 716	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (𝐹‘(^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦))) = (𝑥(1^st ‘𝑆)𝑦))
46	25, 36, 45	3eqtr4rd 2789	. . . . . . . . 9 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (𝐹‘(^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦))) = (𝐹‘((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦))))
47		f1of1 6699	. . . . . . . . . . . 12 ⊢ (𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) → 𝐹:ran (1^st ‘𝑅)–1-1→ran (1^st ‘𝑆))
48	47	ad2antlr 723	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → 𝐹:ran (1^st ‘𝑅)–1-1→ran (1^st ‘𝑆))
49		f1ocnvdm 7137	. . . . . . . . . . . . . . 15 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥(1^st ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆)) → (^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦)) ∈ ran (1^st ‘𝑅))
50	49	ancoms 458	. . . . . . . . . . . . . 14 ⊢ (((𝑥(1^st ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) → (^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦)) ∈ ran (1^st ‘𝑅))
51	39, 50	sylan 579	. . . . . . . . . . . . 13 ⊢ (((𝑆 ∈ RingOps ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) → (^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦)) ∈ ran (1^st ‘𝑅))
52	51	an32s 648	. . . . . . . . . . . 12 ⊢ (((𝑆 ∈ RingOps ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦)) ∈ ran (1^st ‘𝑅))
53	52	adantlll 714	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦)) ∈ ran (1^st ‘𝑅))
54	29, 12	rngogcl 35997	. . . . . . . . . . . . . . 15 ⊢ ((𝑅 ∈ RingOps ∧ (^◡𝐹‘𝑥) ∈ ran (1^st ‘𝑅) ∧ (^◡𝐹‘𝑦) ∈ ran (1^st ‘𝑅)) → ((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦)) ∈ ran (1^st ‘𝑅))
55	54	3expb 1118	. . . . . . . . . . . . . 14 ⊢ ((𝑅 ∈ RingOps ∧ ((^◡𝐹‘𝑥) ∈ ran (1^st ‘𝑅) ∧ (^◡𝐹‘𝑦) ∈ ran (1^st ‘𝑅))) → ((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦)) ∈ ran (1^st ‘𝑅))
56	28, 55	sylan2 592	. . . . . . . . . . . . 13 ⊢ ((𝑅 ∈ RingOps ∧ (𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)))) → ((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦)) ∈ ran (1^st ‘𝑅))
57	56	anassrs 467	. . . . . . . . . . . 12 ⊢ (((𝑅 ∈ RingOps ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦)) ∈ ran (1^st ‘𝑅))
58	57	adantllr 715	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦)) ∈ ran (1^st ‘𝑅))
59		f1fveq 7116	. . . . . . . . . . 11 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1→ran (1^st ‘𝑆) ∧ ((^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦)) ∈ ran (1^st ‘𝑅) ∧ ((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦)) ∈ ran (1^st ‘𝑅))) → ((𝐹‘(^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦))) = (𝐹‘((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦))) ↔ (^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦))))
60	48, 53, 58, 59	syl12anc 833	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((𝐹‘(^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦))) = (𝐹‘((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦))) ↔ (^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦))))
61	60	adantlrl 716	. . . . . . . . 9 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((𝐹‘(^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦))) = (𝐹‘((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦))) ↔ (^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦))))
62	46, 61	mpbid 231	. . . . . . . 8 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦)))
63		oveq12 7264	. . . . . . . . . . . . 13 ⊢ (((𝐹‘(^◡𝐹‘𝑥)) = 𝑥 ∧ (𝐹‘(^◡𝐹‘𝑦)) = 𝑦) → ((𝐹‘(^◡𝐹‘𝑥))(2^nd ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))) = (𝑥(2^nd ‘𝑆)𝑦))
64	21, 63	syl 17	. . . . . . . . . . . 12 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((𝐹‘(^◡𝐹‘𝑥))(2^nd ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))) = (𝑥(2^nd ‘𝑆)𝑦))
65	64	adantll 710	. . . . . . . . . . 11 ⊢ (((𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((𝐹‘(^◡𝐹‘𝑥))(2^nd ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))) = (𝑥(2^nd ‘𝑆)𝑦))
66	65	adantll 710	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((𝐹‘(^◡𝐹‘𝑥))(2^nd ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))) = (𝑥(2^nd ‘𝑆)𝑦))
67	29, 12, 5, 7	rngohommul 36055	. . . . . . . . . . . . . . 15 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) ∧ ((^◡𝐹‘𝑥) ∈ ran (1^st ‘𝑅) ∧ (^◡𝐹‘𝑦) ∈ ran (1^st ‘𝑅))) → (𝐹‘((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))) = ((𝐹‘(^◡𝐹‘𝑥))(2^nd ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))))
68	28, 67	sylan2 592	. . . . . . . . . . . . . 14 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) ∧ (𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)))) → (𝐹‘((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))) = ((𝐹‘(^◡𝐹‘𝑥))(2^nd ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))))
69	68	exp32 420	. . . . . . . . . . . . 13 ⊢ ((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) → (𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) → ((𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)) → (𝐹‘((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))) = ((𝐹‘(^◡𝐹‘𝑥))(2^nd ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))))))
70	69	3expa 1116	. . . . . . . . . . . 12 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) → (𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) → ((𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)) → (𝐹‘((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))) = ((𝐹‘(^◡𝐹‘𝑥))(2^nd ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))))))
71	70	impr 454	. . . . . . . . . . 11 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) → ((𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)) → (𝐹‘((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))) = ((𝐹‘(^◡𝐹‘𝑥))(2^nd ‘𝑆)(𝐹‘(^◡𝐹‘𝑦)))))
72	71	imp 406	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (𝐹‘((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))) = ((𝐹‘(^◡𝐹‘𝑥))(2^nd ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))))
73	30, 7, 37	rngocl 35986	. . . . . . . . . . . . . . 15 ⊢ ((𝑆 ∈ RingOps ∧ 𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)) → (𝑥(2^nd ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆))
74	73	3expb 1118	. . . . . . . . . . . . . 14 ⊢ ((𝑆 ∈ RingOps ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (𝑥(2^nd ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆))
75		f1ocnvfv2 7130	. . . . . . . . . . . . . . 15 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥(2^nd ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆)) → (𝐹‘(^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦))) = (𝑥(2^nd ‘𝑆)𝑦))
76	75	ancoms 458	. . . . . . . . . . . . . 14 ⊢ (((𝑥(2^nd ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) → (𝐹‘(^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦))) = (𝑥(2^nd ‘𝑆)𝑦))
77	74, 76	sylan 579	. . . . . . . . . . . . 13 ⊢ (((𝑆 ∈ RingOps ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) → (𝐹‘(^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦))) = (𝑥(2^nd ‘𝑆)𝑦))
78	77	an32s 648	. . . . . . . . . . . 12 ⊢ (((𝑆 ∈ RingOps ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (𝐹‘(^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦))) = (𝑥(2^nd ‘𝑆)𝑦))
79	78	adantlll 714	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (𝐹‘(^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦))) = (𝑥(2^nd ‘𝑆)𝑦))
80	79	adantlrl 716	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (𝐹‘(^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦))) = (𝑥(2^nd ‘𝑆)𝑦))
81	66, 72, 80	3eqtr4rd 2789	. . . . . . . . 9 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (𝐹‘(^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦))) = (𝐹‘((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))))
82		f1ocnvdm 7137	. . . . . . . . . . . . . . 15 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥(2^nd ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆)) → (^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦)) ∈ ran (1^st ‘𝑅))
83	82	ancoms 458	. . . . . . . . . . . . . 14 ⊢ (((𝑥(2^nd ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) → (^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦)) ∈ ran (1^st ‘𝑅))
84	74, 83	sylan 579	. . . . . . . . . . . . 13 ⊢ (((𝑆 ∈ RingOps ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) → (^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦)) ∈ ran (1^st ‘𝑅))
85	84	an32s 648	. . . . . . . . . . . 12 ⊢ (((𝑆 ∈ RingOps ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦)) ∈ ran (1^st ‘𝑅))
86	85	adantlll 714	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦)) ∈ ran (1^st ‘𝑅))
87	29, 5, 12	rngocl 35986	. . . . . . . . . . . . . . 15 ⊢ ((𝑅 ∈ RingOps ∧ (^◡𝐹‘𝑥) ∈ ran (1^st ‘𝑅) ∧ (^◡𝐹‘𝑦) ∈ ran (1^st ‘𝑅)) → ((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦)) ∈ ran (1^st ‘𝑅))
88	87	3expb 1118	. . . . . . . . . . . . . 14 ⊢ ((𝑅 ∈ RingOps ∧ ((^◡𝐹‘𝑥) ∈ ran (1^st ‘𝑅) ∧ (^◡𝐹‘𝑦) ∈ ran (1^st ‘𝑅))) → ((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦)) ∈ ran (1^st ‘𝑅))
89	28, 88	sylan2 592	. . . . . . . . . . . . 13 ⊢ ((𝑅 ∈ RingOps ∧ (𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)))) → ((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦)) ∈ ran (1^st ‘𝑅))
90	89	anassrs 467	. . . . . . . . . . . 12 ⊢ (((𝑅 ∈ RingOps ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦)) ∈ ran (1^st ‘𝑅))
91	90	adantllr 715	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦)) ∈ ran (1^st ‘𝑅))
92		f1fveq 7116	. . . . . . . . . . 11 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1→ran (1^st ‘𝑆) ∧ ((^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦)) ∈ ran (1^st ‘𝑅) ∧ ((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦)) ∈ ran (1^st ‘𝑅))) → ((𝐹‘(^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦))) = (𝐹‘((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))) ↔ (^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))))
93	48, 86, 91, 92	syl12anc 833	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((𝐹‘(^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦))) = (𝐹‘((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))) ↔ (^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))))
94	93	adantlrl 716	. . . . . . . . 9 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((𝐹‘(^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦))) = (𝐹‘((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))) ↔ (^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))))
95	81, 94	mpbid 231	. . . . . . . 8 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦)))
96	62, 95	jca 511	. . . . . . 7 ⊢ ((((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦)) ∧ (^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))))
97	96	ralrimivva 3114	. . . . . 6 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) → ∀𝑥 ∈ ran (1^st ‘𝑆)∀𝑦 ∈ ran (1^st ‘𝑆)((^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦)) ∧ (^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))))
98	30, 7, 37, 8, 29, 5, 12, 6	isrngohom 36050	. . . . . . . 8 ⊢ ((𝑆 ∈ RingOps ∧ 𝑅 ∈ RingOps) → (^◡𝐹 ∈ (𝑆 RngHom 𝑅) ↔ (^◡𝐹:ran (1^st ‘𝑆)⟶ran (1^st ‘𝑅) ∧ (^◡𝐹‘(GId‘(2^nd ‘𝑆))) = (GId‘(2^nd ‘𝑅)) ∧ ∀𝑥 ∈ ran (1^st ‘𝑆)∀𝑦 ∈ ran (1^st ‘𝑆)((^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦)) ∧ (^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))))))
99	98	ancoms 458	. . . . . . 7 ⊢ ((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) → (^◡𝐹 ∈ (𝑆 RngHom 𝑅) ↔ (^◡𝐹:ran (1^st ‘𝑆)⟶ran (1^st ‘𝑅) ∧ (^◡𝐹‘(GId‘(2^nd ‘𝑆))) = (GId‘(2^nd ‘𝑅)) ∧ ∀𝑥 ∈ ran (1^st ‘𝑆)∀𝑦 ∈ ran (1^st ‘𝑆)((^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦)) ∧ (^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))))))
100	99	adantr 480	. . . . . 6 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) → (^◡𝐹 ∈ (𝑆 RngHom 𝑅) ↔ (^◡𝐹:ran (1^st ‘𝑆)⟶ran (1^st ‘𝑅) ∧ (^◡𝐹‘(GId‘(2^nd ‘𝑆))) = (GId‘(2^nd ‘𝑅)) ∧ ∀𝑥 ∈ ran (1^st ‘𝑆)∀𝑦 ∈ ran (1^st ‘𝑆)((^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦)) ∧ (^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦)) = ((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))))))
101	4, 18, 97, 100	mpbir3and 1340	. . . . 5 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) → ^◡𝐹 ∈ (𝑆 RngHom 𝑅))
102	1	ad2antll 725	. . . . 5 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) → ^◡𝐹:ran (1^st ‘𝑆)–1-1-onto→ran (1^st ‘𝑅))
103	101, 102	jca 511	. . . 4 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) → (^◡𝐹 ∈ (𝑆 RngHom 𝑅) ∧ ^◡𝐹:ran (1^st ‘𝑆)–1-1-onto→ran (1^st ‘𝑅)))
104	103	ex 412	. . 3 ⊢ ((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) → ((𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) → (^◡𝐹 ∈ (𝑆 RngHom 𝑅) ∧ ^◡𝐹:ran (1^st ‘𝑆)–1-1-onto→ran (1^st ‘𝑅))))
105	29, 12, 30, 37	isrngoiso 36063	. . 3 ⊢ ((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) → (𝐹 ∈ (𝑅 RngIso 𝑆) ↔ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))))
106	30, 37, 29, 12	isrngoiso 36063	. . . 4 ⊢ ((𝑆 ∈ RingOps ∧ 𝑅 ∈ RingOps) → (^◡𝐹 ∈ (𝑆 RngIso 𝑅) ↔ (^◡𝐹 ∈ (𝑆 RngHom 𝑅) ∧ ^◡𝐹:ran (1^st ‘𝑆)–1-1-onto→ran (1^st ‘𝑅))))
107	106	ancoms 458	. . 3 ⊢ ((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) → (^◡𝐹 ∈ (𝑆 RngIso 𝑅) ↔ (^◡𝐹 ∈ (𝑆 RngHom 𝑅) ∧ ^◡𝐹:ran (1^st ‘𝑆)–1-1-onto→ran (1^st ‘𝑅))))
108	104, 105, 107	3imtr4d 293	. 2 ⊢ ((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) → (𝐹 ∈ (𝑅 RngIso 𝑆) → ^◡𝐹 ∈ (𝑆 RngIso 𝑅)))
109	108	3impia 1115	1 ⊢ ((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngIso 𝑆)) → ^◡𝐹 ∈ (𝑆 RngIso 𝑅))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 205 ∧ wa 395 ∧ w3a 1085 = wceq 1539 ∈ wcel 2108 ∀wral 3063 ^◡ccnv 5579 ran crn 5581 ⟶wf 6414 –1-1→wf1 6415 –1-1-onto→wf1o 6417 ‘cfv 6418 (class class class)co 7255 1^st c1st 7802 2^nd c2nd 7803 GIdcgi 28753 RingOpscrngo 35979 RngHom crnghom 36045 RngIso crngiso 36046

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1799 ax-4 1813 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2110 ax-9 2118 ax-10 2139 ax-11 2156 ax-12 2173 ax-ext 2709 ax-sep 5218 ax-nul 5225 ax-pow 5283 ax-pr 5347 ax-un 7566

This theorem depends on definitions: df-bi 206 df-an 396 df-or 844 df-3an 1087 df-tru 1542 df-fal 1552 df-ex 1784 df-nf 1788 df-sb 2069 df-mo 2540 df-eu 2569 df-clab 2716 df-cleq 2730 df-clel 2817 df-nfc 2888 df-ne 2943 df-ral 3068 df-rex 3069 df-reu 3070 df-rmo 3071 df-rab 3072 df-v 3424 df-sbc 3712 df-csb 3829 df-dif 3886 df-un 3888 df-in 3890 df-ss 3900 df-nul 4254 df-if 4457 df-pw 4532 df-sn 4559 df-pr 4561 df-op 4565 df-uni 4837 df-iun 4923 df-br 5071 df-opab 5133 df-mpt 5154 df-id 5480 df-xp 5586 df-rel 5587 df-cnv 5588 df-co 5589 df-dm 5590 df-rn 5591 df-res 5592 df-ima 5593 df-iota 6376 df-fun 6420 df-fn 6421 df-f 6422 df-f1 6423 df-fo 6424 df-f1o 6425 df-fv 6426 df-riota 7212 df-ov 7258 df-oprab 7259 df-mpo 7260 df-1st 7804 df-2nd 7805 df-map 8575 df-grpo 28756 df-gid 28757 df-ablo 28808 df-ass 35928 df-exid 35930 df-mgmOLD 35934 df-sgrOLD 35946 df-mndo 35952 df-rngo 35980 df-rngohom 36048 df-rngoiso 36061

This theorem is referenced by: riscer 36073

W3C validator