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

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

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

revision 1305 by johnpye, Thu Mar 1 06:04:21 2007 UTC revision 1306 by johnpye, Sat Mar 3 11:50:47 2007 UTC
# Line 1556  struct var_variable *integrator_get_inde Line 1556  struct var_variable *integrator_get_inde
1556      return sys->x;      return sys->x;
1557  }  }
1558    
1559  int integrator_write_matrix(const IntegratorSystem *sys, FILE *fp){  int integrator_write_matrix(const IntegratorSystem *sys, FILE *fp,const char *type){
1560      asc_assert(sys);      asc_assert(sys);
1561      asc_assert(sys->enginedata);      asc_assert(sys->enginedata);
1562      asc_assert(sys->internals);      asc_assert(sys->internals);
1563      asc_assert(sys->internals->name);      asc_assert(sys->internals->name);
1564      if(sys->internals->writematrixfn){      if(sys->internals->writematrixfn){
1565          return (sys->internals->writematrixfn)(sys,fp);          return (sys->internals->writematrixfn)(sys,fp,type);
1566      }else{      }else{
1567          ERROR_REPORTER_HERE(ASC_PROG_NOTE,"Integrator '%s' defines no write_matrix function.",sys->internals->name);          ERROR_REPORTER_HERE(ASC_PROG_NOTE,"Integrator '%s' defines no write_matrix function.",sys->internals->name);
1568          return -1;          return -1;

Legend:
Removed from v.1305  
changed lines
  Added in v.1306

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