:: CAT_1 semantic presentation
theorem Th1: :: CAT_1:1
canceled;
theorem Th2: :: CAT_1:2
canceled;
theorem Th3: :: CAT_1:3
canceled;
theorem Th4: :: CAT_1:4
:: deftheorem Def1 defines .--> CAT_1:def 1 :
theorem Th5: :: CAT_1:5
canceled;
theorem Th6: :: CAT_1:6
canceled;
theorem Th7: :: CAT_1:7
theorem Th8: :: CAT_1:8
for b
1, b
2, b
3 being
set holds
(b1,b2 .--> b3) . [b1,b2] = b
3
theorem Th9: :: CAT_1:9
definition
attr a
1 is
strict;
struct CatStr -> ;
aggr CatStr(#
Objects,
Morphisms,
Dom,
Cod,
Comp,
Id #)
-> CatStr ;
sel Objects c
1 -> non
empty set ;
sel Morphisms c
1 -> non
empty set ;
sel Dom c
1 -> Function of the
Morphisms of a
1,the
Objects of a
1;
sel Cod c
1 -> Function of the
Morphisms of a
1,the
Objects of a
1;
sel Comp c
1 -> PartFunc of
[:the Morphisms of a1,the Morphisms of a1:],the
Morphisms of a
1;
sel Id c
1 -> Function of the
Objects of a
1,the
Morphisms of a
1;
end;
:: deftheorem Def2 defines dom CAT_1:def 2 :
:: deftheorem Def3 defines cod CAT_1:def 3 :
:: deftheorem Def4 defines * CAT_1:def 4 :
:: deftheorem Def5 defines id CAT_1:def 5 :
:: deftheorem Def6 defines Hom CAT_1:def 6 :
theorem Th10: :: CAT_1:10
canceled;
theorem Th11: :: CAT_1:11
canceled;
theorem Th12: :: CAT_1:12
canceled;
theorem Th13: :: CAT_1:13
canceled;
theorem Th14: :: CAT_1:14
canceled;
theorem Th15: :: CAT_1:15
canceled;
theorem Th16: :: CAT_1:16
canceled;
theorem Th17: :: CAT_1:17
canceled;
theorem Th18: :: CAT_1:18
theorem Th19: :: CAT_1:19
:: deftheorem Def7 defines Morphism CAT_1:def 7 :
theorem Th20: :: CAT_1:20
canceled;
theorem Th21: :: CAT_1:21
theorem Th22: :: CAT_1:22
theorem Th23: :: CAT_1:23
theorem Th24: :: CAT_1:24
theorem Th25: :: CAT_1:25
theorem Th26: :: CAT_1:26
theorem Th27: :: CAT_1:27
for b
1 being
CatStr for b
2, b
3, b
4, b
5 being
Object of b
1for b
6 being
Morphism of b
2,b
3 holds
not (
Hom b
2,b
3,
Hom b
4,b
5 are_equipotent &
Hom b
2,b
3 = {b6} & ( for b
7 being
Morphism of b
4,b
5 holds
not
Hom b
4,b
5 = {b7} ) )
E12:
now
let c
1, c
2 be
set ;
let c
3 be
CatStr ;
assume E13:
c
3 = CatStr(#
{c1},
{c2},
(c2 .--> c1),
(c2 .--> c1),
(c2,c2 .--> c2),
(c1 .--> c2) #)
;
set c
4 = the
Comp of c
3;
set c
5 = the
Dom of c
3;
set c
6 = the
Cod of c
3;
set c
7 = the
Id of c
3;
thus
for b
1, b
2 being
Element of the
Morphisms of c
3 holds
(
[b2,b1] in dom the
Comp of c
3 iff the
Dom of c
3 . b
2 = the
Cod of c
3 . b
1 )
thus
for b
1, b
2 being
Element of the
Morphisms of c
3 holds
( the
Dom of c
3 . b
2 = the
Cod of c
3 . b
1 implies ( the
Dom of c
3 . (the Comp of c3 . [b2,b1]) = the
Dom of c
3 . b
1 & the
Cod of c
3 . (the Comp of c3 . [b2,b1]) = the
Cod of c
3 . b
2 ) )
thus
for b
1, b
2, b
3 being
Element of the
Morphisms of c
3 holds
( the
Dom of c
3 . b
3 = the
Cod of c
3 . b
2 & the
Dom of c
3 . b
2 = the
Cod of c
3 . b
1 implies the
Comp of c
3 . [b3,(the Comp of c3 . [b2,b1])] = the
Comp of c
3 . [(the Comp of c3 . [b3,b2]),b1] )
proof
let c
8, c
9, c
10 be
Element of the
Morphisms of c
3;
( the
Comp of c
3 . [c9,c8] = c
2 & the
Comp of c
3 . [c10,c9] = c
2 )
by E13, Th9;
then reconsider c
11 = the
Comp of c
3 . [c9,c8], c
12 = the
Comp of c
3 . [c10,c9] as
Element of the
Morphisms of c
3 by E13, TARSKI:def 1;
( the
Comp of c
3 . [c10,c11] = c
2 & the
Comp of c
3 . [c12,c8] = c
2 )
by E13, Th9;
hence
( the
Dom of c
3 . c
10 = the
Cod of c
3 . c
9 & the
Dom of c
3 . c
9 = the
Cod of c
3 . c
8 implies the
Comp of c
3 . [c10,(the Comp of c3 . [c9,c8])] = the
Comp of c
3 . [(the Comp of c3 . [c10,c9]),c8] )
;
end;
let c
8 be
Element of the
Objects of c
3;
c
8 = c
1
by E13, TARSKI:def 1;
hence
( the
Dom of c
3 . (the Id of c3 . c8) = c
8 & the
Cod of c
3 . (the Id of c3 . c8) = c
8 )
by E13, FUNCT_2:65;
thus
for b
1 being
Element of the
Morphisms of c
3 holds
( the
Cod of c
3 . b
1 = c
8 implies the
Comp of c
3 . [(the Id of c3 . c8),b1] = b
1 )
let c
9 be
Element of the
Morphisms of c
3;
c
9 = c
2
by E13, TARSKI:def 1;
hence
the
Comp of c
3 . [c9,(the Id of c3 . c8)] = c
9
by E13, Th9;
end;
definition
let c
1 be
CatStr ;
attr a
1 is
Category-like means :
Def8:
:: CAT_1:def 8
( ( for b
1, b
2 being
Element of the
Morphisms of a
1 holds
(
[b2,b1] in dom the
Comp of a
1 iff the
Dom of a
1 . b
2 = the
Cod of a
1 . b
1 ) ) & ( for b
1, b
2 being
Element of the
Morphisms of a
1 holds
( the
Dom of a
1 . b
2 = the
Cod of a
1 . b
1 implies ( the
Dom of a
1 . (the Comp of a1 . [b2,b1]) = the
Dom of a
1 . b
1 & the
Cod of a
1 . (the Comp of a1 . [b2,b1]) = the
Cod of a
1 . b
2 ) ) ) & ( for b
1, b
2, b
3 being
Element of the
Morphisms of a
1 holds
( the
Dom of a
1 . b
3 = the
Cod of a
1 . b
2 & the
Dom of a
1 . b
2 = the
Cod of a
1 . b
1 implies the
Comp of a
1 . [b3,(the Comp of a1 . [b2,b1])] = the
Comp of a
1 . [(the Comp of a1 . [b3,b2]),b1] ) ) & ( for b
1 being
Element of the
Objects of a
1 holds
( the
Dom of a
1 . (the Id of a1 . b1) = b
1 & the
Cod of a
1 . (the Id of a1 . b1) = b
1 & ( for b
2 being
Element of the
Morphisms of a
1 holds
( the
Cod of a
1 . b
2 = b
1 implies the
Comp of a
1 . [(the Id of a1 . b1),b2] = b
2 ) ) & ( for b
2 being
Element of the
Morphisms of a
1 holds
( the
Dom of a
1 . b
2 = b
1 implies the
Comp of a
1 . [b2,(the Id of a1 . b1)] = b
2 ) ) ) ) );
end;
:: deftheorem Def8 defines Category-like CAT_1:def 8 :
for b
1 being
CatStr holds
( b
1 is
Category-like iff ( ( for b
2, b
3 being
Element of the
Morphisms of b
1 holds
(
[b3,b2] in dom the
Comp of b
1 iff the
Dom of b
1 . b
3 = the
Cod of b
1 . b
2 ) ) & ( for b
2, b
3 being
Element of the
Morphisms of b
1 holds
( the
Dom of b
1 . b
3 = the
Cod of b
1 . b
2 implies ( the
Dom of b
1 . (the Comp of b1 . [b3,b2]) = the
Dom of b
1 . b
2 & the
Cod of b
1 . (the Comp of b1 . [b3,b2]) = the
Cod of b
1 . b
3 ) ) ) & ( for b
2, b
3, b
4 being
Element of the
Morphisms of b
1 holds
( the
Dom of b
1 . b
4 = the
Cod of b
1 . b
3 & the
Dom of b
1 . b
3 = the
Cod of b
1 . b
2 implies the
Comp of b
1 . [b4,(the Comp of b1 . [b3,b2])] = the
Comp of b
1 . [(the Comp of b1 . [b4,b3]),b2] ) ) & ( for b
2 being
Element of the
Objects of b
1 holds
( the
Dom of b
1 . (the Id of b1 . b2) = b
2 & the
Cod of b
1 . (the Id of b1 . b2) = b
2 & ( for b
3 being
Element of the
Morphisms of b
1 holds
( the
Cod of b
1 . b
3 = b
2 implies the
Comp of b
1 . [(the Id of b1 . b2),b3] = b
3 ) ) & ( for b
3 being
Element of the
Morphisms of b
1 holds
( the
Dom of b
1 . b
3 = b
2 implies the
Comp of b
1 . [b3,(the Id of b1 . b2)] = b
3 ) ) ) ) ) );
theorem Th28: :: CAT_1:28
canceled;
theorem Th29: :: CAT_1:29
definition
let c
1, c
2 be
set ;
func 1Cat c
1,c
2 -> strict Category equals :: CAT_1:def 9
CatStr(#
{a1},
{a2},
(a2 .--> a1),
(a2 .--> a1),
(a2,a2 .--> a2),
(a1 .--> a2) #);
correctness
coherence
CatStr(# {c1},{c2},(c2 .--> c1),(c2 .--> c1),(c2,c2 .--> c2),(c1 .--> c2) #) is strict Category;
end;
:: deftheorem Def9 defines 1Cat CAT_1:def 9 :
theorem Th30: :: CAT_1:30
canceled;
theorem Th31: :: CAT_1:31
canceled;
theorem Th32: :: CAT_1:32
theorem Th33: :: CAT_1:33
theorem Th34: :: CAT_1:34
theorem Th35: :: CAT_1:35
theorem Th36: :: CAT_1:36
theorem Th37: :: CAT_1:37
theorem Th38: :: CAT_1:38
theorem Th39: :: CAT_1:39
theorem Th40: :: CAT_1:40
theorem Th41: :: CAT_1:41
theorem Th42: :: CAT_1:42
theorem Th43: :: CAT_1:43
theorem Th44: :: CAT_1:44
theorem Th45: :: CAT_1:45
theorem Th46: :: CAT_1:46
theorem Th47: :: CAT_1:47
:: deftheorem Def10 defines monic CAT_1:def 10 :
:: deftheorem Def11 defines epi CAT_1:def 11 :
:: deftheorem Def12 defines invertible CAT_1:def 12 :
theorem Th48: :: CAT_1:48
canceled;
theorem Th49: :: CAT_1:49
canceled;
theorem Th50: :: CAT_1:50
canceled;
theorem Th51: :: CAT_1:51
theorem Th52: :: CAT_1:52
:: deftheorem Def13 defines * CAT_1:def 13 :
theorem Th53: :: CAT_1:53
canceled;
theorem Th54: :: CAT_1:54
theorem Th55: :: CAT_1:55
theorem Th56: :: CAT_1:56
theorem Th57: :: CAT_1:57
theorem Th58: :: CAT_1:58
theorem Th59: :: CAT_1:59
theorem Th60: :: CAT_1:60
theorem Th61: :: CAT_1:61
theorem Th62: :: CAT_1:62
theorem Th63: :: CAT_1:63
theorem Th64: :: CAT_1:64
theorem Th65: :: CAT_1:65
theorem Th66: :: CAT_1:66
theorem Th67: :: CAT_1:67
theorem Th68: :: CAT_1:68
theorem Th69: :: CAT_1:69
theorem Th70: :: CAT_1:70
theorem Th71: :: CAT_1:71
:: deftheorem Def14 defines " CAT_1:def 14 :
theorem Th72: :: CAT_1:72
canceled;
theorem Th73: :: CAT_1:73
theorem Th74: :: CAT_1:74
theorem Th75: :: CAT_1:75
theorem Th76: :: CAT_1:76
theorem Th77: :: CAT_1:77
:: deftheorem Def15 defines terminal CAT_1:def 15 :
:: deftheorem Def16 defines initial CAT_1:def 16 :
:: deftheorem Def17 defines are_isomorphic CAT_1:def 17 :
theorem Th78: :: CAT_1:78
canceled;
theorem Th79: :: CAT_1:79
canceled;
theorem Th80: :: CAT_1:80
canceled;
theorem Th81: :: CAT_1:81
theorem Th82: :: CAT_1:82
theorem Th83: :: CAT_1:83
theorem Th84: :: CAT_1:84
theorem Th85: :: CAT_1:85
theorem Th86: :: CAT_1:86
theorem Th87: :: CAT_1:87
theorem Th88: :: CAT_1:88
theorem Th89: :: CAT_1:89
theorem Th90: :: CAT_1:90
theorem Th91: :: CAT_1:91
theorem Th92: :: CAT_1:92
theorem Th93: :: CAT_1:93
definition
let c
1, c
2 be
Category;
mode Functor of c
1,c
2 -> Function of the
Morphisms of a
1,the
Morphisms of a
2 means :
Def18:
:: CAT_1:def 18
( ( for b
1 being
Element of the
Objects of a
1 holds
ex b
2 being
Element of the
Objects of a
2 st a
3 . (the Id of a1 . b1) = the
Id of a
2 . b
2 ) & ( for b
1 being
Element of the
Morphisms of a
1 holds
( a
3 . (the Id of a1 . (the Dom of a1 . b1)) = the
Id of a
2 . (the Dom of a2 . (a3 . b1)) & a
3 . (the Id of a1 . (the Cod of a1 . b1)) = the
Id of a
2 . (the Cod of a2 . (a3 . b1)) ) ) & ( for b
1, b
2 being
Element of the
Morphisms of a
1 holds
(
[b2,b1] in dom the
Comp of a
1 implies a
3 . (the Comp of a1 . [b2,b1]) = the
Comp of a
2 . [(a3 . b2),(a3 . b1)] ) ) );
existence
ex b1 being Function of the Morphisms of c1,the Morphisms of c2 st
( ( for b2 being Element of the Objects of c1 holds
ex b3 being Element of the Objects of c2 st b1 . (the Id of c1 . b2) = the Id of c2 . b3 ) & ( for b2 being Element of the Morphisms of c1 holds
( b1 . (the Id of c1 . (the Dom of c1 . b2)) = the Id of c2 . (the Dom of c2 . (b1 . b2)) & b1 . (the Id of c1 . (the Cod of c1 . b2)) = the Id of c2 . (the Cod of c2 . (b1 . b2)) ) ) & ( for b2, b3 being Element of the Morphisms of c1 holds
( [b3,b2] in dom the Comp of c1 implies b1 . (the Comp of c1 . [b3,b2]) = the Comp of c2 . [(b1 . b3),(b1 . b2)] ) ) )
end;
:: deftheorem Def18 defines Functor CAT_1:def 18 :
theorem Th94: :: CAT_1:94
canceled;
theorem Th95: :: CAT_1:95
canceled;
theorem Th96: :: CAT_1:96
theorem Th97: :: CAT_1:97
theorem Th98: :: CAT_1:98
theorem Th99: :: CAT_1:99
theorem Th100: :: CAT_1:100
:: deftheorem Def19 defines Obj CAT_1:def 19 :
theorem Th101: :: CAT_1:101
canceled;
theorem Th102: :: CAT_1:102
theorem Th103: :: CAT_1:103
theorem Th104: :: CAT_1:104
theorem Th105: :: CAT_1:105
:: deftheorem Def20 defines . CAT_1:def 20 :
theorem Th106: :: CAT_1:106
canceled;
theorem Th107: :: CAT_1:107
theorem Th108: :: CAT_1:108
theorem Th109: :: CAT_1:109
theorem Th110: :: CAT_1:110
theorem Th111: :: CAT_1:111
theorem Th112: :: CAT_1:112
theorem Th113: :: CAT_1:113
:: deftheorem Def21 defines id CAT_1:def 21 :
theorem Th114: :: CAT_1:114
canceled;
theorem Th115: :: CAT_1:115
theorem Th116: :: CAT_1:116
theorem Th117: :: CAT_1:117
theorem Th118: :: CAT_1:118
definition
let c
1, c
2 be
Category;
let c
3 be
Functor of c
1,c
2;
attr a
3 is
isomorphic means :: CAT_1:def 22
( a
3 is
one-to-one &
rng a
3 = the
Morphisms of a
2 &
rng (Obj a3) = the
Objects of a
2 );
attr a
3 is
full means :
Def23:
:: CAT_1:def 23
for b
1, b
2 being
Object of a
1 holds
(
Hom (a3 . b1),
(a3 . b2) <> {} implies for b
3 being
Morphism of a
3 . b
1,a
3 . b
2 holds
(
Hom b
1,b
2 <> {} & ex b
4 being
Morphism of b
1,b
2 st b
3 = a
3 . b
4 ) );
attr a
3 is
faithful means :
Def24:
:: CAT_1:def 24
for b
1, b
2 being
Object of a
1 holds
(
Hom b
1,b
2 <> {} implies for b
3, b
4 being
Morphism of b
1,b
2 holds
( a
3 . b
3 = a
3 . b
4 implies b
3 = b
4 ) );
end;
:: deftheorem Def22 defines isomorphic CAT_1:def 22 :
:: deftheorem Def23 defines full CAT_1:def 23 :
:: deftheorem Def24 defines faithful CAT_1:def 24 :
theorem Th119: :: CAT_1:119
canceled;
theorem Th120: :: CAT_1:120
canceled;
theorem Th121: :: CAT_1:121
canceled;
theorem Th122: :: CAT_1:122
theorem Th123: :: CAT_1:123
theorem Th124: :: CAT_1:124
theorem Th125: :: CAT_1:125
theorem Th126: :: CAT_1:126
theorem Th127: :: CAT_1:127
theorem Th128: :: CAT_1:128
theorem Th129: :: CAT_1:129
definition
let c
1, c
2 be
Category;
let c
3 be
Functor of c
1,c
2;
let c
4, c
5 be
Object of c
1;
func hom c
3,c
4,c
5 -> Function of
Hom a
4,a
5,
Hom (a3 . a4),
(a3 . a5) equals :: CAT_1:def 25
a
3 | (Hom a4,a5);
correctness
coherence
c3 | (Hom c4,c5) is Function of Hom c4,c5, Hom (c3 . c4),(c3 . c5);
end;
:: deftheorem Def25 defines hom CAT_1:def 25 :
theorem Th130: :: CAT_1:130
canceled;
theorem Th131: :: CAT_1:131
theorem Th132: :: CAT_1:132
theorem Th133: :: CAT_1:133