
theorem Th13:
  for T being non empty RelStr holds
  T is infs-inheriting sups-inheriting full SubRelStr of T
proof
  let T be non empty RelStr;
  reconsider R = T as full SubRelStr of T by YELLOW_6:6;
A1: R is infs-inheriting;
  R is sups-inheriting;
  hence thesis by A1;
end;
