set G = the Ring;
set i = RingMorphismStr(# the Ring, the Ring,(id the Ring) #);
fun RingMorphismStr(# the Ring, the Ring,(id the Ring) #) = id the Ring ;
hence ex b1 being RingMorphismStr st
( b1 is strict & b1 is RingMorphism-like ) by Def5; :: thesis: verum