/* // declared in "Cog_Wheel_In_1.inc" and in "Cog_Wheel_1.inc" :
//---------------------------------------------------------------------
#macro Cog_Wheel_Radius (Cog_Number, Cog_Distance)  //-----------------  
  Cog_Distance*Cog_Number/(2*pi)
#end //----------------------------------------------------------------
*/
//---------------------------------------------------------------------
//---------------------------------------------------------------------
// optional textures !!!
#declare Gear_Texture_Blanc = 
        texture { Polished_Chrome 
                } // end of texture
#declare Gear_Texture_Raw = 
        texture { pigment{ color rgb<1,0.80,0.45>*0.8} 
                  normal { bumps 0.35 scale 0.005} 
                  //finish { phong 0.5 reflection{ 0.15 metallic 0.25} }
                } // end of texture
//---------------------------------------------------------------------
#include "Cog_Wheel_1.inc"    
// around y axis, symmetric to xz plane
// declares also macro 'Cog_Wheel_Radius (Cog_Number, Cog_Distance)' 
//---------------------------------------------------------------------
#local N_2 = 18; 
#local CD = 0.15; // cog distance 
#local CZ = 0.5;  // wheel thickness

#local Time = clock +0.5 ;
#local Turn =  Time*360/N_2;//  smallest
//---------------------------------------------------------------------
 object{ Cog_Wheel_1    ( N_2, CD, CZ) // Cog_Number, Cog_Distance, Gear_Y,
         rotate<90,0, 180/N_2 - 2*Turn>
         scale<0.98,0.98,1>
         translate<0.001+ Cog_Wheel_Radius(N_2,CD)-Cog_Wheel_Radius(N_2,CD),0,0>} 
 //--------------------------------------------------------------------
//---------------------------------------------------------------------