Go to the source code of this file.
|
subroutine | datv (NEQ, Y, TN, YPRIME, SAVR, V, WGHT, YPTEM, RES, IRES, PSOL, Z, VTEM, WP, IWP, CJ, EPLIN, IER, NRE, NPSL, RPAR, IPAR) |
|
◆ datv()
subroutine datv |
( |
integer |
NEQ, |
|
|
double precision, dimension(*) |
Y, |
|
|
double precision |
TN, |
|
|
double precision, dimension(*) |
YPRIME, |
|
|
double precision, dimension(*) |
SAVR, |
|
|
double precision, dimension(*) |
V, |
|
|
double precision, dimension(*) |
WGHT, |
|
|
double precision, dimension(*) |
YPTEM, |
|
|
external |
RES, |
|
|
integer |
IRES, |
|
|
external |
PSOL, |
|
|
double precision, dimension(*) |
Z, |
|
|
double precision, dimension(*) |
VTEM, |
|
|
double precision, dimension(*) |
WP, |
|
|
integer, dimension(*) |
IWP, |
|
|
double precision |
CJ, |
|
|
double precision |
EPLIN, |
|
|
integer |
IER, |
|
|
integer |
NRE, |
|
|
integer |
NPSL, |
|
|
double precision, dimension(*) |
RPAR, |
|
|
integer, dimension(*) |
IPAR |
|
) |
| |