home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / general / fractal / kaos.lha / fftlib / fft_malloc.c < prev    next >
Encoding:
C/C++ Source or Header  |  1989-12-06  |  341 b   |  21 lines
  1. /*
  2. ### allocate memory if necessary for time series variable ###
  3. */
  4.  
  5. fft_malloc()
  6. {
  7.     extern int tser_len,fft_mdim;
  8.     extern double *fft;
  9.  
  10.     if(fft_mdim ==0){
  11.         fft_mdim = tser_len * 2;
  12.         fft = (double *)dvector(0,fft_mdim-1);
  13.     }
  14.     else {
  15.         if(fft_mdim < tser_len * 2){
  16.             fft_mdim = tser_len * 2;
  17.             (void) rdvector(fft,0,fft_mdim-1);
  18.         }
  19.     }
  20. }
  21.