
theorem
  for L be antisymmetric transitive with_infima with_suprema RelStr for
  a,b,c be Element of L holds a <= b implies a \ c <= b \ c by Th6;
