( RelStr(# the carrier of (Sigma S),the InternalRel of (Sigma S) #) = RelStr(# the carrier of S,the InternalRel of S #) & RelStr(# the carrier of (Sigma T),the InternalRel of (Sigma T) #) = RelStr(# the carrier of T,the InternalRel of T #) ) by YELLOW_9:def 4;
hence f is Function of (Sigma S),(Sigma T) ; :: thesis: verum