:: deftheorem Def9 defines resource MMLQUER2:def 9 :
for X being set
for A being FinSequence
for f being Function
for b4 being Relation of X holds
( b4 = resource (X,A,f) iff for x, y being set holds
( x,y in b4 iff ( x in X & y in X & A <- (f . x) <> 0 & ( A <- (f . x) < A <- (f . y) or A <- (f . y) = 0 ) ) ) );