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