#include "arkon_texture.pov"

#declare zyhm_ranton = 
    difference {
	sphere {
	    <0, 0, 0>, 750
	}
	union {
	    #declare i = 0
	    #while (i < 360) 
		#debug concat ("\ni: ", str(i, 0, 0))
		sphere {
		    <0, 0, 0>, 100
		    translate <0, 0, 750>
		    rotate <0, i, 0>
		}
		#declare i = i + 30
	    #end
	}
	sphere {
	    <0, 0, 0>, 100
	    translate <0, 0, 750>
	    rotate <90, 0, 0>
	}
	sphere {
	    <0, 0, 0>, 100
	    translate <0, 0, 750>
	    rotate <-90, 0, 0>
	}
	texture {
	    Arkon_Texture
	}
    }