16 November 2007   1:43:51.933 PM
 
COST_TEST
  Test the FFTPACK5 Cosine Transform routines.
 
TEST01
  For real fast cosine transforms, 1D,
  COST1I initializes the transforms,
  COST1F does a forward transforms;
  COST1B does a backward transforms.
 
  The number of data items is N = 4096
 
  The original data:
 
       1    0.154414E-01
       2    0.524056    
       3    0.809301    
       4    0.916710    
       5    0.149759    
       6    0.647463E-02
       7    0.819028    
       8    0.400086    
  ......  ..............
    4096    0.625828    
 
  The FFT coefficients:
 
       1    0.496832    
       2   -0.821193E-02
       3   -0.151984E-03
       4   -0.679064E-02
       5    0.103586E-01
       6   -0.145759E-01
       7    0.104161E-02
       8   -0.147735E-01
  ......  ..............
    4096    0.225510E-02
 
  The retrieved data:
 
       1    0.150008E-01
       2    0.524208    
       3    0.809324    
       4    0.916718    
       5    0.149774    
       6    0.648852E-02
       7    0.819026    
       8    0.400090    
  ......  ..............
    4096    0.626266    
 
TEST02
  For double precision fast cosine transforms, 1D,
  DCOST1I initializes the transforms,
  DCOST1F does a forward transforms;
  DCOST1B does a backward transforms.
 
  The number of data items is N = 4096
 
  The original data:
 
       1    0.154414E-01
       2    0.524056    
       3    0.809301    
       4    0.916710    
       5    0.149759    
       6    0.647463E-02
       7    0.819028    
       8    0.400086    
  ......  ..............
    4096    0.625828    
 
  The FFT coefficients:
 
       1    0.496832    
       2   -0.821193E-02
       3   -0.151919E-03
       4   -0.679062E-02
       5    0.103586E-01
       6   -0.145759E-01
       7    0.104165E-02
       8   -0.147735E-01
  ......  ..............
    4096    0.225528E-02
 
  The retrieved data:
 
       1    0.154414E-01
       2    0.524056    
       3    0.809301    
       4    0.916710    
       5    0.149759    
       6    0.647463E-02
       7    0.819028    
       8    0.400086    
  ......  ..............
    4096    0.625828    
 
COST_TEST
  Normal end of execution.
 
16 November 2007   1:43:51.942 PM