reserve a,b,c,x,y,z for Real;

theorem
  a <= 0 implies sqrt a^2 = -a
proof
A1: a^2 = (-a)^2;
  assume a <= 0;
  hence thesis by A1,Def2;
end;
