16 November 2007 1:43:58.516 PM SINT_TEST Test the FFTPACK5 Sine Transform routines. TEST01 For real fast sine transforms, 1D, SINT1I initializes the transforms, SINT1F does a forward transforms; SINT1B 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.631740 2 -0.506623E-03 3 0.204994 4 0.374568E-02 5 0.133363 6 -0.308917E-02 7 0.949925E-01 8 -0.887185E-02 ...... .............. 4096 0.836999E-04 The retrieved data: 1 0.168747E-01 2 0.524182 3 0.809891 4 0.916770 5 0.150085 6 0.646337E-02 7 0.819248 8 0.400065 ...... .............. 4096 0.627097 DSINT_TEST For double precision fast sine transforms, 1D, DSINT1I initializes the transforms, DSINT1F does a forward transforms; DSINT1B 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.631740 2 -0.506637E-03 3 0.204992 4 0.374571E-02 5 0.133361 6 -0.308919E-02 7 0.949909E-01 8 -0.887183E-02 ...... .............. 4096 0.835070E-04 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 SINT_TEST Normal end of execution. 16 November 2007 1:43:58.546 PM