GDIST
#define GDIST(x,y) ((x-gx)*(x-gx) + (y-gy)*(y-gy))
#define GDIST(x,y) ((x-gx)*(x-gx)+(y-gy)*(y-gy))