program TEST
	print *, (-2**2)
	print *, (-(2)**2)
	a=2
	print *, (-a**2)
	stop
end