let a, b, c, d be Element of Hom o; :: thesis: for f, g, h being Element of the carrier' of C st S1[a,b,f] & S1[b,c,g] & S1[c,d,h] holds
H1(h,H1(g,f)) = H1(H1(h,g),f)
let f, g, h be Morphism of C; :: thesis: ( S1[a,b,f] & S1[b,c,g] & S1[c,d,h] implies H1(h,H1(g,f)) = H1(H1(h,g),f) )
assume
( dom b = cod f & a = b * f & dom c = cod g & b = c * g & dom d = cod h & c = d * h )
; :: thesis: H1(h,H1(g,f)) = H1(H1(h,g),f)
then
( dom g = cod f & dom h = cod g )
by CAT_1:42;
hence
H1(h,H1(g,f)) = H1(H1(h,g),f)
by CAT_1:43; :: thesis: verum