let f be ManySortedSet of I; :: thesis: ( f is Segre-like & not f is trivial-yielding implies f is non-empty )
assume ( f is Segre-like & not f is trivial-yielding ) ; :: thesis: f is non-empty
then reconsider g = f as non trivial-yielding Segre-like ManySortedSet of I ;
now
assume {} in rng g ; :: thesis: contradiction
then consider i being set such that
A1: i in dom f and
A2: g . i = {} by FUNCT_1:def 3;
reconsider i = i as Element of I by A1, PARTFUN1:def 2;
per cases ( i = indx g or i <> indx g ) ;
end;
end;
hence f is non-empty by RELAT_1:def 9; :: thesis: verum