
theorem Th4:
  (-1_F_Complex) * (-1_F_Complex) = 1_F_Complex
proof
  -1r = -1_F_Complex by COMPLFLD:2,8;
  hence thesis by COMPLFLD:8;
end;
