// CAMERA, LIGHT, AND DEFAULT FINISH
camera
{
	location <1, 1, -1>*3 look_at <0, 0, 0> angle 41
}
light_source
{
	<20, 70, -100> rgb <1, .9, .7>*2
}

sky_sphere
{
	pigment {rgb <.2, .5, .8>}
      	pigment
      	{
      		granite
      		color_map 
	      	{
	       		[.4 rgbt 1]
	       		[.8 rgb .9 transmit .4]
	       	}
	        scale <1, .6, 1>}
	}

fog {fog_type 2 color rgb <.7, .9, 1> distance 200 fog_alt 50}

#declare iter=3;

#declare scal=0.5; 

#declare AH=.20;

#declare set=box{-0.5,0.5 rotate <45,0,45> }

#macro set1()
        sphere {0,0.5
#end

#macro rec(n)
	#if(n>0)
		union{
		rec(n-1)}
		rec(n-1) scale scal translate < AH, AH, AH>}
		rec(n-1) scale scal translate < AH, AH,-AH>}
		rec(n-1) scale scal translate < AH,-AH, AH>}
		rec(n-1) scale scal translate <-AH, AH, AH>}
		rec(n-1) scale scal translate < AH,-AH,-AH>}
		rec(n-1) scale scal translate <-AH,-AH, AH>}
		rec(n-1) scale scal translate <-AH, AH,-AH>}
		rec(n-1) scale scal translate <-AH,-AH,-AH>}
	#else
		set1()
	#end
#end
   
union
{
	rec(iter)}
	pigment{color rgb <0.9,0.1,0.3>}
}