#include "colors.inc"
background {White}
camera{
    location <0, 0, -20>
    look_at <4, 0, 0>
}

light_source{ <10,10,-10> White }  
light_source{ <-10,10,-10> White }

#declare thres = 0;  
#while (thres < 5) 
 union {  
  sphere { <-5, 4, 0>, 2 pigment {rgbt<1,0,0,.7>} }
  sphere { <-5, 2, 0>, 2 pigment {rgbt<0,0,1,.7>} }    
  blob {
    threshold 0.2*thres+.2
    sphere { <-5, 4, 0>, 2, 1 pigment {Red} }
    sphere { <-5, 2, 0>, 2, 1 pigment {Blue} }     
    } 
  translate <5*thres,0,0>    
 }
 #declare thres = thres + 1; 
#end  

#declare stren = 0; 
#while (stren < 5)  
 union {
  sphere { <-5, -3, 0>, 2 pigment {rgbt<1,0,0,.7>} }
  sphere { <-5, -5, 0>, 2 pigment {rgbt<0,0,1,.7>} }    
  blob {
    threshold .4
    sphere { <-5, -3, 0>, 2, .2*stren+.4 pigment {Red} }
    sphere { <-5, -5, 0>, 2, .2*stren+.4 pigment {Blue} }  
    }   
  translate < 5*stren,0,0> 
 }  
 #declare stren = stren + 1;
#end