subroutine csc2cl |
( |
integer |
nvar, |
|
|
integer |
nscal, |
|
|
integer |
nvcp, |
|
|
integer |
nvcpto, |
|
|
integer |
nfbcpl, |
|
|
integer |
nfbncp, |
|
|
integer, dimension(nfabor,nvar) |
icodcl, |
|
|
integer, dimension(nfabor) |
itrifb, |
|
|
integer, dimension(nfabor) |
itypfb, |
|
|
integer, dimension(nfbcpl) |
lfbcpl, |
|
|
integer, dimension(nfbncp) |
lfbncp, |
|
|
double precision, dimension(ncelet) |
dt, |
|
|
double precision, dimension(ncelet,*) |
rtp, |
|
|
double precision, dimension(ncelet,*) |
rtpa, |
|
|
double precision, dimension(ncelet,*) |
propce, |
|
|
double precision, dimension(nfac,*) |
propfa, |
|
|
double precision, dimension(nfabor,*) |
propfb, |
|
|
double precision, dimension(nfabor,*) |
coefa, |
|
|
double precision, dimension(nfabor,*) |
coefb, |
|
|
double precision, dimension(nfabor,nvar,3) |
rcodcl, |
|
|
double precision, dimension(nfbcpl,nvcpto) |
rvcpfb, |
|
|
double precision, dimension(nfbcpl) |
pndcpl, |
|
|
double precision, dimension(3,nfbcpl) |
dofcpl |
|
) |
| |