Proof of Theorem rngcinv
Step | Hyp | Ref
| Expression |
1 | | rngcsect.b |
. . 3
⊢ 𝐵 = (Base‘𝐶) |
2 | | rngcinv.n |
. . 3
⊢ 𝑁 = (Inv‘𝐶) |
3 | | rngcsect.u |
. . . 4
⊢ (𝜑 → 𝑈 ∈ 𝑉) |
4 | | rngcsect.c |
. . . . 5
⊢ 𝐶 = (RngCat‘𝑈) |
5 | 4 | rngccat 45054 |
. . . 4
⊢ (𝑈 ∈ 𝑉 → 𝐶 ∈ Cat) |
6 | 3, 5 | syl 17 |
. . 3
⊢ (𝜑 → 𝐶 ∈ Cat) |
7 | | rngcsect.x |
. . 3
⊢ (𝜑 → 𝑋 ∈ 𝐵) |
8 | | rngcsect.y |
. . 3
⊢ (𝜑 → 𝑌 ∈ 𝐵) |
9 | | eqid 2738 |
. . 3
⊢
(Sect‘𝐶) =
(Sect‘𝐶) |
10 | 1, 2, 6, 7, 8, 9 | isinv 17128 |
. 2
⊢ (𝜑 → (𝐹(𝑋𝑁𝑌)𝐺 ↔ (𝐹(𝑋(Sect‘𝐶)𝑌)𝐺 ∧ 𝐺(𝑌(Sect‘𝐶)𝑋)𝐹))) |
11 | | eqid 2738 |
. . . . . 6
⊢
(Base‘𝑋) =
(Base‘𝑋) |
12 | 4, 1, 3, 7, 8, 11,
9 | rngcsect 45056 |
. . . . 5
⊢ (𝜑 → (𝐹(𝑋(Sect‘𝐶)𝑌)𝐺 ↔ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))))) |
13 | | df-3an 1090 |
. . . . 5
⊢ ((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ↔ ((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))) |
14 | 12, 13 | bitrdi 290 |
. . . 4
⊢ (𝜑 → (𝐹(𝑋(Sect‘𝐶)𝑌)𝐺 ↔ ((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))))) |
15 | | eqid 2738 |
. . . . . 6
⊢
(Base‘𝑌) =
(Base‘𝑌) |
16 | 4, 1, 3, 8, 7, 15,
9 | rngcsect 45056 |
. . . . 5
⊢ (𝜑 → (𝐺(𝑌(Sect‘𝐶)𝑋)𝐹 ↔ (𝐺 ∈ (𝑌 RngHomo 𝑋) ∧ 𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) |
17 | | 3ancoma 1099 |
. . . . . 6
⊢ ((𝐺 ∈ (𝑌 RngHomo 𝑋) ∧ 𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))) ↔ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) |
18 | | df-3an 1090 |
. . . . . 6
⊢ ((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))) ↔ ((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) |
19 | 17, 18 | bitri 278 |
. . . . 5
⊢ ((𝐺 ∈ (𝑌 RngHomo 𝑋) ∧ 𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))) ↔ ((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) |
20 | 16, 19 | bitrdi 290 |
. . . 4
⊢ (𝜑 → (𝐺(𝑌(Sect‘𝐶)𝑋)𝐹 ↔ ((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) |
21 | 14, 20 | anbi12d 634 |
. . 3
⊢ (𝜑 → ((𝐹(𝑋(Sect‘𝐶)𝑌)𝐺 ∧ 𝐺(𝑌(Sect‘𝐶)𝑋)𝐹) ↔ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ ((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))))) |
22 | | anandi 676 |
. . 3
⊢ ((((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ ((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) ↔ ((((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋))) ∧ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) |
23 | 21, 22 | bitrdi 290 |
. 2
⊢ (𝜑 → ((𝐹(𝑋(Sect‘𝐶)𝑌)𝐺 ∧ 𝐺(𝑌(Sect‘𝐶)𝑋)𝐹) ↔ ((((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋))) ∧ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))))) |
24 | | simplrl 777 |
. . . . . 6
⊢
(((((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋))) ∧ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) → 𝐹 ∈ (𝑋 RngHomo 𝑌)) |
25 | 24 | adantl 485 |
. . . . 5
⊢ ((𝜑 ∧ ((((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋))) ∧ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) → 𝐹 ∈ (𝑋 RngHomo 𝑌)) |
26 | 11, 15 | rnghmf 44975 |
. . . . . . . . . 10
⊢ (𝐹 ∈ (𝑋 RngHomo 𝑌) → 𝐹:(Base‘𝑋)⟶(Base‘𝑌)) |
27 | 15, 11 | rnghmf 44975 |
. . . . . . . . . 10
⊢ (𝐺 ∈ (𝑌 RngHomo 𝑋) → 𝐺:(Base‘𝑌)⟶(Base‘𝑋)) |
28 | 26, 27 | anim12i 616 |
. . . . . . . . 9
⊢ ((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) → (𝐹:(Base‘𝑋)⟶(Base‘𝑌) ∧ 𝐺:(Base‘𝑌)⟶(Base‘𝑋))) |
29 | 28 | ad2antlr 727 |
. . . . . . . 8
⊢
(((((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋))) ∧ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) → (𝐹:(Base‘𝑋)⟶(Base‘𝑌) ∧ 𝐺:(Base‘𝑌)⟶(Base‘𝑋))) |
30 | | simpr 488 |
. . . . . . . . 9
⊢ ((((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))) → (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))) |
31 | 30 | adantl 485 |
. . . . . . . 8
⊢
(((((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋))) ∧ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) → (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))) |
32 | | simpr 488 |
. . . . . . . . 9
⊢ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) → (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) |
33 | 32 | ad2antrl 728 |
. . . . . . . 8
⊢
(((((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋))) ∧ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) → (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) |
34 | 29, 31, 33 | jca32 519 |
. . . . . . 7
⊢
(((((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋))) ∧ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) → ((𝐹:(Base‘𝑋)⟶(Base‘𝑌) ∧ 𝐺:(Base‘𝑌)⟶(Base‘𝑋)) ∧ ((𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))))) |
35 | 34 | adantl 485 |
. . . . . 6
⊢ ((𝜑 ∧ ((((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋))) ∧ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) → ((𝐹:(Base‘𝑋)⟶(Base‘𝑌) ∧ 𝐺:(Base‘𝑌)⟶(Base‘𝑋)) ∧ ((𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))))) |
36 | | fcof1o 7057 |
. . . . . . 7
⊢ (((𝐹:(Base‘𝑋)⟶(Base‘𝑌) ∧ 𝐺:(Base‘𝑌)⟶(Base‘𝑋)) ∧ ((𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))) → (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ ◡𝐹 = 𝐺)) |
37 | | eqcom 2745 |
. . . . . . . 8
⊢ (◡𝐹 = 𝐺 ↔ 𝐺 = ◡𝐹) |
38 | 37 | anbi2i 626 |
. . . . . . 7
⊢ ((𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ ◡𝐹 = 𝐺) ↔ (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ 𝐺 = ◡𝐹)) |
39 | 36, 38 | sylib 221 |
. . . . . 6
⊢ (((𝐹:(Base‘𝑋)⟶(Base‘𝑌) ∧ 𝐺:(Base‘𝑌)⟶(Base‘𝑋)) ∧ ((𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))) → (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ 𝐺 = ◡𝐹)) |
40 | 35, 39 | syl 17 |
. . . . 5
⊢ ((𝜑 ∧ ((((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋))) ∧ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) → (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ 𝐺 = ◡𝐹)) |
41 | | anass 472 |
. . . . 5
⊢ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌)) ∧ 𝐺 = ◡𝐹) ↔ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) ∧ 𝐺 = ◡𝐹))) |
42 | 25, 40, 41 | sylanbrc 586 |
. . . 4
⊢ ((𝜑 ∧ ((((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋))) ∧ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) → ((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌)) ∧ 𝐺 = ◡𝐹)) |
43 | 11, 15 | isrngim 44980 |
. . . . . . 7
⊢ ((𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝐹 ∈ (𝑋 RngIsom 𝑌) ↔ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌)))) |
44 | 7, 8, 43 | syl2anc 587 |
. . . . . 6
⊢ (𝜑 → (𝐹 ∈ (𝑋 RngIsom 𝑌) ↔ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌)))) |
45 | 44 | anbi1d 633 |
. . . . 5
⊢ (𝜑 → ((𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹) ↔ ((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌)) ∧ 𝐺 = ◡𝐹))) |
46 | 45 | adantr 484 |
. . . 4
⊢ ((𝜑 ∧ ((((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋))) ∧ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) → ((𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹) ↔ ((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌)) ∧ 𝐺 = ◡𝐹))) |
47 | 42, 46 | mpbird 260 |
. . 3
⊢ ((𝜑 ∧ ((((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋))) ∧ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) → (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹)) |
48 | 11, 15 | rngimrnghm 44982 |
. . . . . 6
⊢ (𝐹 ∈ (𝑋 RngIsom 𝑌) → 𝐹 ∈ (𝑋 RngHomo 𝑌)) |
49 | 48 | ad2antrl 728 |
. . . . 5
⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹)) → 𝐹 ∈ (𝑋 RngHomo 𝑌)) |
50 | | isrngisom 44972 |
. . . . . . . . . . 11
⊢ ((𝑋 ∈ 𝐵 ∧ 𝑌 ∈ 𝐵) → (𝐹 ∈ (𝑋 RngIsom 𝑌) ↔ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ ◡𝐹 ∈ (𝑌 RngHomo 𝑋)))) |
51 | 7, 8, 50 | syl2anc 587 |
. . . . . . . . . 10
⊢ (𝜑 → (𝐹 ∈ (𝑋 RngIsom 𝑌) ↔ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ ◡𝐹 ∈ (𝑌 RngHomo 𝑋)))) |
52 | | eleq1 2820 |
. . . . . . . . . . . 12
⊢ (◡𝐹 = 𝐺 → (◡𝐹 ∈ (𝑌 RngHomo 𝑋) ↔ 𝐺 ∈ (𝑌 RngHomo 𝑋))) |
53 | 52 | eqcoms 2746 |
. . . . . . . . . . 11
⊢ (𝐺 = ◡𝐹 → (◡𝐹 ∈ (𝑌 RngHomo 𝑋) ↔ 𝐺 ∈ (𝑌 RngHomo 𝑋))) |
54 | 53 | anbi2d 632 |
. . . . . . . . . 10
⊢ (𝐺 = ◡𝐹 → ((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ ◡𝐹 ∈ (𝑌 RngHomo 𝑋)) ↔ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)))) |
55 | 51, 54 | sylan9bbr 514 |
. . . . . . . . 9
⊢ ((𝐺 = ◡𝐹 ∧ 𝜑) → (𝐹 ∈ (𝑋 RngIsom 𝑌) ↔ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)))) |
56 | | simpr 488 |
. . . . . . . . 9
⊢ ((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) → 𝐺 ∈ (𝑌 RngHomo 𝑋)) |
57 | 55, 56 | syl6bi 256 |
. . . . . . . 8
⊢ ((𝐺 = ◡𝐹 ∧ 𝜑) → (𝐹 ∈ (𝑋 RngIsom 𝑌) → 𝐺 ∈ (𝑌 RngHomo 𝑋))) |
58 | 57 | com12 32 |
. . . . . . 7
⊢ (𝐹 ∈ (𝑋 RngIsom 𝑌) → ((𝐺 = ◡𝐹 ∧ 𝜑) → 𝐺 ∈ (𝑌 RngHomo 𝑋))) |
59 | 58 | expdimp 456 |
. . . . . 6
⊢ ((𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹) → (𝜑 → 𝐺 ∈ (𝑌 RngHomo 𝑋))) |
60 | 59 | impcom 411 |
. . . . 5
⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹)) → 𝐺 ∈ (𝑌 RngHomo 𝑋)) |
61 | | coeq1 5694 |
. . . . . . 7
⊢ (𝐺 = ◡𝐹 → (𝐺 ∘ 𝐹) = (◡𝐹 ∘ 𝐹)) |
62 | 61 | ad2antll 729 |
. . . . . 6
⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹)) → (𝐺 ∘ 𝐹) = (◡𝐹 ∘ 𝐹)) |
63 | 11, 15 | rngimf1o 44981 |
. . . . . . . 8
⊢ (𝐹 ∈ (𝑋 RngIsom 𝑌) → 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌)) |
64 | 63 | ad2antrl 728 |
. . . . . . 7
⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹)) → 𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌)) |
65 | | f1ococnv1 6640 |
. . . . . . 7
⊢ (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) → (◡𝐹 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) |
66 | 64, 65 | syl 17 |
. . . . . 6
⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹)) → (◡𝐹 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) |
67 | 62, 66 | eqtrd 2773 |
. . . . 5
⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹)) → (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) |
68 | 49, 60, 67 | jca31 518 |
. . . 4
⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹)) → ((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋)))) |
69 | 51 | biimpcd 252 |
. . . . . . 7
⊢ (𝐹 ∈ (𝑋 RngIsom 𝑌) → (𝜑 → (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ ◡𝐹 ∈ (𝑌 RngHomo 𝑋)))) |
70 | 69 | adantr 484 |
. . . . . 6
⊢ ((𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹) → (𝜑 → (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ ◡𝐹 ∈ (𝑌 RngHomo 𝑋)))) |
71 | 70 | impcom 411 |
. . . . 5
⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹)) → (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ ◡𝐹 ∈ (𝑌 RngHomo 𝑋))) |
72 | | eleq1 2820 |
. . . . . . 7
⊢ (𝐺 = ◡𝐹 → (𝐺 ∈ (𝑌 RngHomo 𝑋) ↔ ◡𝐹 ∈ (𝑌 RngHomo 𝑋))) |
73 | 72 | ad2antll 729 |
. . . . . 6
⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹)) → (𝐺 ∈ (𝑌 RngHomo 𝑋) ↔ ◡𝐹 ∈ (𝑌 RngHomo 𝑋))) |
74 | 73 | anbi2d 632 |
. . . . 5
⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹)) → ((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ↔ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ ◡𝐹 ∈ (𝑌 RngHomo 𝑋)))) |
75 | 71, 74 | mpbird 260 |
. . . 4
⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹)) → (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋))) |
76 | | coeq2 5695 |
. . . . . . 7
⊢ (𝐺 = ◡𝐹 → (𝐹 ∘ 𝐺) = (𝐹 ∘ ◡𝐹)) |
77 | 76 | ad2antll 729 |
. . . . . 6
⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹)) → (𝐹 ∘ 𝐺) = (𝐹 ∘ ◡𝐹)) |
78 | | f1ococnv2 6638 |
. . . . . . 7
⊢ (𝐹:(Base‘𝑋)–1-1-onto→(Base‘𝑌) → (𝐹 ∘ ◡𝐹) = ( I ↾ (Base‘𝑌))) |
79 | 64, 78 | syl 17 |
. . . . . 6
⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹)) → (𝐹 ∘ ◡𝐹) = ( I ↾ (Base‘𝑌))) |
80 | 77, 79 | eqtrd 2773 |
. . . . 5
⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹)) → (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))) |
81 | 75, 67, 80 | jca31 518 |
. . . 4
⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹)) → (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) |
82 | 68, 75, 81 | jca31 518 |
. . 3
⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹)) → ((((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋))) ∧ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌))))) |
83 | 47, 82 | impbida 801 |
. 2
⊢ (𝜑 → (((((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋))) ∧ (((𝐹 ∈ (𝑋 RngHomo 𝑌) ∧ 𝐺 ∈ (𝑌 RngHomo 𝑋)) ∧ (𝐺 ∘ 𝐹) = ( I ↾ (Base‘𝑋))) ∧ (𝐹 ∘ 𝐺) = ( I ↾ (Base‘𝑌)))) ↔ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹))) |
84 | 10, 23, 83 | 3bitrd 308 |
1
⊢ (𝜑 → (𝐹(𝑋𝑁𝑌)𝐺 ↔ (𝐹 ∈ (𝑋 RngIsom 𝑌) ∧ 𝐺 = ◡𝐹))) |