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

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

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

revision 992 by johnpye, Thu Dec 21 10:44:32 2006 UTC revision 993 by johnpye, Fri Dec 22 11:03:51 2006 UTC
# Line 32  Line 32 
32  #include "ida.h"  #include "ida.h"
33  #include "slv_common.h"  #include "slv_common.h"
34  #include "slv_client.h"  #include "slv_client.h"
35    #include "slv_stdcalls.h"
36  #include <utilities/ascPanic.h>  #include <utilities/ascPanic.h>
37    
38  #include "samplelist.h"  #include "samplelist.h"
# Line 418  int integrator_analyse_dae(IntegratorSys Line 419  int integrator_analyse_dae(IntegratorSys
419      CONSOLE_DEBUG("Starting DAE analysis");      CONSOLE_DEBUG("Starting DAE analysis");
420      IntegInitSymbols();      IntegInitSymbols();
421    
422        assert(sys->system);
423        CONSOLE_DEBUG("Block partitioning system...");
424        if(slv_block_partition(sys->system)){
425            ERROR_REPORTER_HERE(ASC_PROG_ERR,"Unable to block-partition system");
426            return 0;
427        }
428    
429      assert(sys->indepvars==NULL);      assert(sys->indepvars==NULL);
430    
431      sys->indepvars = gl_create(10L);  /* t var info */      sys->indepvars = gl_create(10L);  /* t var info */

Legend:
Removed from v.992  
changed lines
  Added in v.993

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