Step | Hyp | Ref
| Expression |
1 | | ssid 3587 |
. . . 4
⊢
(Base‘𝐶)
⊆ (Base‘𝐶) |
2 | 1 | a1i 11 |
. . 3
⊢ (𝐶 ∈ Cat →
(Base‘𝐶) ⊆
(Base‘𝐶)) |
3 | | ssid 3587 |
. . . . 5
⊢ (𝑥(Homf
‘𝐶)𝑦) ⊆ (𝑥(Homf ‘𝐶)𝑦) |
4 | 3 | a1i 11 |
. . . 4
⊢ ((𝐶 ∈ Cat ∧ (𝑥 ∈ (Base‘𝐶) ∧ 𝑦 ∈ (Base‘𝐶))) → (𝑥(Homf ‘𝐶)𝑦) ⊆ (𝑥(Homf ‘𝐶)𝑦)) |
5 | 4 | ralrimivva 2954 |
. . 3
⊢ (𝐶 ∈ Cat → ∀𝑥 ∈ (Base‘𝐶)∀𝑦 ∈ (Base‘𝐶)(𝑥(Homf ‘𝐶)𝑦) ⊆ (𝑥(Homf ‘𝐶)𝑦)) |
6 | | eqid 2610 |
. . . . . 6
⊢
(Homf ‘𝐶) = (Homf ‘𝐶) |
7 | | eqid 2610 |
. . . . . 6
⊢
(Base‘𝐶) =
(Base‘𝐶) |
8 | 6, 7 | homffn 16176 |
. . . . 5
⊢
(Homf ‘𝐶) Fn ((Base‘𝐶) × (Base‘𝐶)) |
9 | 8 | a1i 11 |
. . . 4
⊢ (𝐶 ∈ Cat →
(Homf ‘𝐶) Fn ((Base‘𝐶) × (Base‘𝐶))) |
10 | | fvex 6113 |
. . . . 5
⊢
(Base‘𝐶)
∈ V |
11 | 10 | a1i 11 |
. . . 4
⊢ (𝐶 ∈ Cat →
(Base‘𝐶) ∈
V) |
12 | 9, 9, 11 | isssc 16303 |
. . 3
⊢ (𝐶 ∈ Cat →
((Homf ‘𝐶) ⊆cat
(Homf ‘𝐶) ↔ ((Base‘𝐶) ⊆ (Base‘𝐶) ∧ ∀𝑥 ∈ (Base‘𝐶)∀𝑦 ∈ (Base‘𝐶)(𝑥(Homf ‘𝐶)𝑦) ⊆ (𝑥(Homf ‘𝐶)𝑦)))) |
13 | 2, 5, 12 | mpbir2and 959 |
. 2
⊢ (𝐶 ∈ Cat →
(Homf ‘𝐶) ⊆cat
(Homf ‘𝐶)) |
14 | | eqid 2610 |
. . . . . 6
⊢ (Hom
‘𝐶) = (Hom
‘𝐶) |
15 | | eqid 2610 |
. . . . . 6
⊢
(Id‘𝐶) =
(Id‘𝐶) |
16 | | simpl 472 |
. . . . . 6
⊢ ((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) → 𝐶 ∈ Cat) |
17 | | simpr 476 |
. . . . . 6
⊢ ((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) → 𝑥 ∈ (Base‘𝐶)) |
18 | 7, 14, 15, 16, 17 | catidcl 16166 |
. . . . 5
⊢ ((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) → ((Id‘𝐶)‘𝑥) ∈ (𝑥(Hom ‘𝐶)𝑥)) |
19 | 6, 7, 14, 17, 17 | homfval 16175 |
. . . . 5
⊢ ((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) → (𝑥(Homf ‘𝐶)𝑥) = (𝑥(Hom ‘𝐶)𝑥)) |
20 | 18, 19 | eleqtrrd 2691 |
. . . 4
⊢ ((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) → ((Id‘𝐶)‘𝑥) ∈ (𝑥(Homf ‘𝐶)𝑥)) |
21 | | eqid 2610 |
. . . . . . . 8
⊢
(comp‘𝐶) =
(comp‘𝐶) |
22 | 16 | adantr 480 |
. . . . . . . . 9
⊢ (((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) → 𝐶 ∈ Cat) |
23 | 22 | adantr 480 |
. . . . . . . 8
⊢ ((((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) ∧ (𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦) ∧ 𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧))) → 𝐶 ∈ Cat) |
24 | 17 | adantr 480 |
. . . . . . . . 9
⊢ (((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) → 𝑥 ∈ (Base‘𝐶)) |
25 | 24 | adantr 480 |
. . . . . . . 8
⊢ ((((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) ∧ (𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦) ∧ 𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧))) → 𝑥 ∈ (Base‘𝐶)) |
26 | | simpl 472 |
. . . . . . . . . 10
⊢ ((𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶)) → 𝑦 ∈ (Base‘𝐶)) |
27 | 26 | adantl 481 |
. . . . . . . . 9
⊢ (((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) → 𝑦 ∈ (Base‘𝐶)) |
28 | 27 | adantr 480 |
. . . . . . . 8
⊢ ((((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) ∧ (𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦) ∧ 𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧))) → 𝑦 ∈ (Base‘𝐶)) |
29 | | simpr 476 |
. . . . . . . . . 10
⊢ ((𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶)) → 𝑧 ∈ (Base‘𝐶)) |
30 | 29 | adantl 481 |
. . . . . . . . 9
⊢ (((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) → 𝑧 ∈ (Base‘𝐶)) |
31 | 30 | adantr 480 |
. . . . . . . 8
⊢ ((((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) ∧ (𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦) ∧ 𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧))) → 𝑧 ∈ (Base‘𝐶)) |
32 | 6, 7, 14, 24, 27 | homfval 16175 |
. . . . . . . . . . . 12
⊢ (((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) → (𝑥(Homf ‘𝐶)𝑦) = (𝑥(Hom ‘𝐶)𝑦)) |
33 | 32 | eleq2d 2673 |
. . . . . . . . . . 11
⊢ (((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) → (𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦) ↔ 𝑓 ∈ (𝑥(Hom ‘𝐶)𝑦))) |
34 | 33 | biimpcd 238 |
. . . . . . . . . 10
⊢ (𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦) → (((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) → 𝑓 ∈ (𝑥(Hom ‘𝐶)𝑦))) |
35 | 34 | adantr 480 |
. . . . . . . . 9
⊢ ((𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦) ∧ 𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧)) → (((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) → 𝑓 ∈ (𝑥(Hom ‘𝐶)𝑦))) |
36 | 35 | impcom 445 |
. . . . . . . 8
⊢ ((((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) ∧ (𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦) ∧ 𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧))) → 𝑓 ∈ (𝑥(Hom ‘𝐶)𝑦)) |
37 | 6, 7, 14, 27, 30 | homfval 16175 |
. . . . . . . . . . . 12
⊢ (((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) → (𝑦(Homf ‘𝐶)𝑧) = (𝑦(Hom ‘𝐶)𝑧)) |
38 | 37 | eleq2d 2673 |
. . . . . . . . . . 11
⊢ (((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) → (𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧) ↔ 𝑔 ∈ (𝑦(Hom ‘𝐶)𝑧))) |
39 | 38 | biimpd 218 |
. . . . . . . . . 10
⊢ (((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) → (𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧) → 𝑔 ∈ (𝑦(Hom ‘𝐶)𝑧))) |
40 | 39 | adantld 482 |
. . . . . . . . 9
⊢ (((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) → ((𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦) ∧ 𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧)) → 𝑔 ∈ (𝑦(Hom ‘𝐶)𝑧))) |
41 | 40 | imp 444 |
. . . . . . . 8
⊢ ((((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) ∧ (𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦) ∧ 𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧))) → 𝑔 ∈ (𝑦(Hom ‘𝐶)𝑧)) |
42 | 7, 14, 21, 23, 25, 28, 31, 36, 41 | catcocl 16169 |
. . . . . . 7
⊢ ((((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) ∧ (𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦) ∧ 𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧))) → (𝑔(〈𝑥, 𝑦〉(comp‘𝐶)𝑧)𝑓) ∈ (𝑥(Hom ‘𝐶)𝑧)) |
43 | 6, 7, 14, 24, 30 | homfval 16175 |
. . . . . . . 8
⊢ (((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) → (𝑥(Homf ‘𝐶)𝑧) = (𝑥(Hom ‘𝐶)𝑧)) |
44 | 43 | adantr 480 |
. . . . . . 7
⊢ ((((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) ∧ (𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦) ∧ 𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧))) → (𝑥(Homf ‘𝐶)𝑧) = (𝑥(Hom ‘𝐶)𝑧)) |
45 | 42, 44 | eleqtrrd 2691 |
. . . . . 6
⊢ ((((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) ∧ (𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦) ∧ 𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧))) → (𝑔(〈𝑥, 𝑦〉(comp‘𝐶)𝑧)𝑓) ∈ (𝑥(Homf ‘𝐶)𝑧)) |
46 | 45 | ralrimivva 2954 |
. . . . 5
⊢ (((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) ∧ (𝑦 ∈ (Base‘𝐶) ∧ 𝑧 ∈ (Base‘𝐶))) → ∀𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦)∀𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧)(𝑔(〈𝑥, 𝑦〉(comp‘𝐶)𝑧)𝑓) ∈ (𝑥(Homf ‘𝐶)𝑧)) |
47 | 46 | ralrimivva 2954 |
. . . 4
⊢ ((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) → ∀𝑦 ∈ (Base‘𝐶)∀𝑧 ∈ (Base‘𝐶)∀𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦)∀𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧)(𝑔(〈𝑥, 𝑦〉(comp‘𝐶)𝑧)𝑓) ∈ (𝑥(Homf ‘𝐶)𝑧)) |
48 | 20, 47 | jca 553 |
. . 3
⊢ ((𝐶 ∈ Cat ∧ 𝑥 ∈ (Base‘𝐶)) → (((Id‘𝐶)‘𝑥) ∈ (𝑥(Homf ‘𝐶)𝑥) ∧ ∀𝑦 ∈ (Base‘𝐶)∀𝑧 ∈ (Base‘𝐶)∀𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦)∀𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧)(𝑔(〈𝑥, 𝑦〉(comp‘𝐶)𝑧)𝑓) ∈ (𝑥(Homf ‘𝐶)𝑧))) |
49 | 48 | ralrimiva 2949 |
. 2
⊢ (𝐶 ∈ Cat → ∀𝑥 ∈ (Base‘𝐶)(((Id‘𝐶)‘𝑥) ∈ (𝑥(Homf ‘𝐶)𝑥) ∧ ∀𝑦 ∈ (Base‘𝐶)∀𝑧 ∈ (Base‘𝐶)∀𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦)∀𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧)(𝑔(〈𝑥, 𝑦〉(comp‘𝐶)𝑧)𝑓) ∈ (𝑥(Homf ‘𝐶)𝑧))) |
50 | | id 22 |
. . 3
⊢ (𝐶 ∈ Cat → 𝐶 ∈ Cat) |
51 | 6, 15, 21, 50, 9 | issubc2 16319 |
. 2
⊢ (𝐶 ∈ Cat →
((Homf ‘𝐶) ∈ (Subcat‘𝐶) ↔ ((Homf
‘𝐶)
⊆cat (Homf ‘𝐶) ∧ ∀𝑥 ∈ (Base‘𝐶)(((Id‘𝐶)‘𝑥) ∈ (𝑥(Homf ‘𝐶)𝑥) ∧ ∀𝑦 ∈ (Base‘𝐶)∀𝑧 ∈ (Base‘𝐶)∀𝑓 ∈ (𝑥(Homf ‘𝐶)𝑦)∀𝑔 ∈ (𝑦(Homf ‘𝐶)𝑧)(𝑔(〈𝑥, 𝑦〉(comp‘𝐶)𝑧)𝑓) ∈ (𝑥(Homf ‘𝐶)𝑧))))) |
52 | 13, 49, 51 | mpbir2and 959 |
1
⊢ (𝐶 ∈ Cat →
(Homf ‘𝐶) ∈ (Subcat‘𝐶)) |