Theorem ringcinvALTV 44401

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

Hypotheses

Ref	Expression
ringcsectALTV.c	⊢ 𝐶 = (RingCatALTV‘𝑈)
ringcsectALTV.b	⊢ 𝐵 = (Base‘𝐶)
ringcsectALTV.u	⊢ (𝜑 → 𝑈 ∈ 𝑉)
ringcsectALTV.x	⊢ (𝜑 → 𝑋 ∈ 𝐵)
ringcsectALTV.y	⊢ (𝜑 → 𝑌 ∈ 𝐵)
ringcinvALTV.n	⊢ 𝑁 = (Inv‘𝐶)

Assertion

Ref	Expression
ringcinvALTV	⊢ (𝜑 → (𝐹(𝑋𝑁𝑌)𝐺 ↔ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)))

Proof of Theorem ringcinvALTV

Step	Hyp	Ref	Expression
1		ringcsectALTV.b	. . 3 ⊢ 𝐵 = (Base‘𝐶)
2		ringcinvALTV.n	. . 3 ⊢ 𝑁 = (Inv‘𝐶)
3		ringcsectALTV.u	. . . 4 ⊢ (𝜑 → 𝑈 ∈ 𝑉)
4		ringcsectALTV.c	. . . . 5 ⊢ 𝐶 = (RingCatALTV‘𝑈)
5	4	ringccatALTV 44398	. . . 4 ⊢ (𝑈 ∈ 𝑉 → 𝐶 ∈ Cat)
6	3, 5	syl 17	. . 3 ⊢ (𝜑 → 𝐶 ∈ Cat)
7		ringcsectALTV.x	. . 3 ⊢ (𝜑 → 𝑋 ∈ 𝐵)
8		ringcsectALTV.y	. . 3 ⊢ (𝜑 → 𝑌 ∈ 𝐵)
9		eqid 2820	. . 3 ⊢ (Sect‘𝐶) = (Sect‘𝐶)
10	1, 2, 6, 7, 8, 9	isinv 17026	. 2 ⊢ (𝜑 → (𝐹(𝑋𝑁𝑌)𝐺 ↔ (𝐹(𝑋(Sect‘𝐶)𝑌)𝐺 ∧ 𝐺(𝑌(Sect‘𝐶)𝑋)𝐹)))
11		eqid 2820	. . . . . 6 ⊢ (Base‘𝑋) = (Base‘𝑋)
12	4, 1, 3, 7, 8, 11, 9	ringcsectALTV 44400	. . . . 5 ⊢ (𝜑 → (𝐹(𝑋(Sect‘𝐶)𝑌)𝐺 ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))))
13		df-3an 1084	. . . . 5 ⊢ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ↔ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))))
14	12, 13	syl6bb 289	. . . 4 ⊢ (𝜑 → (𝐹(𝑋(Sect‘𝐶)𝑌)𝐺 ↔ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))))
15		eqid 2820	. . . . . 6 ⊢ (Base‘𝑌) = (Base‘𝑌)
16	4, 1, 3, 8, 7, 15, 9	ringcsectALTV 44400	. . . . 5 ⊢ (𝜑 → (𝐺(𝑌(Sect‘𝐶)𝑋)𝐹 ↔ (𝐺 ∈ (𝑌 RingHom 𝑋) ∧ 𝐹 ∈ (𝑋 RingHom 𝑌) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))))
17		3ancoma 1093	. . . . . 6 ⊢ ((𝐺 ∈ (𝑌 RingHom 𝑋) ∧ 𝐹 ∈ (𝑋 RingHom 𝑌) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))
18		df-3an 1084	. . . . . 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 19474	. . . . . . . . . 10 ⊢ (𝐹 ∈ (𝑋 RingHom 𝑌) → 𝐹:(Base‘𝑋)⟶(Base‘𝑌))
27	15, 11	rhmf 19474	. . . . . . . . . 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	. . . . . . . . . 10 ⊢ ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))) → (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))
31	30	adantl 484	. . . . . . . . 9 ⊢ (((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) → (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))
32		simpr 487	. . . . . . . . . 10 ⊢ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) → (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))
33	32	ad2antrl 726	. . . . . . . . 9 ⊢ (((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) → (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))
34	31, 33	jca 514	. . . . . . . 8 ⊢ (((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) → ((𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))))
35	29, 34	jca 514	. . . . . . 7 ⊢ (((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) → ((𝐹:(Base‘𝑋)⟶(Base‘𝑌) ∧ 𝐺:(Base‘𝑌)⟶(Base‘𝑋)) ∧ ((𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))))
36	35	adantl 484	. . . . . 6 ⊢ ((𝜑 ∧ ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) → ((𝐹:(Base‘𝑋)⟶(Base‘𝑌) ∧ 𝐺:(Base‘𝑌)⟶(Base‘𝑋)) ∧ ((𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))))
37		fcof1o 7049	. . . . . . 7 ⊢ (((𝐹:(Base‘𝑋)⟶(Base‘𝑌) ∧ 𝐺:(Base‘𝑌)⟶(Base‘𝑋)) ∧ ((𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))) → (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ ◡𝐹 = 𝐺))
38		eqcom 2827	. . . . . . . 8 ⊢ (◡𝐹 = 𝐺 ↔ 𝐺 = ◡𝐹)
39	38	anbi2i 624	. . . . . . 7 ⊢ ((𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ ◡𝐹 = 𝐺) ↔ (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ 𝐺 = ◡𝐹))
40	37, 39	sylib 220	. . . . . 6 ⊢ (((𝐹:(Base‘𝑋)⟶(Base‘𝑌) ∧ 𝐺:(Base‘𝑌)⟶(Base‘𝑋)) ∧ ((𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))) → (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ 𝐺 = ◡𝐹))
41	36, 40	syl 17	. . . . 5 ⊢ ((𝜑 ∧ ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) → (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ 𝐺 = ◡𝐹))
42		anass 471	. . . . 5 ⊢ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌)) ∧ 𝐺 = ◡𝐹) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ 𝐺 = ◡𝐹)))
43	25, 41, 42	sylanbrc 585	. . . 4 ⊢ ((𝜑 ∧ ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) → ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌)) ∧ 𝐺 = ◡𝐹))
44	7, 8	jca 514	. . . . . . 7 ⊢ (𝜑 → (𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵))
45	11, 15	isrim 19481	. . . . . . 7 ⊢ ((𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝐹 ∈ (𝑋 RingIso 𝑌) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌))))
46	44, 45	syl 17	. . . . . 6 ⊢ (𝜑 → (𝐹 ∈ (𝑋 RingIso 𝑌) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌))))
47	46	anbi1d 631	. . . . 5 ⊢ (𝜑 → ((𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹) ↔ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌)) ∧ 𝐺 = ◡𝐹)))
48	47	adantr 483	. . . 4 ⊢ ((𝜑 ∧ ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) → ((𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹) ↔ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌)) ∧ 𝐺 = ◡𝐹)))
49	43, 48	mpbird 259	. . 3 ⊢ ((𝜑 ∧ ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) → (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹))
50	11, 15	rimrhm 19483	. . . . . 6 ⊢ (𝐹 ∈ (𝑋 RingIso 𝑌) → 𝐹 ∈ (𝑋 RingHom 𝑌))
51	50	ad2antrl 726	. . . . 5 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)) → 𝐹 ∈ (𝑋 RingHom 𝑌))
52		isrim0 19471	. . . . . . . . . . 11 ⊢ ((𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝐹 ∈ (𝑋 RingIso 𝑌) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ ◡𝐹 ∈ (𝑌 RingHom 𝑋))))
53	44, 52	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (𝐹 ∈ (𝑋 RingIso 𝑌) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ ◡𝐹 ∈ (𝑌 RingHom 𝑋))))
54		eleq1 2899	. . . . . . . . . . . 12 ⊢ (◡𝐹 = 𝐺 → (◡𝐹 ∈ (𝑌 RingHom 𝑋) ↔ 𝐺 ∈ (𝑌 RingHom 𝑋)))
55	54	eqcoms 2828	. . . . . . . . . . 11 ⊢ (𝐺 = ◡𝐹 → (◡𝐹 ∈ (𝑌 RingHom 𝑋) ↔ 𝐺 ∈ (𝑌 RingHom 𝑋)))
56	55	anbi2d 630	. . . . . . . . . 10 ⊢ (𝐺 = ◡𝐹 → ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ ◡𝐹 ∈ (𝑌 RingHom 𝑋)) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))))
57	53, 56	sylan9bbr 513	. . . . . . . . 9 ⊢ ((𝐺 = ◡𝐹 ∧ 𝜑) → (𝐹 ∈ (𝑋 RingIso 𝑌) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))))
58		simpr 487	. . . . . . . . 9 ⊢ ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) → 𝐺 ∈ (𝑌 RingHom 𝑋))
59	57, 58	syl6bi 255	. . . . . . . 8 ⊢ ((𝐺 = ◡𝐹 ∧ 𝜑) → (𝐹 ∈ (𝑋 RingIso 𝑌) → 𝐺 ∈ (𝑌 RingHom 𝑋)))
60	59	com12 32	. . . . . . 7 ⊢ (𝐹 ∈ (𝑋 RingIso 𝑌) → ((𝐺 = ◡𝐹 ∧ 𝜑) → 𝐺 ∈ (𝑌 RingHom 𝑋)))
61	60	expdimp 455	. . . . . 6 ⊢ ((𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹) → (𝜑 → 𝐺 ∈ (𝑌 RingHom 𝑋)))
62	61	impcom 410	. . . . 5 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)) → 𝐺 ∈ (𝑌 RingHom 𝑋))
63		coeq1 5725	. . . . . . 7 ⊢ (𝐺 = ◡𝐹 → (𝐺 ∘ 𝐹) = (◡𝐹 ∘ 𝐹))
64	63	ad2antll 727	. . . . . 6 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)) → (𝐺 ∘ 𝐹) = (◡𝐹 ∘ 𝐹))
65	11, 15	rimf1o 19482	. . . . . . . 8 ⊢ (𝐹 ∈ (𝑋 RingIso 𝑌) → 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌))
66	65	ad2antrl 726	. . . . . . 7 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)) → 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌))
67		f1ococnv1 6640	. . . . . . 7 ⊢ (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) → (◡𝐹 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))
68	66, 67	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)) → (◡𝐹 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))
69	64, 68	eqtrd 2855	. . . . 5 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)) → (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))
70	51, 62, 69	jca31 517	. . . 4 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)) → ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))))
71	53	biimpcd 251	. . . . . . 7 ⊢ (𝐹 ∈ (𝑋 RingIso 𝑌) → (𝜑 → (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ ◡𝐹 ∈ (𝑌 RingHom 𝑋))))
72	71	adantr 483	. . . . . 6 ⊢ ((𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹) → (𝜑 → (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ ◡𝐹 ∈ (𝑌 RingHom 𝑋))))
73	72	impcom 410	. . . . 5 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)) → (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ ◡𝐹 ∈ (𝑌 RingHom 𝑋)))
74		eleq1 2899	. . . . . . 7 ⊢ (𝐺 = ◡𝐹 → (𝐺 ∈ (𝑌 RingHom 𝑋) ↔ ◡𝐹 ∈ (𝑌 RingHom 𝑋)))
75	74	ad2antll 727	. . . . . 6 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)) → (𝐺 ∈ (𝑌 RingHom 𝑋) ↔ ◡𝐹 ∈ (𝑌 RingHom 𝑋)))
76	75	anbi2d 630	. . . . 5 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)) → ((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ↔ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ ◡𝐹 ∈ (𝑌 RingHom 𝑋))))
77	73, 76	mpbird 259	. . . 4 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)) → (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)))
78		coeq2 5726	. . . . . . 7 ⊢ (𝐺 = ◡𝐹 → (𝐹 ∘ 𝐺) = (𝐹 ∘ ◡𝐹))
79	78	ad2antll 727	. . . . . 6 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)) → (𝐹 ∘ 𝐺) = (𝐹 ∘ ◡𝐹))
80		f1ococnv2 6638	. . . . . . 7 ⊢ (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) → (𝐹 ∘ ◡𝐹) = ( I ↾ (Base‘𝑌)))
81	66, 80	syl 17	. . . . . 6 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)) → (𝐹 ∘ ◡𝐹) = ( I ↾ (Base‘𝑌)))
82	79, 81	eqtrd 2855	. . . . 5 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)) → (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))
83	77, 69, 82	jca31 517	. . . 4 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)) → (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))
84	70, 77, 83	jca31 517	. . 3 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)) → ((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))))
85	49, 84	impbida 799	. 2 ⊢ (𝜑 → (((((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋))) ∧ (((𝐹 ∈ (𝑋 RingHom 𝑌) ∧ 𝐺 ∈ (𝑌 RingHom 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) ↔ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)))
86	10, 23, 85	3bitrd 307	1 ⊢ (𝜑 → (𝐹(𝑋𝑁𝑌)𝐺 ↔ (𝐹 ∈ (𝑋 RingIso 𝑌) ∧ 𝐺 = ◡𝐹)))

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 398   ∧ w3a 1082   = wceq 1536   ∈ wcel 2113   class class class wbr 5063   I cid 5456  ^◡ccnv 5551   ↾ cres 5554   ∘ ccom 5556  ⟶wf 6348  –1-1-onto→wf1o 6351  ‘cfv 6352  (class class class)co 7153  Basecbs 16479  Catccat 16931  Sectcsect 17010  Invcinv 17011   RingHom crh 19460   RingIso crs 19461  RingCatALTVcringcALTV 44349

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 2792  ax-rep 5187  ax-sep 5200  ax-nul 5207  ax-pow 5263  ax-pr 5327  ax-un 7458  ax-cnex 10590  ax-resscn 10591  ax-1cn 10592  ax-icn 10593  ax-addcl 10594  ax-addrcl 10595  ax-mulcl 10596  ax-mulrcl 10597  ax-mulcom 10598  ax-addass 10599  ax-mulass 10600  ax-distr 10601  ax-i2m1 10602  ax-1ne0 10603  ax-1rid 10604  ax-rnegex 10605  ax-rrecex 10606  ax-cnre 10607  ax-pre-lttri 10608  ax-pre-lttrn 10609  ax-pre-ltadd 10610  ax-pre-mulgt0 10611

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1083  df-3an 1084  df-tru 1539  df-ex 1780  df-nf 1784  df-sb 2069  df-mo 2621  df-eu 2653  df-clab 2799  df-cleq 2813  df-clel 2892  df-nfc 2962  df-ne 3016  df-nel 3123  df-ral 3142  df-rex 3143  df-reu 3144  df-rmo 3145  df-rab 3146  df-v 3495  df-sbc 3771  df-csb 3881  df-dif 3936  df-un 3938  df-in 3940  df-ss 3949  df-pss 3951  df-nul 4289  df-if 4465  df-pw 4538  df-sn 4565  df-pr 4567  df-tp 4569  df-op 4571  df-uni 4836  df-int 4874  df-iun 4918  df-br 5064  df-opab 5126  df-mpt 5144  df-tr 5170  df-id 5457  df-eprel 5462  df-po 5471  df-so 5472  df-fr 5511  df-we 5513  df-xp 5558  df-rel 5559  df-cnv 5560  df-co 5561  df-dm 5562  df-rn 5563  df-res 5564  df-ima 5565  df-pred 6145  df-ord 6191  df-on 6192  df-lim 6193  df-suc 6194  df-iota 6311  df-fun 6354  df-fn 6355  df-f 6356  df-f1 6357  df-fo 6358  df-f1o 6359  df-fv 6360  df-riota 7111  df-ov 7156  df-oprab 7157  df-mpo 7158  df-om 7578  df-1st 7686  df-2nd 7687  df-wrecs 7944  df-recs 8005  df-rdg 8043  df-1o 8099  df-oadd 8103  df-er 8286  df-map 8405  df-en 8507  df-dom 8508  df-sdom 8509  df-fin 8510  df-pnf 10674  df-mnf 10675  df-xr 10676  df-ltxr 10677  df-le 10678  df-sub 10869  df-neg 10870  df-nn 11636  df-2 11698  df-3 11699  df-4 11700  df-5 11701  df-6 11702  df-7 11703  df-8 11704  df-9 11705  df-n0 11896  df-z 11980  df-dec 12097  df-uz 12242  df-fz 12891  df-struct 16481  df-ndx 16482  df-slot 16483  df-base 16485  df-sets 16486  df-plusg 16574  df-hom 16585  df-cco 16586  df-0g 16711  df-cat 16935  df-cid 16936  df-sect 17013  df-inv 17014  df-mgm 17848  df-sgrp 17897  df-mnd 17908  df-mhm 17952  df-grp 18102  df-ghm 18352  df-mgp 19236  df-ur 19248  df-ring 19295  df-rnghom 19463  df-rngiso 19464  df-ringcALTV 44351

This theorem is referenced by:  ringcisoALTV  44402