home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / general / fractal / kaos.lha / tserlib / tser_clear_proc.c < prev    next >
Encoding:
C/C++ Source or Header  |  1989-12-06  |  284 b   |  19 lines
  1. /*
  2. ### Clear time series ###
  3. */
  4.  
  5. tser_clear_proc()
  6. {
  7.     extern int tser_mdim,fft_mdim,tser_len;
  8.     extern double *tser,*fft;
  9.  
  10.     if(tser_mdim !=0 ) {
  11.         (void) free_dvector(fft,0,fft_mdim-1);
  12.         (void) free_dvector(tser,0,tser_mdim -1);
  13.         tser_mdim = 0;
  14.         fft_mdim = 0;
  15.         tser_len = 0;
  16.     }
  17. }
  18.  
  19.