Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
||
Mirrors > Home > MPE Home > Th. List > invfun | Structured version Visualization version GIF version |
Description: The inverse relation is a function, which is to say that every morphism has at most one inverse. (Contributed by Mario Carneiro, 2-Jan-2017.) |
Ref | Expression |
---|---|
invfval.b | ⊢ 𝐵 = (Base‘𝐶) |
invfval.n | ⊢ 𝑁 = (Inv‘𝐶) |
invfval.c | ⊢ (𝜑 → 𝐶 ∈ Cat) |
invfval.x | ⊢ (𝜑 → 𝑋 ∈ 𝐵) |
invfval.y | ⊢ (𝜑 → 𝑌 ∈ 𝐵) |
Ref | Expression |
---|---|
invfun | ⊢ (𝜑 → Fun (𝑋𝑁𝑌)) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | invfval.b | . . . 4 ⊢ 𝐵 = (Base‘𝐶) | |
2 | invfval.n | . . . 4 ⊢ 𝑁 = (Inv‘𝐶) | |
3 | invfval.c | . . . 4 ⊢ (𝜑 → 𝐶 ∈ Cat) | |
4 | invfval.x | . . . 4 ⊢ (𝜑 → 𝑋 ∈ 𝐵) | |
5 | invfval.y | . . . 4 ⊢ (𝜑 → 𝑌 ∈ 𝐵) | |
6 | eqid 2736 | . . . 4 ⊢ (Hom ‘𝐶) = (Hom ‘𝐶) | |
7 | 1, 2, 3, 4, 5, 6 | invss 17220 | . . 3 ⊢ (𝜑 → (𝑋𝑁𝑌) ⊆ ((𝑋(Hom ‘𝐶)𝑌) × (𝑌(Hom ‘𝐶)𝑋))) |
8 | relxp 5554 | . . 3 ⊢ Rel ((𝑋(Hom ‘𝐶)𝑌) × (𝑌(Hom ‘𝐶)𝑋)) | |
9 | relss 5638 | . . 3 ⊢ ((𝑋𝑁𝑌) ⊆ ((𝑋(Hom ‘𝐶)𝑌) × (𝑌(Hom ‘𝐶)𝑋)) → (Rel ((𝑋(Hom ‘𝐶)𝑌) × (𝑌(Hom ‘𝐶)𝑋)) → Rel (𝑋𝑁𝑌))) | |
10 | 7, 8, 9 | mpisyl 21 | . 2 ⊢ (𝜑 → Rel (𝑋𝑁𝑌)) |
11 | eqid 2736 | . . . . . 6 ⊢ (Sect‘𝐶) = (Sect‘𝐶) | |
12 | 3 | adantr 484 | . . . . . 6 ⊢ ((𝜑 ∧ (𝑓(𝑋𝑁𝑌)𝑔 ∧ 𝑓(𝑋𝑁𝑌)ℎ)) → 𝐶 ∈ Cat) |
13 | 5 | adantr 484 | . . . . . 6 ⊢ ((𝜑 ∧ (𝑓(𝑋𝑁𝑌)𝑔 ∧ 𝑓(𝑋𝑁𝑌)ℎ)) → 𝑌 ∈ 𝐵) |
14 | 4 | adantr 484 | . . . . . 6 ⊢ ((𝜑 ∧ (𝑓(𝑋𝑁𝑌)𝑔 ∧ 𝑓(𝑋𝑁𝑌)ℎ)) → 𝑋 ∈ 𝐵) |
15 | 1, 2, 3, 4, 5, 11 | isinv 17219 | . . . . . . . 8 ⊢ (𝜑 → (𝑓(𝑋𝑁𝑌)𝑔 ↔ (𝑓(𝑋(Sect‘𝐶)𝑌)𝑔 ∧ 𝑔(𝑌(Sect‘𝐶)𝑋)𝑓))) |
16 | 15 | simplbda 503 | . . . . . . 7 ⊢ ((𝜑 ∧ 𝑓(𝑋𝑁𝑌)𝑔) → 𝑔(𝑌(Sect‘𝐶)𝑋)𝑓) |
17 | 16 | adantrr 717 | . . . . . 6 ⊢ ((𝜑 ∧ (𝑓(𝑋𝑁𝑌)𝑔 ∧ 𝑓(𝑋𝑁𝑌)ℎ)) → 𝑔(𝑌(Sect‘𝐶)𝑋)𝑓) |
18 | 1, 2, 3, 4, 5, 11 | isinv 17219 | . . . . . . . 8 ⊢ (𝜑 → (𝑓(𝑋𝑁𝑌)ℎ ↔ (𝑓(𝑋(Sect‘𝐶)𝑌)ℎ ∧ ℎ(𝑌(Sect‘𝐶)𝑋)𝑓))) |
19 | 18 | simprbda 502 | . . . . . . 7 ⊢ ((𝜑 ∧ 𝑓(𝑋𝑁𝑌)ℎ) → 𝑓(𝑋(Sect‘𝐶)𝑌)ℎ) |
20 | 19 | adantrl 716 | . . . . . 6 ⊢ ((𝜑 ∧ (𝑓(𝑋𝑁𝑌)𝑔 ∧ 𝑓(𝑋𝑁𝑌)ℎ)) → 𝑓(𝑋(Sect‘𝐶)𝑌)ℎ) |
21 | 1, 11, 12, 13, 14, 17, 20 | sectcan 17214 | . . . . 5 ⊢ ((𝜑 ∧ (𝑓(𝑋𝑁𝑌)𝑔 ∧ 𝑓(𝑋𝑁𝑌)ℎ)) → 𝑔 = ℎ) |
22 | 21 | ex 416 | . . . 4 ⊢ (𝜑 → ((𝑓(𝑋𝑁𝑌)𝑔 ∧ 𝑓(𝑋𝑁𝑌)ℎ) → 𝑔 = ℎ)) |
23 | 22 | alrimiv 1935 | . . 3 ⊢ (𝜑 → ∀ℎ((𝑓(𝑋𝑁𝑌)𝑔 ∧ 𝑓(𝑋𝑁𝑌)ℎ) → 𝑔 = ℎ)) |
24 | 23 | alrimivv 1936 | . 2 ⊢ (𝜑 → ∀𝑓∀𝑔∀ℎ((𝑓(𝑋𝑁𝑌)𝑔 ∧ 𝑓(𝑋𝑁𝑌)ℎ) → 𝑔 = ℎ)) |
25 | dffun2 6368 | . 2 ⊢ (Fun (𝑋𝑁𝑌) ↔ (Rel (𝑋𝑁𝑌) ∧ ∀𝑓∀𝑔∀ℎ((𝑓(𝑋𝑁𝑌)𝑔 ∧ 𝑓(𝑋𝑁𝑌)ℎ) → 𝑔 = ℎ))) | |
26 | 10, 24, 25 | sylanbrc 586 | 1 ⊢ (𝜑 → Fun (𝑋𝑁𝑌)) |
Colors of variables: wff setvar class |
Syntax hints: → wi 4 ∧ wa 399 ∀wal 1541 = wceq 1543 ∈ wcel 2112 ⊆ wss 3853 class class class wbr 5039 × cxp 5534 Rel wrel 5541 Fun wfun 6352 ‘cfv 6358 (class class class)co 7191 Basecbs 16666 Hom chom 16760 Catccat 17121 Sectcsect 17203 Invcinv 17204 |
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 2018 ax-8 2114 ax-9 2122 ax-10 2143 ax-11 2160 ax-12 2177 ax-ext 2708 ax-rep 5164 ax-sep 5177 ax-nul 5184 ax-pow 5243 ax-pr 5307 ax-un 7501 |
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 2073 df-mo 2539 df-eu 2568 df-clab 2715 df-cleq 2728 df-clel 2809 df-nfc 2879 df-ne 2933 df-ral 3056 df-rex 3057 df-reu 3058 df-rmo 3059 df-rab 3060 df-v 3400 df-sbc 3684 df-csb 3799 df-dif 3856 df-un 3858 df-in 3860 df-ss 3870 df-nul 4224 df-if 4426 df-pw 4501 df-sn 4528 df-pr 4530 df-op 4534 df-uni 4806 df-iun 4892 df-br 5040 df-opab 5102 df-mpt 5121 df-id 5440 df-xp 5542 df-rel 5543 df-cnv 5544 df-co 5545 df-dm 5546 df-rn 5547 df-res 5548 df-ima 5549 df-iota 6316 df-fun 6360 df-fn 6361 df-f 6362 df-f1 6363 df-fo 6364 df-f1o 6365 df-fv 6366 df-riota 7148 df-ov 7194 df-oprab 7195 df-mpo 7196 df-1st 7739 df-2nd 7740 df-cat 17125 df-cid 17126 df-sect 17206 df-inv 17207 |
This theorem is referenced by: inviso1 17225 invf 17227 invco 17230 idinv 17248 ffthiso 17390 fuciso 17438 setciso 17551 catciso 17571 rngciso 45156 rngcisoALTV 45168 ringciso 45207 ringcisoALTV 45231 |
Copyright terms: Public domain | W3C validator |