theorem
  abs(H)#x = abs(H#x) & (-H)#x = -(H#x) by Th31;
