subroutine strpre |
( |
integer |
itrale, |
|
|
integer |
italim, |
|
|
integer |
ineefl, |
|
|
integer, dimension(nnod) |
impale, |
|
|
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(ndimfb,*) |
coefa, |
|
|
double precision, dimension(ndimfb,*) |
coefb, |
|
|
double precision, dimension(nfac) |
flmalf, |
|
|
double precision, dimension(nfabor) |
flmalb, |
|
|
double precision, dimension(ncelet) |
xprale, |
|
|
double precision, dimension(nfabor,8) |
cofale, |
|
|
double precision, dimension(nnod,3) |
depale |
|
) |
| |