theorem
  x in rng p implies rng(p -| x) c= rng p
proof
  assume x in rng p;
  then ex n st n = x..p - 1 & p | Seg n = p -| x by Def5;
  hence thesis by RELAT_1:70;
end;
