theorem Th60:
  --(F--G) = (--F) ++ G
proof
  thus --(F--G) = (--F)----G by Lm4
    .= (--F) ++ G;
end;
