//**********************  Equations and labels 

#declare Eq_dy = array[5];
#declare Eq = array[5];
#declare Eq_dy[4] = -.01;
#declare Eq_dy[3] = .2;
#declare Eq_dy[2] = .43;
#declare Eq_dy[1] = .65;
#declare Eq_dy[0] = .87;

#declare ic=0;
#while(ic<5)
      #declare Eq[ic]=box {0,<1,.22,.001>
          texture{ 
               pigment{ 
                    image_map {
                         png "circular_motion_equations4.png" // the file to read (iff/tga/gif/png/jpeg/tiff/sys)
                         map_type 0        // 0=planar, 1=spherical, 2=cylindrical, 5=torus
                         interpolate 2     // 0=none, 1=linear, 2=bilinear, 4=normalized distance
                     } 
               }
               finish{Luminous} 
               scale 1.1
               translate  -y*Eq_dy[ic]
          }
          scale 1
          translate -<.67,.11,0>
     }

     #declare ic=ic+1;
#end     






#declare Ev_dy = array[5];
#declare Ev = array[5];
#declare Ev_dy[4] = .04;
#declare Ev_dy[3] = .23;
#declare Ev_dy[2] = .43;
#declare Ev_dy[1] = .63;
#declare Ev_dy[0] =.82;

#declare ic=0;
#while(ic<5)
      #declare Ev[ic]=box {0,<.20,.20,.001> 
          texture{ 
               pigment{ 
                    image_map {
                         png "circular_motion_vectors.png" // the file to read (iff/tga/gif/png/jpeg/tiff/sys)
                         map_type 0        // 0=planar, 1=spherical, 2=cylindrical, 5=torus
                         interpolate 2     // 0=none, 1=linear, 2=bilinear, 4=normalized distance
                     } 
               }
               finish{Luminous}           
               translate  -y*Ev_dy[ic]-.445*x         scale 1.5
          }

          translate -.1*(x+y)
     }
     #declare ic=ic+1;
#end     

