:: deftheorem GRDef defines GeneratedRelation ROUGHS_3:def 3 :
for R being non empty RelStr
for H being Function of (bool the carrier of R),(bool the carrier of R)
for b3 being Relation of the carrier of R holds
( b3 = GeneratedRelation (R,H) iff for x, y being Element of R holds
( [x,y] in b3 iff x in H . {y} ) );