Metamath Proof Explorer


Theorem rngoisocnv

Description: Obsolete theorem, use rimcnv instead. The inverse of a ring isomorphism is a ring isomorphism. (Contributed by Jeff Madsen, 16-Jun-2011) (Proof modification is discouraged.) (New usage is discouraged.)

Ref Expression
Assertion rngoisocnv ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsIso S → F -1 ∈ S RingOpsIso R

Proof

Step Hyp Ref Expression
1 f1ocnv ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F -1 : ran ⁡ 1 st ⁡ S ⟶ 1-1 onto ran ⁡ 1 st ⁡ R
2 f1of ⊢ F -1 : ran ⁡ 1 st ⁡ S ⟶ 1-1 onto ran ⁡ 1 st ⁡ R → F -1 : ran ⁡ 1 st ⁡ S ⟶ ran ⁡ 1 st ⁡ R
3 1 2 syl ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F -1 : ran ⁡ 1 st ⁡ S ⟶ ran ⁡ 1 st ⁡ R
4 3 ad2antll ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F -1 : ran ⁡ 1 st ⁡ S ⟶ ran ⁡ 1 st ⁡ R
5 eqid ⊢ 2 nd ⁡ R = 2 nd ⁡ R
6 eqid ⊢ GId ⁡ 2 nd ⁡ R = GId ⁡ 2 nd ⁡ R
7 eqid ⊢ 2 nd ⁡ S = 2 nd ⁡ S
8 eqid ⊢ GId ⁡ 2 nd ⁡ S = GId ⁡ 2 nd ⁡ S
9 5 6 7 8 rngohom1 ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S → F ⁡ GId ⁡ 2 nd ⁡ R = GId ⁡ 2 nd ⁡ S
10 9 3expa ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S → F ⁡ GId ⁡ 2 nd ⁡ R = GId ⁡ 2 nd ⁡ S
11 10 adantrr ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F ⁡ GId ⁡ 2 nd ⁡ R = GId ⁡ 2 nd ⁡ S
12 eqid ⊢ ran ⁡ 1 st ⁡ R = ran ⁡ 1 st ⁡ R
13 12 5 6 rngo1cl ⊢ R ∈ RingOps → GId ⁡ 2 nd ⁡ R ∈ ran ⁡ 1 st ⁡ R
14 f1ocnvfv ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ GId ⁡ 2 nd ⁡ R ∈ ran ⁡ 1 st ⁡ R → F ⁡ GId ⁡ 2 nd ⁡ R = GId ⁡ 2 nd ⁡ S → F -1 ⁡ GId ⁡ 2 nd ⁡ S = GId ⁡ 2 nd ⁡ R
15 13 14 sylan2 ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ R ∈ RingOps → F ⁡ GId ⁡ 2 nd ⁡ R = GId ⁡ 2 nd ⁡ S → F -1 ⁡ GId ⁡ 2 nd ⁡ S = GId ⁡ 2 nd ⁡ R
16 15 ancoms ⊢ R ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F ⁡ GId ⁡ 2 nd ⁡ R = GId ⁡ 2 nd ⁡ S → F -1 ⁡ GId ⁡ 2 nd ⁡ S = GId ⁡ 2 nd ⁡ R
17 16 ad2ant2rl ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F ⁡ GId ⁡ 2 nd ⁡ R = GId ⁡ 2 nd ⁡ S → F -1 ⁡ GId ⁡ 2 nd ⁡ S = GId ⁡ 2 nd ⁡ R
18 11 17 mpd ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F -1 ⁡ GId ⁡ 2 nd ⁡ S = GId ⁡ 2 nd ⁡ R
19 f1ocnvfv2 ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x = x
20 f1ocnvfv2 ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ y = y
21 19 20 anim12dan ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x = x ∧ F ⁡ F -1 ⁡ y = y
22 oveq12 ⊢ F ⁡ F -1 ⁡ x = x ∧ F ⁡ F -1 ⁡ y = y → F ⁡ F -1 ⁡ x 1 st ⁡ S F ⁡ F -1 ⁡ y = x 1 st ⁡ S y
23 21 22 syl ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 1 st ⁡ S F ⁡ F -1 ⁡ y = x 1 st ⁡ S y
24 23 adantll ⊢ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 1 st ⁡ S F ⁡ F -1 ⁡ y = x 1 st ⁡ S y
25 24 adantll ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 1 st ⁡ S F ⁡ F -1 ⁡ y = x 1 st ⁡ S y
26 f1ocnvdm ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ x ∈ ran ⁡ 1 st ⁡ R
27 f1ocnvdm ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R
28 26 27 anim12dan ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ x ∈ ran ⁡ 1 st ⁡ R ∧ F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R
29 eqid ⊢ 1 st ⁡ R = 1 st ⁡ R
30 eqid ⊢ 1 st ⁡ S = 1 st ⁡ S
31 29 12 30 rngohomadd ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F -1 ⁡ x ∈ ran ⁡ 1 st ⁡ R ∧ F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R → F ⁡ F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y = F ⁡ F -1 ⁡ x 1 st ⁡ S F ⁡ F -1 ⁡ y
32 28 31 sylan2 ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y = F ⁡ F -1 ⁡ x 1 st ⁡ S F ⁡ F -1 ⁡ y
33 32 exp32 ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S → F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y = F ⁡ F -1 ⁡ x 1 st ⁡ S F ⁡ F -1 ⁡ y
34 33 3expa ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S → F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y = F ⁡ F -1 ⁡ x 1 st ⁡ S F ⁡ F -1 ⁡ y
35 34 impr ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y = F ⁡ F -1 ⁡ x 1 st ⁡ S F ⁡ F -1 ⁡ y
36 35 imp ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y = F ⁡ F -1 ⁡ x 1 st ⁡ S F ⁡ F -1 ⁡ y
37 eqid ⊢ ran ⁡ 1 st ⁡ S = ran ⁡ 1 st ⁡ S
38 30 37 rngogcl ⊢ S ∈ RingOps ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → x 1 st ⁡ S y ∈ ran ⁡ 1 st ⁡ S
39 38 3expb ⊢ S ∈ RingOps ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → x 1 st ⁡ S y ∈ ran ⁡ 1 st ⁡ S
40 f1ocnvfv2 ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x 1 st ⁡ S y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 1 st ⁡ S y = x 1 st ⁡ S y
41 40 ancoms ⊢ x 1 st ⁡ S y ∈ ran ⁡ 1 st ⁡ S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 1 st ⁡ S y = x 1 st ⁡ S y
42 39 41 sylan ⊢ S ∈ RingOps ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 1 st ⁡ S y = x 1 st ⁡ S y
43 42 an32s ⊢ S ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 1 st ⁡ S y = x 1 st ⁡ S y
44 43 adantlll ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 1 st ⁡ S y = x 1 st ⁡ S y
45 44 adantlrl ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 1 st ⁡ S y = x 1 st ⁡ S y
46 25 36 45 3eqtr4rd ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 1 st ⁡ S y = F ⁡ F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y
47 f1of1 ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F : ran ⁡ 1 st ⁡ R ⟶ 1-1 ran ⁡ 1 st ⁡ S
48 47 ad2antlr ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F : ran ⁡ 1 st ⁡ R ⟶ 1-1 ran ⁡ 1 st ⁡ S
49 f1ocnvdm ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x 1 st ⁡ S y ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ x 1 st ⁡ S y ∈ ran ⁡ 1 st ⁡ R
50 49 ancoms ⊢ x 1 st ⁡ S y ∈ ran ⁡ 1 st ⁡ S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F -1 ⁡ x 1 st ⁡ S y ∈ ran ⁡ 1 st ⁡ R
51 39 50 sylan ⊢ S ∈ RingOps ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F -1 ⁡ x 1 st ⁡ S y ∈ ran ⁡ 1 st ⁡ R
52 51 an32s ⊢ S ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ x 1 st ⁡ S y ∈ ran ⁡ 1 st ⁡ R
53 52 adantlll ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ x 1 st ⁡ S y ∈ ran ⁡ 1 st ⁡ R
54 29 12 rngogcl ⊢ R ∈ RingOps ∧ F -1 ⁡ x ∈ ran ⁡ 1 st ⁡ R ∧ F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R → F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R
55 54 3expb ⊢ R ∈ RingOps ∧ F -1 ⁡ x ∈ ran ⁡ 1 st ⁡ R ∧ F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R → F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R
56 28 55 sylan2 ⊢ R ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R
57 56 anassrs ⊢ R ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R
58 57 adantllr ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R
59 f1fveq ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 ran ⁡ 1 st ⁡ S ∧ F -1 ⁡ x 1 st ⁡ S y ∈ ran ⁡ 1 st ⁡ R ∧ F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R → F ⁡ F -1 ⁡ x 1 st ⁡ S y = F ⁡ F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y ↔ F -1 ⁡ x 1 st ⁡ S y = F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y
60 48 53 58 59 syl12anc ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 1 st ⁡ S y = F ⁡ F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y ↔ F -1 ⁡ x 1 st ⁡ S y = F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y
61 60 adantlrl ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 1 st ⁡ S y = F ⁡ F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y ↔ F -1 ⁡ x 1 st ⁡ S y = F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y
62 46 61 mpbid ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ x 1 st ⁡ S y = F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y
63 oveq12 ⊢ F ⁡ F -1 ⁡ x = x ∧ F ⁡ F -1 ⁡ y = y → F ⁡ F -1 ⁡ x 2 nd ⁡ S F ⁡ F -1 ⁡ y = x 2 nd ⁡ S y
64 21 63 syl ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 2 nd ⁡ S F ⁡ F -1 ⁡ y = x 2 nd ⁡ S y
65 64 adantll ⊢ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 2 nd ⁡ S F ⁡ F -1 ⁡ y = x 2 nd ⁡ S y
66 65 adantll ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 2 nd ⁡ S F ⁡ F -1 ⁡ y = x 2 nd ⁡ S y
67 29 12 5 7 rngohommul ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F -1 ⁡ x ∈ ran ⁡ 1 st ⁡ R ∧ F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R → F ⁡ F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y = F ⁡ F -1 ⁡ x 2 nd ⁡ S F ⁡ F -1 ⁡ y
68 28 67 sylan2 ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y = F ⁡ F -1 ⁡ x 2 nd ⁡ S F ⁡ F -1 ⁡ y
69 68 exp32 ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S → F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y = F ⁡ F -1 ⁡ x 2 nd ⁡ S F ⁡ F -1 ⁡ y
70 69 3expa ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S → F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y = F ⁡ F -1 ⁡ x 2 nd ⁡ S F ⁡ F -1 ⁡ y
71 70 impr ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y = F ⁡ F -1 ⁡ x 2 nd ⁡ S F ⁡ F -1 ⁡ y
72 71 imp ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y = F ⁡ F -1 ⁡ x 2 nd ⁡ S F ⁡ F -1 ⁡ y
73 30 7 37 rngocl ⊢ S ∈ RingOps ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → x 2 nd ⁡ S y ∈ ran ⁡ 1 st ⁡ S
74 73 3expb ⊢ S ∈ RingOps ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → x 2 nd ⁡ S y ∈ ran ⁡ 1 st ⁡ S
75 f1ocnvfv2 ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x 2 nd ⁡ S y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 2 nd ⁡ S y = x 2 nd ⁡ S y
76 75 ancoms ⊢ x 2 nd ⁡ S y ∈ ran ⁡ 1 st ⁡ S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 2 nd ⁡ S y = x 2 nd ⁡ S y
77 74 76 sylan ⊢ S ∈ RingOps ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 2 nd ⁡ S y = x 2 nd ⁡ S y
78 77 an32s ⊢ S ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 2 nd ⁡ S y = x 2 nd ⁡ S y
79 78 adantlll ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 2 nd ⁡ S y = x 2 nd ⁡ S y
80 79 adantlrl ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 2 nd ⁡ S y = x 2 nd ⁡ S y
81 66 72 80 3eqtr4rd ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 2 nd ⁡ S y = F ⁡ F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y
82 f1ocnvdm ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x 2 nd ⁡ S y ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ x 2 nd ⁡ S y ∈ ran ⁡ 1 st ⁡ R
83 82 ancoms ⊢ x 2 nd ⁡ S y ∈ ran ⁡ 1 st ⁡ S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F -1 ⁡ x 2 nd ⁡ S y ∈ ran ⁡ 1 st ⁡ R
84 74 83 sylan ⊢ S ∈ RingOps ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F -1 ⁡ x 2 nd ⁡ S y ∈ ran ⁡ 1 st ⁡ R
85 84 an32s ⊢ S ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ x 2 nd ⁡ S y ∈ ran ⁡ 1 st ⁡ R
86 85 adantlll ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ x 2 nd ⁡ S y ∈ ran ⁡ 1 st ⁡ R
87 29 5 12 rngocl ⊢ R ∈ RingOps ∧ F -1 ⁡ x ∈ ran ⁡ 1 st ⁡ R ∧ F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R → F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R
88 87 3expb ⊢ R ∈ RingOps ∧ F -1 ⁡ x ∈ ran ⁡ 1 st ⁡ R ∧ F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R → F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R
89 28 88 sylan2 ⊢ R ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R
90 89 anassrs ⊢ R ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R
91 90 adantllr ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R
92 f1fveq ⊢ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 ran ⁡ 1 st ⁡ S ∧ F -1 ⁡ x 2 nd ⁡ S y ∈ ran ⁡ 1 st ⁡ R ∧ F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y ∈ ran ⁡ 1 st ⁡ R → F ⁡ F -1 ⁡ x 2 nd ⁡ S y = F ⁡ F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y ↔ F -1 ⁡ x 2 nd ⁡ S y = F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y
93 48 86 91 92 syl12anc ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 2 nd ⁡ S y = F ⁡ F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y ↔ F -1 ⁡ x 2 nd ⁡ S y = F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y
94 93 adantlrl ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F ⁡ F -1 ⁡ x 2 nd ⁡ S y = F ⁡ F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y ↔ F -1 ⁡ x 2 nd ⁡ S y = F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y
95 81 94 mpbid ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ x 2 nd ⁡ S y = F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y
96 62 95 jca ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S ∧ x ∈ ran ⁡ 1 st ⁡ S ∧ y ∈ ran ⁡ 1 st ⁡ S → F -1 ⁡ x 1 st ⁡ S y = F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y ∧ F -1 ⁡ x 2 nd ⁡ S y = F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y
97 96 ralrimivva ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → ∀ x ∈ ran ⁡ 1 st ⁡ S ∀ y ∈ ran ⁡ 1 st ⁡ S F -1 ⁡ x 1 st ⁡ S y = F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y ∧ F -1 ⁡ x 2 nd ⁡ S y = F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y
98 30 7 37 8 29 5 12 6 isrngohom ⊢ S ∈ RingOps ∧ R ∈ RingOps → F -1 ∈ S RingOpsHom R ↔ F -1 : ran ⁡ 1 st ⁡ S ⟶ ran ⁡ 1 st ⁡ R ∧ F -1 ⁡ GId ⁡ 2 nd ⁡ S = GId ⁡ 2 nd ⁡ R ∧ ∀ x ∈ ran ⁡ 1 st ⁡ S ∀ y ∈ ran ⁡ 1 st ⁡ S F -1 ⁡ x 1 st ⁡ S y = F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y ∧ F -1 ⁡ x 2 nd ⁡ S y = F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y
99 98 ancoms ⊢ R ∈ RingOps ∧ S ∈ RingOps → F -1 ∈ S RingOpsHom R ↔ F -1 : ran ⁡ 1 st ⁡ S ⟶ ran ⁡ 1 st ⁡ R ∧ F -1 ⁡ GId ⁡ 2 nd ⁡ S = GId ⁡ 2 nd ⁡ R ∧ ∀ x ∈ ran ⁡ 1 st ⁡ S ∀ y ∈ ran ⁡ 1 st ⁡ S F -1 ⁡ x 1 st ⁡ S y = F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y ∧ F -1 ⁡ x 2 nd ⁡ S y = F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y
100 99 adantr ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F -1 ∈ S RingOpsHom R ↔ F -1 : ran ⁡ 1 st ⁡ S ⟶ ran ⁡ 1 st ⁡ R ∧ F -1 ⁡ GId ⁡ 2 nd ⁡ S = GId ⁡ 2 nd ⁡ R ∧ ∀ x ∈ ran ⁡ 1 st ⁡ S ∀ y ∈ ran ⁡ 1 st ⁡ S F -1 ⁡ x 1 st ⁡ S y = F -1 ⁡ x 1 st ⁡ R F -1 ⁡ y ∧ F -1 ⁡ x 2 nd ⁡ S y = F -1 ⁡ x 2 nd ⁡ R F -1 ⁡ y
101 4 18 97 100 mpbir3and ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F -1 ∈ S RingOpsHom R
102 1 ad2antll ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F -1 : ran ⁡ 1 st ⁡ S ⟶ 1-1 onto ran ⁡ 1 st ⁡ R
103 101 102 jca ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F -1 ∈ S RingOpsHom R ∧ F -1 : ran ⁡ 1 st ⁡ S ⟶ 1-1 onto ran ⁡ 1 st ⁡ R
104 103 ex ⊢ R ∈ RingOps ∧ S ∈ RingOps → F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S → F -1 ∈ S RingOpsHom R ∧ F -1 : ran ⁡ 1 st ⁡ S ⟶ 1-1 onto ran ⁡ 1 st ⁡ R
105 29 12 30 37 isrngoiso ⊢ R ∈ RingOps ∧ S ∈ RingOps → F ∈ R RingOpsIso S ↔ F ∈ R RingOpsHom S ∧ F : ran ⁡ 1 st ⁡ R ⟶ 1-1 onto ran ⁡ 1 st ⁡ S
106 30 37 29 12 isrngoiso ⊢ S ∈ RingOps ∧ R ∈ RingOps → F -1 ∈ S RingOpsIso R ↔ F -1 ∈ S RingOpsHom R ∧ F -1 : ran ⁡ 1 st ⁡ S ⟶ 1-1 onto ran ⁡ 1 st ⁡ R
107 106 ancoms ⊢ R ∈ RingOps ∧ S ∈ RingOps → F -1 ∈ S RingOpsIso R ↔ F -1 ∈ S RingOpsHom R ∧ F -1 : ran ⁡ 1 st ⁡ S ⟶ 1-1 onto ran ⁡ 1 st ⁡ R
108 104 105 107 3imtr4d ⊢ R ∈ RingOps ∧ S ∈ RingOps → F ∈ R RingOpsIso S → F -1 ∈ S RingOpsIso R
109 108 3impia ⊢ R ∈ RingOps ∧ S ∈ RingOps ∧ F ∈ R RingOpsIso S → F -1 ∈ S RingOpsIso R