@@ -11,16 +11,16 @@ tf = 100000.0
1111
1212# generate ModelingToolkit ODEs
1313@timeit to " Parse Network" prnbng = loadrxnetwork (BNGNetwork (), joinpath (datadir, " bcr.net" ))
14- show (to)
14+ show (to)
1515rn = prnbng. rn
1616obs = [eq. lhs for eq in observed (rn)]
1717
1818@timeit to " Create ODESys" osys = convert (ODESystem, rn)
19- show (to)
19+ show (to)
2020
2121tspan = (0. ,tf)
2222@timeit to " ODEProb No Jac" oprob = ODEProblem (osys, Float64[], tspan, Float64[])
23- show (to)
23+ show (to)
2424oprob_sparse = ODEProblem (osys, Float64[], tspan, Float64[]; sparse= true );
2525
2626
@@ -77,7 +77,7 @@ W = I - 1.0*jaccache
7777prectmp = ilu (W, τ = 50.0 )
7878preccache = Ref (prectmp)
7979
80- τ1 = 1e2
80+ const τ1 = 1e2
8181function psetupilu (p, t, u, du, jok, jcurPtr, gamma)
8282 if jok
8383 sparsejacprob. f. jac (jaccache,u,p,t)
@@ -96,7 +96,7 @@ function precilu(z,r,p,t,y,fy,gamma,delta,lr)
9696 ldiv! (z,preccache[],r)
9797end
9898
99- τ2 = 1e10
99+ const τ2 = 1e2
100100function incompletelu (W,du,u,p,t,newW,Plprev,Prprev,solverdata)
101101 if newW === nothing || newW
102102 Pl = ilu (convert (AbstractMatrix,W), τ = τ2)
@@ -111,7 +111,7 @@ abstols = 1.0 ./ 10.0 .^ (5:8)
111111reltols = 1.0 ./ 10.0 .^ (5 : 8 );
112112
113113
114- solve (sparsejacprob,CVODE_BDF (linear_solver= :KLU ), abstol= 1e-5 , reltol= 1e-5 )
114+ solve (sparsejacprob,CVODE_BDF (linear_solver= :KLU ), abstol= 1e-8 , reltol= 1e-8 );
115115
116116
117117setups = [
@@ -164,10 +164,10 @@ plot(wp;label=names,xlimit=xlimit,ylimit=ylimit)
164164
165165
166166setups = [
167- Dict (:alg => TRBDF2 (linsolve= KrylovJL_GMRES (),autodiff= false ,precs= incompletelu_fceri ,concrete_jac= true )),
168- Dict (:alg => QNDF (linsolve= KrylovJL_GMRES (),autodiff= false ,precs= incompletelu_fceri ,concrete_jac= true )),
169- Dict (:alg => FBDF (linsolve= KrylovJL_GMRES (),autodiff= false ,precs= incompletelu_fceri ,concrete_jac= true )),
170- Dict (:alg => KenCarp4 (linsolve= KrylovJL_GMRES (),autodiff= false ,precs= incompletelu_fceri ,concrete_jac= true ))
167+ Dict (:alg => TRBDF2 (linsolve= KrylovJL_GMRES (),autodiff= false ,precs= incompletelu ,concrete_jac= true )),
168+ Dict (:alg => QNDF (linsolve= KrylovJL_GMRES (),autodiff= false ,precs= incompletelu ,concrete_jac= true )),
169+ Dict (:alg => FBDF (linsolve= KrylovJL_GMRES (),autodiff= false ,precs= incompletelu ,concrete_jac= true )),
170+ Dict (:alg => KenCarp4 (linsolve= KrylovJL_GMRES (),autodiff= false ,precs= incompletelu ,concrete_jac= true ))
171171 ];
172172
173173
0 commit comments