reserve a,b,n for Element of NAT;

theorem Th3:
  for a being Real holds a to_power 2 = (-a) to_power 2
proof
  let a be Real;
  2 = 1*2;
  then 2 is even by ABIAN:def 2;
  hence thesis by POWER:47;
end;
