global_settings{radiosity{}}#declare f=function{pigment{granite}};union{isosurface{function{x*x+y*y+z*z-f(x,y,z).red} pigment{color rgb<1,1,2>/2}finish{specular 1}}sphere{<-.13,-.05,-.7> .05 pigment{rgb<4,2,0>}}translate z*1.5}light_source{0,1}