329 |
/* set optional inputs... */ |
/* set optional inputs... */ |
330 |
IDASetErrHandlerFn(ida_mem, &integrator_ida_error, (void *)blsys); |
IDASetErrHandlerFn(ida_mem, &integrator_ida_error, (void *)blsys); |
331 |
IDASetRdata(ida_mem, (void *)blsys); |
IDASetRdata(ida_mem, (void *)blsys); |
332 |
/* IDASetMaxStep(ida_mem, integrator_get_maxstep(blsys)); */ |
IDASetMaxStep(ida_mem, integrator_get_maxstep(blsys)); |
333 |
/* IDASetInitStep(ida_mem, integrator_get_stepzero(blsys)); */ |
IDASetInitStep(ida_mem, integrator_get_stepzero(blsys)); |
334 |
/* IDASetMaxNumSteps(ida_mem, integrator_get_maxsubsteps(blsys)); */ |
IDASetMaxNumSteps(ida_mem, integrator_get_maxsubsteps(blsys)); |
335 |
|
if(integrator_get_minstep(blsys)>0){ |
336 |
|
ERROR_REPORTER_HERE(ASC_PROG_NOTE,"IDA does not support minstep (ignored)"); |
337 |
|
} |
338 |
/* there's no capability for setting *minimum* step size in IDA */ |
/* there's no capability for setting *minimum* step size in IDA */ |
339 |
|
|
340 |
|
|