theorem Th4: :: UNIFORM2:5
for X being set
for R being Relation of X st R is_symmetric_in X holds
R ~ is_symmetric_in X