constant R,r;
R=2;
r=0.5;
variable_group x,y,z;
function f1;
f1=(x^2+y^2+z^2+R^2-r^2)^2-4*R^2*(x^2+y^2);
function sphere_990787952;
sphere_990787952=(x-(0+I*0))^2+(y-(0+I*0))^2+(z-(0+I*0))^2-(5.000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000)^2;

END;

