| /dports/math/maxima/maxima-5.43.2/share/odepack/src/ |
| H A D | dlhin.lisp | 38 (tdist 0.0d0) (tround 0.0d0) (yddnrm 0.0d0))
39 (declare (type (double-float) yddnrm tround tdist t1 hub hrat hnew hlb
99 (setf yddnrm (dvnorm n temp ewt))
101 ((> (* yddnrm hub hub) two)
102 (setf hnew (f2cl-lib:fsqrt (/ two yddnrm))))
|
| /dports/science/lammps/lammps-stable_29Sep2021/src/KOKKOS/ |
| H A D | fix_rx_kokkos.cpp | 433 double yddnrm = 0.0; in k_rkf45_h0() local
437 yddnrm += wterr * wterr; in k_rkf45_h0()
440 yddnrm = sqrt( yddnrm / double(neq) ); in k_rkf45_h0()
454 hnew = (yddnrm*hmax*hmax > 2.0) ? sqrt(2.0 / yddnrm) : sqrt(hg * hmax); in k_rkf45_h0()
752 double yddnrm = 0.0; in rkf45_h0() local
756 yddnrm += wterr * wterr; in rkf45_h0()
759 yddnrm = sqrt( yddnrm / double(neq) ); in rkf45_h0()
773 hnew = (yddnrm*hmax*hmax > 2.0) ? sqrt(2.0 / yddnrm) : sqrt(hg * hmax); in rkf45_h0()
|
| /dports/science/lammps/lammps-stable_29Sep2021/src/DPD-REACT/ |
| H A D | fix_rx.cpp | 1197 double yddnrm = 0.0; in rkf45_h0() local
1201 yddnrm += wterr * wterr; in rkf45_h0()
1204 yddnrm = sqrt( yddnrm / double(neq) ); in rkf45_h0()
1218 hnew = (yddnrm*hmax*hmax > 2.0) ? sqrt(2.0 / yddnrm) : sqrt(hg * hmax); in rkf45_h0()
|
| /dports/science/cantera/cantera-2.5.1-611-gc4d6ecc15/ext/sundials/src/arkode/ |
| H A D | arkode.c | 2178 realtype hg, hgs, hs, hnew, hrat, h0, yddnrm; in arkHin() local
2213 retval = arkYddNorm(ark_mem, hgs, &yddnrm); in arkHin()
2236 hnew = (yddnrm*hub*hub > TWO) ? SUNRsqrt(TWO/yddnrm) : SUNRsqrt(hg*hub); in arkHin()
2311 int arkYddNorm(ARKodeMem ark_mem, realtype hg, realtype *yddnrm) in arkYddNorm() argument
2337 *yddnrm = N_VWrmsNorm(ark_mem->tempv1, ark_mem->ewt); in arkYddNorm()
|
| H A D | arkode_impl.h | 868 realtype *yddnrm);
|
| /dports/math/sundials/sundials-5.7.0/src/arkode/ |
| H A D | arkode.c | 2080 realtype hg, hgs, hs, hnew, hrat, h0, yddnrm; in arkHin() local
2115 retval = arkYddNorm(ark_mem, hgs, &yddnrm); in arkHin()
2138 hnew = (yddnrm*hub*hub > TWO) ? SUNRsqrt(TWO/yddnrm) : SUNRsqrt(hg*hub); in arkHin()
2213 int arkYddNorm(ARKodeMem ark_mem, realtype hg, realtype *yddnrm) in arkYddNorm() argument
2239 *yddnrm = N_VWrmsNorm(ark_mem->tempv1, ark_mem->ewt); in arkYddNorm()
|
| H A D | arkode_impl.h | 888 realtype *yddnrm);
|
| /dports/math/casadi/casadi-3.5.5/external_packages/casadi-sundials/cvodes/ |
| H A D | cvodes.c | 481 static int cvYddNorm(CVodeMem cv_mem, realtype hg, realtype *yddnrm);
4283 realtype hg, hgs, hs, hnew, hrat, h0, yddnrm; in cvHin() local
4326 retval = cvYddNorm(cv_mem, hgs, &yddnrm); in cvHin()
4356 hnew = (yddnrm*hub*hub > TWO) ? SUNRsqrt(TWO/yddnrm) : SUNRsqrt(hg*hub); in cvHin()
4517 static int cvYddNorm(CVodeMem cv_mem, realtype hg, realtype *yddnrm) in cvYddNorm() argument
4567 *yddnrm = N_VWrmsNorm(tempv, ewt); in cvYddNorm()
4572 *yddnrm = cvQuadUpdateNorm(cv_mem, *yddnrm, tempvQ, ewtQ); in cvYddNorm()
4580 *yddnrm = cvSensUpdateNorm(cv_mem, *yddnrm, tempvS, ewtS); in cvYddNorm()
4588 *yddnrm = cvQuadSensUpdateNorm(cv_mem, *yddnrm, tempvQS, ewtQS); in cvYddNorm()
|
| /dports/science/cantera/cantera-2.5.1-611-gc4d6ecc15/ext/sundials/src/cvode/ |
| H A D | cvode.c | 214 static int cvYddNorm(CVodeMem cv_mem, realtype hg, realtype *yddnrm);
1887 realtype hg, hgs, hs, hnew, hrat, h0, yddnrm; in cvHin() local
1929 retval = cvYddNorm(cv_mem, hgs, &yddnrm); in cvHin()
1953 hnew = (yddnrm*hub*hub > TWO) ? SUNRsqrt(TWO/yddnrm) : SUNRsqrt(hg*hub); in cvHin()
2037 static int cvYddNorm(CVodeMem cv_mem, realtype hg, realtype *yddnrm) in cvYddNorm() argument
2050 *yddnrm = N_VWrmsNorm(cv_mem->cv_tempv, cv_mem->cv_ewt); in cvYddNorm()
|
| /dports/math/sundials/sundials-5.7.0/src/cvode/ |
| H A D | cvode.c | 213 static int cvYddNorm(CVodeMem cv_mem, realtype hg, realtype *yddnrm);
1910 realtype hg, hgs, hs, hnew, hrat, h0, yddnrm; in cvHin() local
1952 retval = cvYddNorm(cv_mem, hgs, &yddnrm); in cvHin()
1976 hnew = (yddnrm*hub*hub > TWO) ? SUNRsqrt(TWO/yddnrm) : SUNRsqrt(hg*hub); in cvHin()
2060 static int cvYddNorm(CVodeMem cv_mem, realtype hg, realtype *yddnrm) in cvYddNorm() argument
2073 *yddnrm = N_VWrmsNorm(cv_mem->cv_tempv, cv_mem->cv_ewt); in cvYddNorm()
|
| /dports/math/py-pystan/pystan-2.19.0.0/pystan/stan/lib/stan_math/lib/sundials_4.1.0/src/cvodes/ |
| H A D | cvodes.c | 449 static int cvYddNorm(CVodeMem cv_mem, realtype hg, realtype *yddnrm);
4581 realtype hg, hgs, hs, hnew, hrat, h0, yddnrm; in cvHin() local
4623 retval = cvYddNorm(cv_mem, hgs, &yddnrm); in cvHin()
4651 hnew = (yddnrm*hub*hub > TWO) ? SUNRsqrt(TWO/yddnrm) : SUNRsqrt(hg*hub); in cvHin()
4814 static int cvYddNorm(CVodeMem cv_mem, realtype hg, realtype *yddnrm) in cvYddNorm() argument
4875 *yddnrm = N_VWrmsNorm(cv_mem->cv_tempv, cv_mem->cv_ewt); in cvYddNorm()
4881 *yddnrm = cvQuadUpdateNorm(cv_mem, *yddnrm, cv_mem->cv_tempvQ, in cvYddNorm()
4892 *yddnrm = cvSensUpdateNorm(cv_mem, *yddnrm, cv_mem->cv_tempvS, in cvYddNorm()
4903 *yddnrm = cvQuadSensUpdateNorm(cv_mem, *yddnrm, cv_mem->cv_tempvQS, in cvYddNorm()
|
| /dports/math/scilab/scilab-6.1.1/scilab/modules/scicos/src/scicos_sundials/src/cvode/ |
| H A D | cvode.c | 262 static int CVYddNorm(CVodeMem cv_mem, realtype hg, realtype *yddnrm);
2120 realtype hg, hgs, hs, hnew, hrat, h0, yddnrm; in CVHin() local
2178 retval = CVYddNorm(cv_mem, hgs, &yddnrm); in CVHin()
2220 hnew = (yddnrm * hub * hub > TWO) ? RSqrt(TWO / yddnrm) : RSqrt(hg * hub); in CVHin()
2360 static int CVYddNorm(CVodeMem cv_mem, realtype hg, realtype *yddnrm) in CVYddNorm() argument
2379 *yddnrm = N_VWrmsNorm(tempv, ewt); in CVYddNorm()
|
| /dports/math/stanmath/math-4.2.0/lib/sundials_5.7.0/src/cvodes/ |
| H A D | cvodes.c | 458 static int cvYddNorm(CVodeMem cv_mem, realtype hg, realtype *yddnrm);
4921 realtype hg, hgs, hs, hnew, hrat, h0, yddnrm; in cvHin() local
4963 retval = cvYddNorm(cv_mem, hgs, &yddnrm); in cvHin()
4991 hnew = (yddnrm*hub*hub > TWO) ? SUNRsqrt(TWO/yddnrm) : SUNRsqrt(hg*hub); in cvHin()
5154 static int cvYddNorm(CVodeMem cv_mem, realtype hg, realtype *yddnrm) in cvYddNorm() argument
5215 *yddnrm = N_VWrmsNorm(cv_mem->cv_tempv, cv_mem->cv_ewt); in cvYddNorm()
5221 *yddnrm = cvQuadUpdateNorm(cv_mem, *yddnrm, cv_mem->cv_tempvQ, in cvYddNorm()
5232 *yddnrm = cvSensUpdateNorm(cv_mem, *yddnrm, cv_mem->cv_tempvS, in cvYddNorm()
5243 *yddnrm = cvQuadSensUpdateNorm(cv_mem, *yddnrm, cv_mem->cv_tempvQS, in cvYddNorm()
|
| /dports/science/cantera/cantera-2.5.1-611-gc4d6ecc15/ext/sundials/src/cvodes/ |
| H A D | cvodes.c | 459 static int cvYddNorm(CVodeMem cv_mem, realtype hg, realtype *yddnrm);
4849 realtype hg, hgs, hs, hnew, hrat, h0, yddnrm; in cvHin() local
4891 retval = cvYddNorm(cv_mem, hgs, &yddnrm); in cvHin()
4919 hnew = (yddnrm*hub*hub > TWO) ? SUNRsqrt(TWO/yddnrm) : SUNRsqrt(hg*hub); in cvHin()
5082 static int cvYddNorm(CVodeMem cv_mem, realtype hg, realtype *yddnrm) in cvYddNorm() argument
5143 *yddnrm = N_VWrmsNorm(cv_mem->cv_tempv, cv_mem->cv_ewt); in cvYddNorm()
5149 *yddnrm = cvQuadUpdateNorm(cv_mem, *yddnrm, cv_mem->cv_tempvQ, in cvYddNorm()
5160 *yddnrm = cvSensUpdateNorm(cv_mem, *yddnrm, cv_mem->cv_tempvS, in cvYddNorm()
5171 *yddnrm = cvQuadSensUpdateNorm(cv_mem, *yddnrm, cv_mem->cv_tempvQS, in cvYddNorm()
|
| /dports/math/sundials/sundials-5.7.0/src/cvodes/ |
| H A D | cvodes.c | 458 static int cvYddNorm(CVodeMem cv_mem, realtype hg, realtype *yddnrm);
4921 realtype hg, hgs, hs, hnew, hrat, h0, yddnrm; in cvHin() local
4963 retval = cvYddNorm(cv_mem, hgs, &yddnrm); in cvHin()
4991 hnew = (yddnrm*hub*hub > TWO) ? SUNRsqrt(TWO/yddnrm) : SUNRsqrt(hg*hub); in cvHin()
5154 static int cvYddNorm(CVodeMem cv_mem, realtype hg, realtype *yddnrm) in cvYddNorm() argument
5215 *yddnrm = N_VWrmsNorm(cv_mem->cv_tempv, cv_mem->cv_ewt); in cvYddNorm()
5221 *yddnrm = cvQuadUpdateNorm(cv_mem, *yddnrm, cv_mem->cv_tempvQ, in cvYddNorm()
5232 *yddnrm = cvSensUpdateNorm(cv_mem, *yddnrm, cv_mem->cv_tempvS, in cvYddNorm()
5243 *yddnrm = cvQuadSensUpdateNorm(cv_mem, *yddnrm, cv_mem->cv_tempvQS, in cvYddNorm()
|