subroutine calhyd |
( |
integer |
nvar, |
|
|
integer |
nscal, |
|
|
integer |
indhyd, |
|
|
double precision, dimension(ncelet) |
fextx, |
|
|
double precision, dimension(ncelet) |
fexty, |
|
|
double precision, dimension(ncelet) |
fextz, |
|
|
double precision, dimension(ncelet) |
dfextx, |
|
|
double precision, dimension(ncelet) |
dfexty, |
|
|
double precision, dimension(ncelet) |
dfextz, |
|
|
double precision, dimension(ncelet) |
phydr, |
|
|
double precision, dimension(nfac) |
flumas, |
|
|
double precision, dimension(nfabor) |
flumab, |
|
|
double precision, dimension(nfabor) |
coefap, |
|
|
double precision, dimension(nfabor) |
coefbp, |
|
|
double precision, dimension(nfabor) |
cofafp, |
|
|
double precision, dimension(nfabor) |
cofbfp, |
|
|
double precision, dimension(nfac) |
viscf, |
|
|
double precision, dimension(nfabor) |
viscb, |
|
|
double precision, dimension(ncelet) |
dam, |
|
|
double precision, dimension(nfac,2) |
xam, |
|
|
double precision, dimension(ncelet) |
drtp, |
|
|
double precision, dimension(ncelet) |
smbr |
|
) |
| |