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 35876

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 6673	. . . . . . . 8 ⊢ (𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) → ^◡𝐹:ran (1^st ‘𝑆)–1-1-onto→ran (1^st ‘𝑅))
2		f1of 6661	. . . . . . . 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 729	. . . . . 6 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) → ^◡𝐹:ran (1^st ‘𝑆)⟶ran (1^st ‘𝑅))
5		eqid 2737	. . . . . . . . . 10 ⊢ (2^nd ‘𝑅) = (2^nd ‘𝑅)
6		eqid 2737	. . . . . . . . . 10 ⊢ (GId‘(2^nd ‘𝑅)) = (GId‘(2^nd ‘𝑅))
7		eqid 2737	. . . . . . . . . 10 ⊢ (2^nd ‘𝑆) = (2^nd ‘𝑆)
8		eqid 2737	. . . . . . . . . 10 ⊢ (GId‘(2^nd ‘𝑆)) = (GId‘(2^nd ‘𝑆))
9	5, 6, 7, 8	rngohom1 35863	. . . . . . . . 9 ⊢ ((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) → (𝐹‘(GId‘(2^nd ‘𝑅))) = (GId‘(2^nd ‘𝑆)))
10	9	3expa 1120	. . . . . . . 8 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) → (𝐹‘(GId‘(2^nd ‘𝑅))) = (GId‘(2^nd ‘𝑆)))
11	10	adantrr 717	. . . . . . 7 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) → (𝐹‘(GId‘(2^nd ‘𝑅))) = (GId‘(2^nd ‘𝑆)))
12		eqid 2737	. . . . . . . . . . 11 ⊢ ran (1^st ‘𝑅) = ran (1^st ‘𝑅)
13	12, 5, 6	rngo1cl 35834	. . . . . . . . . 10 ⊢ (𝑅 ∈ RingOps → (GId‘(2^nd ‘𝑅)) ∈ ran (1^st ‘𝑅))
14		f1ocnvfv 7089	. . . . . . . . . 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 596	. . . . . . . . 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 462	. . . . . . . 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 749	. . . . . . 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 7088	. . . . . . . . . . . . . 14 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ 𝑥 ∈ ran (1^st ‘𝑆)) → (𝐹‘(^◡𝐹‘𝑥)) = 𝑥)
20		f1ocnvfv2 7088	. . . . . . . . . . . . . 14 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)) → (𝐹‘(^◡𝐹‘𝑦)) = 𝑦)
21	19, 20	anim12dan 622	. . . . . . . . . . . . 13 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((𝐹‘(^◡𝐹‘𝑥)) = 𝑥 ∧ (𝐹‘(^◡𝐹‘𝑦)) = 𝑦))
22		oveq12 7222	. . . . . . . . . . . . 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 714	. . . . . . . . . . 11 ⊢ (((𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((𝐹‘(^◡𝐹‘𝑥))(1^st ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))) = (𝑥(1^st ‘𝑆)𝑦))
25	24	adantll 714	. . . . . . . . . 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 7095	. . . . . . . . . . . . . . . 16 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ 𝑥 ∈ ran (1^st ‘𝑆)) → (^◡𝐹‘𝑥) ∈ ran (1^st ‘𝑅))
27		f1ocnvdm 7095	. . . . . . . . . . . . . . . 16 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)) → (^◡𝐹‘𝑦) ∈ ran (1^st ‘𝑅))
28	26, 27	anim12dan 622	. . . . . . . . . . . . . . 15 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((^◡𝐹‘𝑥) ∈ ran (1^st ‘𝑅) ∧ (^◡𝐹‘𝑦) ∈ ran (1^st ‘𝑅)))
29		eqid 2737	. . . . . . . . . . . . . . . 16 ⊢ (1^st ‘𝑅) = (1^st ‘𝑅)
30		eqid 2737	. . . . . . . . . . . . . . . 16 ⊢ (1^st ‘𝑆) = (1^st ‘𝑆)
31	29, 12, 30	rngohomadd 35864	. . . . . . . . . . . . . . 15 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) ∧ ((^◡𝐹‘𝑥) ∈ ran (1^st ‘𝑅) ∧ (^◡𝐹‘𝑦) ∈ ran (1^st ‘𝑅))) → (𝐹‘((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦))) = ((𝐹‘(^◡𝐹‘𝑥))(1^st ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))))
32	28, 31	sylan2 596	. . . . . . . . . . . . . 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 424	. . . . . . . . . . . . 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 1120	. . . . . . . . . . . 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 458	. . . . . . . . . . 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 410	. . . . . . . . . 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 2737	. . . . . . . . . . . . . . . 16 ⊢ ran (1^st ‘𝑆) = ran (1^st ‘𝑆)
38	30, 37	rngogcl 35807	. . . . . . . . . . . . . . 15 ⊢ ((𝑆 ∈ RingOps ∧ 𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)) → (𝑥(1^st ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆))
39	38	3expb 1122	. . . . . . . . . . . . . 14 ⊢ ((𝑆 ∈ RingOps ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (𝑥(1^st ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆))
40		f1ocnvfv2 7088	. . . . . . . . . . . . . . 15 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥(1^st ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆)) → (𝐹‘(^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦))) = (𝑥(1^st ‘𝑆)𝑦))
41	40	ancoms 462	. . . . . . . . . . . . . 14 ⊢ (((𝑥(1^st ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) → (𝐹‘(^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦))) = (𝑥(1^st ‘𝑆)𝑦))
42	39, 41	sylan 583	. . . . . . . . . . . . 13 ⊢ (((𝑆 ∈ RingOps ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) → (𝐹‘(^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦))) = (𝑥(1^st ‘𝑆)𝑦))
43	42	an32s 652	. . . . . . . . . . . 12 ⊢ (((𝑆 ∈ RingOps ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (𝐹‘(^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦))) = (𝑥(1^st ‘𝑆)𝑦))
44	43	adantlll 718	. . . . . . . . . . 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 720	. . . . . . . . . 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 2788	. . . . . . . . 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 6660	. . . . . . . . . . . 12 ⊢ (𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) → 𝐹:ran (1^st ‘𝑅)–1-1→ran (1^st ‘𝑆))
48	47	ad2antlr 727	. . . . . . . . . . 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 7095	. . . . . . . . . . . . . . 15 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥(1^st ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆)) → (^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦)) ∈ ran (1^st ‘𝑅))
50	49	ancoms 462	. . . . . . . . . . . . . 14 ⊢ (((𝑥(1^st ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) → (^◡𝐹‘(𝑥(1^st ‘𝑆)𝑦)) ∈ ran (1^st ‘𝑅))
51	39, 50	sylan 583	. . . . . . . . . . . . 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 652	. . . . . . . . . . . 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 718	. . . . . . . . . . 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 35807	. . . . . . . . . . . . . . 15 ⊢ ((𝑅 ∈ RingOps ∧ (^◡𝐹‘𝑥) ∈ ran (1^st ‘𝑅) ∧ (^◡𝐹‘𝑦) ∈ ran (1^st ‘𝑅)) → ((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦)) ∈ ran (1^st ‘𝑅))
55	54	3expb 1122	. . . . . . . . . . . . . 14 ⊢ ((𝑅 ∈ RingOps ∧ ((^◡𝐹‘𝑥) ∈ ran (1^st ‘𝑅) ∧ (^◡𝐹‘𝑦) ∈ ran (1^st ‘𝑅))) → ((^◡𝐹‘𝑥)(1^st ‘𝑅)(^◡𝐹‘𝑦)) ∈ ran (1^st ‘𝑅))
56	28, 55	sylan2 596	. . . . . . . . . . . . 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 471	. . . . . . . . . . . 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 719	. . . . . . . . . . 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 7074	. . . . . . . . . . 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 837	. . . . . . . . . 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 720	. . . . . . . . 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 235	. . . . . . . 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 7222	. . . . . . . . . . . . 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 714	. . . . . . . . . . 11 ⊢ (((𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → ((𝐹‘(^◡𝐹‘𝑥))(2^nd ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))) = (𝑥(2^nd ‘𝑆)𝑦))
66	65	adantll 714	. . . . . . . . . 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 35865	. . . . . . . . . . . . . . 15 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngHom 𝑆)) ∧ ((^◡𝐹‘𝑥) ∈ ran (1^st ‘𝑅) ∧ (^◡𝐹‘𝑦) ∈ ran (1^st ‘𝑅))) → (𝐹‘((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦))) = ((𝐹‘(^◡𝐹‘𝑥))(2^nd ‘𝑆)(𝐹‘(^◡𝐹‘𝑦))))
68	28, 67	sylan2 596	. . . . . . . . . . . . . 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 424	. . . . . . . . . . . . 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 1120	. . . . . . . . . . . 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 458	. . . . . . . . . . 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 410	. . . . . . . . . 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 35796	. . . . . . . . . . . . . . 15 ⊢ ((𝑆 ∈ RingOps ∧ 𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆)) → (𝑥(2^nd ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆))
74	73	3expb 1122	. . . . . . . . . . . . . 14 ⊢ ((𝑆 ∈ RingOps ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (𝑥(2^nd ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆))
75		f1ocnvfv2 7088	. . . . . . . . . . . . . . 15 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥(2^nd ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆)) → (𝐹‘(^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦))) = (𝑥(2^nd ‘𝑆)𝑦))
76	75	ancoms 462	. . . . . . . . . . . . . 14 ⊢ (((𝑥(2^nd ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) → (𝐹‘(^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦))) = (𝑥(2^nd ‘𝑆)𝑦))
77	74, 76	sylan 583	. . . . . . . . . . . . 13 ⊢ (((𝑆 ∈ RingOps ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) → (𝐹‘(^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦))) = (𝑥(2^nd ‘𝑆)𝑦))
78	77	an32s 652	. . . . . . . . . . . 12 ⊢ (((𝑆 ∈ RingOps ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) ∧ (𝑥 ∈ ran (1^st ‘𝑆) ∧ 𝑦 ∈ ran (1^st ‘𝑆))) → (𝐹‘(^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦))) = (𝑥(2^nd ‘𝑆)𝑦))
79	78	adantlll 718	. . . . . . . . . . 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 720	. . . . . . . . . 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 2788	. . . . . . . . 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 7095	. . . . . . . . . . . . . . 15 ⊢ ((𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆) ∧ (𝑥(2^nd ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆)) → (^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦)) ∈ ran (1^st ‘𝑅))
83	82	ancoms 462	. . . . . . . . . . . . . 14 ⊢ (((𝑥(2^nd ‘𝑆)𝑦) ∈ ran (1^st ‘𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆)) → (^◡𝐹‘(𝑥(2^nd ‘𝑆)𝑦)) ∈ ran (1^st ‘𝑅))
84	74, 83	sylan 583	. . . . . . . . . . . . 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 652	. . . . . . . . . . . 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 718	. . . . . . . . . . 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 35796	. . . . . . . . . . . . . . 15 ⊢ ((𝑅 ∈ RingOps ∧ (^◡𝐹‘𝑥) ∈ ran (1^st ‘𝑅) ∧ (^◡𝐹‘𝑦) ∈ ran (1^st ‘𝑅)) → ((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦)) ∈ ran (1^st ‘𝑅))
88	87	3expb 1122	. . . . . . . . . . . . . 14 ⊢ ((𝑅 ∈ RingOps ∧ ((^◡𝐹‘𝑥) ∈ ran (1^st ‘𝑅) ∧ (^◡𝐹‘𝑦) ∈ ran (1^st ‘𝑅))) → ((^◡𝐹‘𝑥)(2^nd ‘𝑅)(^◡𝐹‘𝑦)) ∈ ran (1^st ‘𝑅))
89	28, 88	sylan2 596	. . . . . . . . . . . . 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 471	. . . . . . . . . . . 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 719	. . . . . . . . . . 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 7074	. . . . . . . . . . 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 837	. . . . . . . . . 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 720	. . . . . . . . 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 235	. . . . . . . 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 515	. . . . . . 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 3112	. . . . . 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 35860	. . . . . . . 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 462	. . . . . . 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 484	. . . . . 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 1344	. . . . 5 ⊢ (((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) ∧ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))) → ^◡𝐹 ∈ (𝑆 RngHom 𝑅))
102	1	ad2antll 729	. . . . 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 515	. . . 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 416	. . 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 35873	. . 3 ⊢ ((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) → (𝐹 ∈ (𝑅 RngIso 𝑆) ↔ (𝐹 ∈ (𝑅 RngHom 𝑆) ∧ 𝐹:ran (1^st ‘𝑅)–1-1-onto→ran (1^st ‘𝑆))))
106	30, 37, 29, 12	isrngoiso 35873	. . . 4 ⊢ ((𝑆 ∈ RingOps ∧ 𝑅 ∈ RingOps) → (^◡𝐹 ∈ (𝑆 RngIso 𝑅) ↔ (^◡𝐹 ∈ (𝑆 RngHom 𝑅) ∧ ^◡𝐹:ran (1^st ‘𝑆)–1-1-onto→ran (1^st ‘𝑅))))
107	106	ancoms 462	. . 3 ⊢ ((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) → (^◡𝐹 ∈ (𝑆 RngIso 𝑅) ↔ (^◡𝐹 ∈ (𝑆 RngHom 𝑅) ∧ ^◡𝐹:ran (1^st ‘𝑆)–1-1-onto→ran (1^st ‘𝑅))))
108	104, 105, 107	3imtr4d 297	. 2 ⊢ ((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps) → (𝐹 ∈ (𝑅 RngIso 𝑆) → ^◡𝐹 ∈ (𝑆 RngIso 𝑅)))
109	108	3impia 1119	1 ⊢ ((𝑅 ∈ RingOps ∧ 𝑆 ∈ RingOps ∧ 𝐹 ∈ (𝑅 RngIso 𝑆)) → ^◡𝐹 ∈ (𝑆 RngIso 𝑅))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 209 ∧ wa 399 ∧ w3a 1089 = wceq 1543 ∈ wcel 2110 ∀wral 3061 ^◡ccnv 5550 ran crn 5552 ⟶wf 6376 –1-1→wf1 6377 –1-1-onto→wf1o 6379 ‘cfv 6380 (class class class)co 7213 1^st c1st 7759 2^nd c2nd 7760 GIdcgi 28571 RingOpscrngo 35789 RngHom crnghom 35855 RngIso crngiso 35856

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1803 ax-4 1817 ax-5 1918 ax-6 1976 ax-7 2016 ax-8 2112 ax-9 2120 ax-10 2141 ax-11 2158 ax-12 2175 ax-ext 2708 ax-sep 5192 ax-nul 5199 ax-pow 5258 ax-pr 5322 ax-un 7523

