:: deftheorem HomDef defines Homogen RVSUM_3:def 10 :
for f being heterogeneous non empty real-valued positive FinSequence
for b2 being real-valued FinSequence holds
( b2 = Homogen f iff ex i, j being Nat st
( i = the Element of MeanLess f & j = the Element of MeanMore f & b2 = Replace (f,i,j,(Mean f),(((f . i) + (f . j)) - (Mean f))) ) );