subroutine navsto |
( |
integer |
nvar, |
|
|
integer |
nscal, |
|
|
integer |
iterns, |
|
|
integer |
icvrge, |
|
|
integer, dimension(nfabor+1) |
isostd, |
|
|
double precision, dimension(ncelet) |
dt, |
|
|
double precision, dimension(ncelet,3) |
tpucou, |
|
|
double precision, dimension(ncelet,*) |
rtp, |
|
|
double precision, dimension(ncelet,*) |
rtpa, |
|
|
double precision, dimension(ncelet,*) |
propce, |
|
|
double precision, dimension(nfac,*) |
propfa, |
|
|
double precision, dimension(ndimfb,*) |
propfb, |
|
|
double precision, dimension(ncelet,*) |
tslagr, |
|
|
double precision, dimension(ndimfb,*) |
coefa, |
|
|
double precision, dimension(ndimfb,*) |
coefb, |
|
|
double precision, dimension(ncelet,3) |
frcxt, |
|
|
double precision, dimension(ncelet,ndim) |
trava, |
|
|
double precision, dimension(ncelet,ndim) |
ximpa, |
|
|
double precision, dimension(ncelet,ndim) |
uvwk |
|
) |
| |