global_settings { assumed_gamma 1 }
background { rgb 1 }

#declare Debug=true;
#include "sponge.inc"
   
   camera { c2 }
   object { test_light }
   
   #declare base_obj=
   mesh { 
      #local X=0; #while (X<9)
      #local Y=0; #while (Y<5)
      #local Z=0; #while (Z<9)
      #switch(Y)
         #case(0) #local CA=l1 #break 
         #case(1) #local CA=l2 #break
         #case(2) #local CA=l1 #break
         #case(3) #local CA=l4 #break
         #case(4) #local CA=l5 #break
      #end                   
      #if(CA[X][Z])
         HOLLOW_SPONGE(<X,Y,Z>,9)
         #if(Y!=4)
            HOLLOW_SPONGE(<X,8-Y,Z>,9)
         #end
      #end
   #local Z=Z+1; #end
   #local Y=Y+1; #end
   #debug concat(str(X+1,1,0),"/9\n")
   #local X=X+1; #end
   scale 1/9
   }
   
   object {
      Build_Sponge(base_obj,1)
      pigment { rgb 1 }
      scale 9
   }