#include "colors.inc"
#include "8D_noise.inc"


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

light_source {
   <0, 60, 0> color White
}                             
            
// Init our noise function
ED_NOISE_Init(12345, 2)

// Create an array of boxes 100x100
// each colored based on Perlin noise
#local i = 0;
#local j = 0;

#while (i < 100)
   #local j = 0;
   #while (j < 100)
      object {
         box {
            <-0.5, -0.5, -0.5>,     // Lower left corner
            <0.5, 0.5, 0.5>        // Upper right corner
            texture {
               pigment {
                  rgb <0, ED_NOISE_Noise_2D(i, j, 0.5), 0>
               }
            }
            translate <j-50, i-50, 0>
         }
      }
      #local j = j + 1;   
   #end         
   #local i = i + 1;
#end