// ColoredRings

#include "RGBfromHue.inc"
#include "AngOfDist.inc" 
#include "colors.inc"

#declare inc=0.5;  // controls distance between spheres

#declare R=0.5;
#while (R<10)  
	#declare A=0;
	#while (A<360)
	
		sphere
		{
			< R*cos(radians(A)), 0, R*sin(radians(A)) >, inc 
            
            pigment
            {
            	color m_RGBfromHue(A/360)
            }
			finish
			{
				phong 1
			}
		}
	


	#declare A=A+m_AngOfDist (R, inc)
	#end      
#declare R=R+inc;
#end

light_source
{
	< 0, 24, 0>
	color White
}

camera
{
	location < 0, 12, 0>
	look_at < 0, 0, 0>
}