
theorem Th8:
  for L being non empty reflexive RelStr, x,y being Element of L holds
  x in wayabove y iff x >> y
proof
  let L be non empty reflexive RelStr, x,y be Element of L;
  x in wayabove y iff ex z being Element of L st x = z & z >> y;
  hence thesis;
end;
