theorem
  {a,b}--{s,t} = {a-s,a-t,b-s,b-t}
proof
  thus {a,b}--{s,t} = {a,b}++{-s,-t} by Th20
    .= {a-s,a-t,b-s,b-t} by Th53;
end;
