ringcinv - Mathbox for Alexander van der Vekens

	Mathbox for Alexander van der Vekens		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > ringcinv		Structured version Visualization version GIF version

Theorem ringcinv 44310

Description: An inverse in the category of unital rings is the converse operation. (Contributed by AV, 14-Feb-2020.)

**Hypotheses**
Ref	Expression
ringcsect.c	⊢ 𝐶 = (RingCat‘𝑈)
ringcsect.b	⊢ 𝐵 = (Base‘𝐶)
ringcsect.u	⊢ (𝜑 → 𝑈 ∈ 𝑉)
ringcsect.x	⊢ (𝜑 → 𝑋 ∈ 𝐵)
ringcsect.y	⊢ (𝜑 → 𝑌 ∈ 𝐵)
ringcinv.n	⊢ 𝑁 = (Inv‘𝐶)

**Assertion**
Ref	Expression
ringcinv	⊢ (𝜑 → (𝐹(𝑋𝑁𝑌)𝐺 ↔ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)))

**Proof of Theorem ringcinv**
Step	Hyp	Ref	Expression
1		ringcsect.b	. . 3 ⊢ 𝐵 = (Base‘𝐶)
2		ringcinv.n	. . 3 ⊢ 𝑁 = (Inv‘𝐶)
3		ringcsect.u	. . . 4 ⊢ (𝜑 → 𝑈 ∈ 𝑉)
4		ringcsect.c	. . . . 5 ⊢ 𝐶 = (RingCat‘𝑈)
5	4	ringccat 44302	. . . 4 ⊢ (𝑈 ∈ 𝑉 → 𝐶 ∈ Cat)
6	3, 5	syl 17	. . 3 ⊢ (𝜑 → 𝐶 ∈ Cat)
7		ringcsect.x	. . 3 ⊢ (𝜑 → 𝑋 ∈ 𝐵)
8		ringcsect.y	. . 3 ⊢ (𝜑 → 𝑌 ∈ 𝐵)
9		eqid 2824	. . 3 ⊢ (Sect‘𝐶) = (Sect‘𝐶)
10	1, 2, 6, 7, 8, 9	isinv 17033	. 2 ⊢ (𝜑 → (𝐹(𝑋𝑁𝑌)𝐺 ↔ (𝐹(𝑋(Sect‘𝐶)𝑌)𝐺 ∧ 𝐺(𝑌(Sect‘𝐶)𝑋)𝐹)))
11		eqid 2824	. . . . . 6 ⊢ (Base‘𝑋) = (Base‘𝑋)
12	4, 1, 3, 7, 8, 11, 9	ringcsect 44309	. . . . 5 ⊢ (𝜑 → (𝐹(𝑋(Sect‘𝐶)𝑌)𝐺 ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))))
13		df-3an 1085	. . . . 5 ⊢ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ↔ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))))
14	12, 13	syl6bb 289	. . . 4 ⊢ (𝜑 → (𝐹(𝑋(Sect‘𝐶)𝑌)𝐺 ↔ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))))
15		eqid 2824	. . . . . 6 ⊢ (Base‘𝑌) = (Base‘𝑌)
16	4, 1, 3, 8, 7, 15, 9	ringcsect 44309	. . . . 5 ⊢ (𝜑 → (𝐺(𝑌(Sect‘𝐶)𝑋)𝐹 ↔ (𝐺 ∈ (𝑌 RingHom 𝑋) ∧ 𝐹 ∈ (𝑋 RingHom 𝑌) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))))
17		3ancoma 1094	. . . . . 6 ⊢ ((𝐺 ∈ (𝑌 RingHom 𝑋) ∧ 𝐹 ∈ (𝑋 RingHom 𝑌) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))
18		df-3an 1085	. . . . . 6 ⊢ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))) ↔ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))
19	17, 18	bitri 277	. . . . 5 ⊢ ((𝐺 ∈ (𝑌 RingHom 𝑋) ∧ 𝐹 ∈ (𝑋 RingHom 𝑌) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))) ↔ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))
20	16, 19	syl6bb 289	. . . 4 ⊢ (𝜑 → (𝐺(𝑌(Sect‘𝐶)𝑋)𝐹 ↔ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))))
21	14, 20	anbi12d 632	. . 3 ⊢ (𝜑 → ((𝐹(𝑋(Sect‘𝐶)𝑌)𝐺 ∧ 𝐺(𝑌(Sect‘𝐶)𝑋)𝐹) ↔ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))))
22		anandi 674	. . 3 ⊢ ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) ↔ ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))))
23	21, 22	syl6bb 289	. 2 ⊢ (𝜑 → ((𝐹(𝑋(Sect‘𝐶)𝑌)𝐺 ∧ 𝐺(𝑌(Sect‘𝐶)𝑋)𝐹) ↔ ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))))
24		simplrl 775	. . . . . 6 ⊢ (((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) → 𝐹 ∈ (𝑋 RingHom 𝑌))
25	24	adantl 484	. . . . 5 ⊢ ((𝜑 ∧ ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) → 𝐹 ∈ (𝑋 RingHom 𝑌))
26	11, 15	rhmf 19481	. . . . . . . . . 10 ⊢ (𝐹 ∈ (𝑋 RingHom 𝑌) → 𝐹:(Base‘𝑋)⟶(Base‘𝑌))
27	15, 11	rhmf 19481	. . . . . . . . . 10 ⊢ (𝐺 ∈ (𝑌 RingHom 𝑋) → 𝐺:(Base‘𝑌)⟶(Base‘𝑋))
28	26, 27	anim12i 614	. . . . . . . . 9 ⊢ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) → (𝐹:(Base‘𝑋)⟶(Base‘𝑌) ∧ 𝐺:(Base‘𝑌)⟶(Base‘𝑋)))
29	28	ad2antlr 725	. . . . . . . 8 ⊢ (((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) → (𝐹:(Base‘𝑋)⟶(Base‘𝑌) ∧ 𝐺:(Base‘𝑌)⟶(Base‘𝑋)))
30		simpr 487	. . . . . . . . 9 ⊢ ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))) → (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))
31	30	adantl 484	. . . . . . . 8 ⊢ (((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) → (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))
32		simpr 487	. . . . . . . . 9 ⊢ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) → (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))
33	32	ad2antrl 726	. . . . . . . 8 ⊢ (((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) → (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))
34	29, 31, 33	jca32 518	. . . . . . 7 ⊢ (((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) → ((𝐹:(Base‘𝑋)⟶(Base‘𝑌) ∧ 𝐺:(Base‘𝑌)⟶(Base‘𝑋)) ∧ ((𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))))
35	34	adantl 484	. . . . . 6 ⊢ ((𝜑 ∧ ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) → ((𝐹:(Base‘𝑋)⟶(Base‘𝑌) ∧ 𝐺:(Base‘𝑌)⟶(Base‘𝑋)) ∧ ((𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))))
36		fcof1o 7055	. . . . . . 7 ⊢ (((𝐹:(Base‘𝑋)⟶(Base‘𝑌) ∧ 𝐺:(Base‘𝑌)⟶(Base‘𝑋)) ∧ ((𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))) → (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ ^◡𝐹 = 𝐺))
37		eqcom 2831	. . . . . . . 8 ⊢ (^◡𝐹 = 𝐺 ↔ 𝐺 = ^◡𝐹)
38	37	anbi2i 624	. . . . . . 7 ⊢ ((𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ ^◡𝐹 = 𝐺) ↔ (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ 𝐺 = ^◡𝐹))
39	36, 38	sylib 220	. . . . . 6 ⊢ (((𝐹:(Base‘𝑋)⟶(Base‘𝑌) ∧ 𝐺:(Base‘𝑌)⟶(Base‘𝑋)) ∧ ((𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))) → (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ 𝐺 = ^◡𝐹))
40	35, 39	syl 17	. . . . 5 ⊢ ((𝜑 ∧ ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) → (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ 𝐺 = ^◡𝐹))
41		anass 471	. . . . 5 ⊢ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌)) ∧ 𝐺 = ^◡𝐹) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ 𝐺 = ^◡𝐹)))
42	25, 40, 41	sylanbrc 585	. . . 4 ⊢ ((𝜑 ∧ ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) → ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌)) ∧ 𝐺 = ^◡𝐹))
43	11, 15	isrim 19488	. . . . . . 7 ⊢ ((𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝐹 ∈ (𝑋 RingIso 𝑌) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌))))
44	7, 8, 43	syl2anc 586	. . . . . 6 ⊢ (𝜑 → (𝐹 ∈ (𝑋 RingIso 𝑌) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌))))
45	44	anbi1d 631	. . . . 5 ⊢ (𝜑 → ((𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹) ↔ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌)) ∧ 𝐺 = ^◡𝐹)))
46	45	adantr 483	. . . 4 ⊢ ((𝜑 ∧ ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) → ((𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹) ↔ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌)) ∧ 𝐺 = ^◡𝐹)))
47	42, 46	mpbird 259	. . 3 ⊢ ((𝜑 ∧ ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) → (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹))
48	11, 15	rimrhm 19490	. . . . . 6 ⊢ (𝐹 ∈ (𝑋 RingIso 𝑌) → 𝐹 ∈ (𝑋 RingHom 𝑌))
49	48	ad2antrl 726	. . . . 5 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)) → 𝐹 ∈ (𝑋 RingHom 𝑌))
50		isrim0 19478	. . . . . . . . . . 11 ⊢ ((𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝐹 ∈ (𝑋 RingIso 𝑌) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ ^◡𝐹 ∈ (𝑌 RingHom 𝑋))))
51	7, 8, 50	syl2anc 586	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹 ∈ (𝑋 RingIso 𝑌) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ ^◡𝐹 ∈ (𝑌 RingHom 𝑋))))
52		eleq1 2903	. . . . . . . . . . . 12 ⊢ (^◡𝐹 = 𝐺 → (^◡𝐹 ∈ (𝑌 RingHom 𝑋) ↔ 𝐺 ∈ (𝑌 RingHom 𝑋)))
53	52	eqcoms 2832	. . . . . . . . . . 11 ⊢ (𝐺 = ^◡𝐹 → (^◡𝐹 ∈ (𝑌 RingHom 𝑋) ↔ 𝐺 ∈ (𝑌 RingHom 𝑋)))
54	53	anbi2d 630	. . . . . . . . . 10 ⊢ (𝐺 = ^◡𝐹 → ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ ^◡𝐹 ∈ (𝑌 RingHom 𝑋)) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))))
55	51, 54	sylan9bbr 513	. . . . . . . . 9 ⊢ ((𝐺 = ^◡𝐹 ∧ 𝜑) → (𝐹 ∈ (𝑋 RingIso 𝑌) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))))
56		simpr 487	. . . . . . . . 9 ⊢ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) → 𝐺 ∈ (𝑌 RingHom 𝑋))
57	55, 56	syl6bi 255	. . . . . . . 8 ⊢ ((𝐺 = ^◡𝐹 ∧ 𝜑) → (𝐹 ∈ (𝑋 RingIso 𝑌) → 𝐺 ∈ (𝑌 RingHom 𝑋)))
58	57	com12 32	. . . . . . 7 ⊢ (𝐹 ∈ (𝑋 RingIso 𝑌) → ((𝐺 = ^◡𝐹 ∧ 𝜑) → 𝐺 ∈ (𝑌 RingHom 𝑋)))
59	58	expdimp 455	. . . . . 6 ⊢ ((𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹) → (𝜑 → 𝐺 ∈ (𝑌 RingHom 𝑋)))
60	59	impcom 410	. . . . 5 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)) → 𝐺 ∈ (𝑌 RingHom 𝑋))
61		coeq1 5731	. . . . . . 7 ⊢ (𝐺 = ^◡𝐹 → (𝐺 ∘ 𝐹) = (^◡𝐹 ∘ 𝐹))
62	61	ad2antll 727	. . . . . 6 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)) → (𝐺 ∘ 𝐹) = (^◡𝐹 ∘ 𝐹))
63	11, 15	rimf1o 19489	. . . . . . . 8 ⊢ (𝐹 ∈ (𝑋 RingIso 𝑌) → 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌))
64	63	ad2antrl 726	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)) → 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌))
65		f1ococnv1 6646	. . . . . . 7 ⊢ (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) → (^◡𝐹 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))
66	64, 65	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)) → (^◡𝐹 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))
67	62, 66	eqtrd 2859	. . . . 5 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)) → (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))
68	49, 60, 67	jca31 517	. . . 4 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)) → ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))))
69	51	biimpcd 251	. . . . . . 7 ⊢ (𝐹 ∈ (𝑋 RingIso 𝑌) → (𝜑 → (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ ^◡𝐹 ∈ (𝑌 RingHom 𝑋))))
70	69	adantr 483	. . . . . 6 ⊢ ((𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹) → (𝜑 → (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ ^◡𝐹 ∈ (𝑌 RingHom 𝑋))))
71	70	impcom 410	. . . . 5 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)) → (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ ^◡𝐹 ∈ (𝑌 RingHom 𝑋)))
72		eleq1 2903	. . . . . . 7 ⊢ (𝐺 = ^◡𝐹 → (𝐺 ∈ (𝑌 RingHom 𝑋) ↔ ^◡𝐹 ∈ (𝑌 RingHom 𝑋)))
73	72	ad2antll 727	. . . . . 6 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)) → (𝐺 ∈ (𝑌 RingHom 𝑋) ↔ ^◡𝐹 ∈ (𝑌 RingHom 𝑋)))
74	73	anbi2d 630	. . . . 5 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)) → ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ ^◡𝐹 ∈ (𝑌 RingHom 𝑋))))
75	71, 74	mpbird 259	. . . 4 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)) → (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)))
76		coeq2 5732	. . . . . . 7 ⊢ (𝐺 = ^◡𝐹 → (𝐹 ∘ 𝐺) = (𝐹 ∘ ^◡𝐹))
77	76	ad2antll 727	. . . . . 6 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)) → (𝐹 ∘ 𝐺) = (𝐹 ∘ ^◡𝐹))
78		f1ococnv2 6644	. . . . . . 7 ⊢ (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) → (𝐹 ∘ ^◡𝐹) = ( I ↾ (Base‘𝑌)))
79	64, 78	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)) → (𝐹 ∘ ^◡𝐹) = ( I ↾ (Base‘𝑌)))
80	77, 79	eqtrd 2859	. . . . 5 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)) → (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))
81	75, 67, 80	jca31 517	. . . 4 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)) → (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))
82	68, 75, 81	jca31 517	. . 3 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)) → ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))))
83	47, 82	impbida 799	. 2 ⊢ (𝜑 → (((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) ↔ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)))
84	10, 23, 83	3bitrd 307	1 ⊢ (𝜑 → (𝐹(𝑋𝑁𝑌)𝐺 ↔ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ^◡𝐹)))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 208 ∧ wa 398 ∧ w3a 1083 = wceq 1536 ∈ wcel 2113 class class class wbr 5069 I cid 5462 ^◡ccnv 5557 ↾ cres 5560 ∘ ccom 5562 ⟶wf 6354 –1-1-onto→wf1o 6357 ‘cfv 6358 (class class class)co 7159 Basecbs 16486 Catccat 16938 Sectcsect 17017 Invcinv 17018 RingHom crh 19467 RingIso crs 19468 RingCatcringc 44281

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1969 ax-7 2014 ax-8 2115 ax-9 2123 ax-10 2144 ax-11 2160 ax-12 2176 ax-ext 2796 ax-rep 5193 ax-sep 5206 ax-nul 5213 ax-pow 5269 ax-pr 5333 ax-un 7464 ax-cnex 10596 ax-resscn 10597 ax-1cn 10598 ax-icn 10599 ax-addcl 10600 ax-addrcl 10601 ax-mulcl 10602 ax-mulrcl 10603 ax-mulcom 10604 ax-addass 10605 ax-mulass 10606 ax-distr 10607 ax-i2m1 10608 ax-1ne0 10609 ax-1rid 10610 ax-rnegex 10611 ax-rrecex 10612 ax-cnre 10613 ax-pre-lttri 10614 ax-pre-lttrn 10615 ax-pre-ltadd 10616 ax-pre-mulgt0 10617

