theorem
  rng seq c= dom h implies -(h/*seq) = (-h)/*seq
by Th8;
