consider G, H being AddGroup;
set z = ZERO G,H;
fun (ZERO G,H) is additive ;
then ZERO G,H is GroupMorphism-like by Def18;
hence ex b1 being GroupMorphismStr st
( b1 is strict & b1 is GroupMorphism-like ) ; :: thesis: verum