This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1084 df-3an 1085 df-tru 1539 df-fal 1549 df-ex 1780 df-nf 1784 df-sb 2069 df-mo 2621 df-eu 2653 df-clab 2803 df-cleq 2817 df-clel 2896 df-nfc 2966 df-ne 3020 df-nel 3127 df-ral 3146 df-rex 3147 df-reu 3148 df-rmo 3149 df-rab 3150 df-v 3499 df-sbc 3776 df-csb 3887 df-dif 3942 df-un 3944 df-in 3946 df-ss 3955 df-pss 3957 df-nul 4295 df-if 4471 df-pw 4544 df-sn 4571 df-pr 4573 df-tp 4575 df-op 4577 df-uni 4842 df-int 4880 df-iun 4924 df-br 5070 df-opab 5132 df-mpt 5150 df-tr 5176 df-id 5463 df-eprel 5468 df-po 5477 df-so 5478 df-fr 5517 df-we 5519 df-xp 5564 df-rel 5565 df-cnv 5566 df-co 5567 df-dm 5568 df-rn 5569 df-res 5570 df-ima 5571 df-pred 6151 df-ord 6197 df-on 6198 df-lim 6199 df-suc 6200 df-iota 6317 df-fun 6360 df-fn 6361 df-f 6362 df-f1 6363 df-fo 6364 df-f1o 6365 df-fv 6366 df-riota 7117 df-ov 7162 df-oprab 7163 df-mpo 7164 df-om 7584 df-1st 7692 df-2nd 7693 df-wrecs 7950 df-recs 8011 df-rdg 8049 df-1o 8105 df-oadd 8109 df-er 8292 df-map 8411 df-pm 8412 df-ixp 8465 df-en 8513 df-dom 8514 df-sdom 8515 df-fin 8516 df-pnf 10680 df-mnf 10681 df-xr 10682 df-ltxr 10683 df-le 10684 df-sub 10875 df-neg 10876 df-nn 11642 df-2 11703 df-3 11704 df-4 11705 df-5 11706 df-6 11707 df-7 11708 df-8 11709 df-9 11710 df-n0 11901 df-z 11985 df-dec 12102 df-uz 12247 df-fz 12896 df-struct 16488 df-ndx 16489 df-slot 16490 df-base 16492 df-sets 16493 df-ress 16494 df-plusg 16581 df-hom 16592 df-cco 16593 df-0g 16718 df-cat 16942 df-cid 16943 df-homf 16944 df-sect 17020 df-inv 17021 df-ssc 17083 df-resc 17084 df-subc 17085 df-estrc 17376 df-mgm 17855 df-sgrp 17904 df-mnd 17915 df-mhm 17959 df-grp 18109 df-ghm 18359 df-mgp 19243 df-ur 19255 df-ring 19302 df-rnghom 19470 df-rngiso 19471 df-ringc 44283

This theorem is referenced by: ringciso 44311

W3C validator