/[ascend]/trunk/base/generic/solver/lsode.c
ViewVC logotype

Diff of /trunk/base/generic/solver/lsode.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1147 by johnpye, Mon Jan 15 10:42:11 2007 UTC revision 1148 by johnpye, Mon Jan 15 23:40:40 2007 UTC
# Line 89  Line 89 
89  #include "integrator.h"  #include "integrator.h"
90  #include "lsode.h"  #include "lsode.h"
91    
92    /* #define TIMING_DEBUG */
93    
94  const IntegratorInternals integrator_lsode_internals = {  const IntegratorInternals integrator_lsode_internals = {
95      integrator_lsode_create      integrator_lsode_create
96      ,integrator_lsode_params_default      ,integrator_lsode_params_default
# Line 149  const IntegratorInternals integrator_lso Line 151  const IntegratorInternals integrator_lso
151  #define GETCOMMON GET_LSODE_COMMON  #define GETCOMMON GET_LSODE_COMMON
152  #endif  #endif
153    
 #define TIMING_DEBUG  
154  #define ASC_CLOCK_CHECK_PERIOD 1 /* number of FEX or JEX cycled between GUI updates */  #define ASC_CLOCK_CHECK_PERIOD 1 /* number of FEX or JEX cycled between GUI updates */
155  #define ASC_CLOCK_MAX_GUI_WAIT (0.5*CLOCKS_PER_SEC) /* max number of clock ticks between GUI updates */  #define ASC_CLOCK_MAX_GUI_WAIT (0.5*CLOCKS_PER_SEC) /* max number of clock ticks between GUI updates */
156  /* definitions of lsode supported children of atoms, etc */  /* definitions of lsode supported children of atoms, etc */
# Line 880  static void LSODE_JEX(int *neq ,double * Line 881  static void LSODE_JEX(int *neq ,double *
881      /* Do we need to do clock check? */      /* Do we need to do clock check? */
882      if((++clockcheck % ASC_CLOCK_CHECK_PERIOD)==0){      if((++clockcheck % ASC_CLOCK_CHECK_PERIOD)==0){
883          /* do we need to update the GUI? */          /* do we need to update the GUI? */
884    #ifdef TIMING_DEBUG
885          CONSOLE_DEBUG("CLOCK = %ld", clock());          CONSOLE_DEBUG("CLOCK = %ld", clock());
886    #endif
887          if((clock() - lsodedata->lastwrite) > ASC_CLOCK_MAX_GUI_WAIT){          if((clock() - lsodedata->lastwrite) > ASC_CLOCK_MAX_GUI_WAIT){
888              integrator_output_write(l_lsode_blsys);              integrator_output_write(l_lsode_blsys);
889              lsodedata->lastwrite = clock(); /* don't count the update time, or we might never get anything done */              lsodedata->lastwrite = clock(); /* don't count the update time, or we might never get anything done */

Legend:
Removed from v.1147  
changed lines
  Added in v.1148

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22