#include "colors.inc"
#include "stones.inc"
  
#declare c_loc = < -4.5,  8.0, -4.0>;

camera {
  location  c_loc
  look_at   <-4.5, 0.0, -2>
}

light_source {
  c_loc                  // light's position (translated below)
  color rgb <1,1,1>    // light's color
}

#declare units_feet = 12;
  
#declare floor_width = 3;
#declare floor_depth = 3;
#declare x_count = 0;
#declare z_count = 0;
#declare s1 = seed(2883);

#declare tile_floor = union{
        #while (x_count < floor_width )
          #while (z_count < floor_depth )
            superellipsoid {
              <.02,.1>
              rotate 90*x
              translate <-1,0,-1>
              scale <.5,.05,.5>
              scale units_feet
              translate <-x_count*units_feet,0,-z_count*units_feet>
              texture { 
                pigment { color rgb 0.6 } 
                finish { ambient 0.0 diffuse 1.0 }
              }                
            }
            #declare z_count = z_count+1;
          #end
          #declare z_count=0;
          #declare x_count=x_count+1;
        #end                   
        box { 
          <0,-.1,0> <-floor_width*units_feet,.565,-floor_depth*units_feet> 
          texture { 
            pigment { color rgb 1.0 } 
            finish {ambient 0.0 diffuse 1.0 } 
          }
        }        
        translate 6*z                  
}

object { 
  tile_floor 
  scale <0.25, 1, 0.25>
}