theorem Th24:
  (-c)(#)g = -(c(#)g)
proof
  thus (-c)(#)g = c(#)-g by Th22
    .= -(c(#)g) by Th23;
end;