This theorem depends on definitions: df-bi 210 df-an 400 df-or 848 df-3an 1091 df-tru 1546 df-fal 1556 df-ex 1788 df-nf 1792 df-sb 2071 df-mo 2539 df-eu 2568 df-clab 2715 df-cleq 2729 df-clel 2816 df-nfc 2886 df-ne 2941 df-ral 3066 df-rex 3067 df-reu 3068 df-rmo 3069 df-rab 3070 df-v 3410 df-sbc 3695 df-csb 3812 df-dif 3869 df-un 3871 df-in 3873 df-ss 3883 df-nul 4238 df-if 4440 df-pw 4515 df-sn 4542 df-pr 4544 df-op 4548 df-uni 4820 df-iun 4906 df-br 5054 df-opab 5116 df-mpt 5136 df-id 5455 df-xp 5557 df-rel 5558 df-cnv 5559 df-co 5560 df-dm 5561 df-rn 5562 df-res 5563 df-ima 5564 df-iota 6338 df-fun 6382 df-fn 6383 df-f 6384 df-f1 6385 df-fo 6386 df-f1o 6387 df-fv 6388 df-riota 7170 df-ov 7216 df-oprab 7217 df-mpo 7218 df-1st 7761 df-2nd 7762 df-map 8510 df-grpo 28574 df-gid 28575 df-ablo 28626 df-ass 35738 df-exid 35740 df-mgmOLD 35744 df-sgrOLD 35756 df-mndo 35762 df-rngo 35790 df-rngohom 35858 df-rngoiso 35871

This theorem is referenced by: riscer 35883

W3C validator