module: delay_double_fix
description:  Fixed sample delay for double signal. Coded by Min Park 1/8/09
             (converted 08/02/09)
parameters:  double fixed_delay
inputs:  double in
outputs:  double out
classes:  
static_variables:  double buf[1000] int nn int max_index 
init:  
   if( fixed_delay < 0){
      printf("delay can't be negative.\n");
      printf("delay is set to zero.\n");
      max_index = 0;
   }
   else if( fixed_delay > 999){
      printf("delay can't exceed 999 samples.\n");
      printf("delay is set to 999 samples.\n");
      max_index = 999;
   }
   else{
      max_index = (int)fixed_delay;
   }

   for( nn=0; nn<=max_index ; nn++){
      buf[nn] = 0.0;
   }
end:  
code:  
   buf[0] = in;
   out = buf[max_index];
   for( nn=max_index ; nn >= 1 ; nn--){
      buf[nn] = buf[nn-1];
   }



functions:  
custom_classes_definition:  
custom_classes_code:  
