Commit a3a54c07 authored by FAGES Francois's avatar FAGES Francois
Browse files

commit !under emacs ;-)

Merge branch 'develop' of gitlab.inria.fr:lifeware/biocham into develop
parents 46dd2512 a0c99644
......@@ -197,6 +197,8 @@ clear_model :-
),
set_option(show, {}),
retractall(nusmv:query_molecules(_)),
nb_setval(molecule_index, 0),
nb_setval(parameter_index, 0),
assertz(nusmv:query_molecules([])).
......
......@@ -441,7 +441,15 @@ rosenbrock(Equations, InitialTime, Duration, MaxStSz, MinStSz, Jacobian, Fields)
%Collect the data for numerical table
findall(Row, (saved_row(Data), Row =.. [row|Data]), RowList),
retractall(saved_row(Data)),
nb_setval(numerical_table, RowList).
( % patch to append the simulation when continue
nb_current(rsbk_continue,yes)
->
nb_getval(numerical_table, PreviousList),
append(PreviousList, RowList, Complete_list)
;
Complete_list = RowList
),
nb_setval(numerical_table, Complete_list).
%! rosenbrock_step(+Equations, +Jacobian, +Time, +CurrentState, +Parameters, +MaxStep, -NextState)
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment