Go to the source code of this file.
|
subroutine | dslvk (neq, y, tn, yprime, savr, x, ewt, wm, iwm, res, ires, psol, iersl, cj, eplin, sqrtn, rsqrtn, rhok, rpar, ipar) |
|
◆ dslvk()
subroutine dslvk |
( |
integer |
neq, |
|
|
double precision, dimension(*) |
y, |
|
|
double precision |
tn, |
|
|
double precision, dimension(*) |
yprime, |
|
|
double precision, dimension(*) |
savr, |
|
|
double precision, dimension(*) |
x, |
|
|
double precision, dimension(*) |
ewt, |
|
|
double precision, dimension(*) |
wm, |
|
|
integer, dimension(*) |
iwm, |
|
|
external |
res, |
|
|
integer |
ires, |
|
|
external |
psol, |
|
|
integer |
iersl, |
|
|
double precision |
cj, |
|
|
double precision |
eplin, |
|
|
double precision |
sqrtn, |
|
|
double precision |
rsqrtn, |
|
|
double precision |
rhok, |
|
|
double precision, dimension(*) |
rpar, |
|
|
integer, dimension(*) |
ipar |
|
) |
| |