( 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