subroutine raypar |
( |
integer, dimension(nfabor) |
isothp, |
|
|
integer, dimension(nfabor) |
izfrap, |
|
|
double precision |
tmin, |
|
|
double precision |
tmax, |
|
|
double precision |
tx, |
|
|
double precision, dimension(nfabor,nvarcl,3) |
rcodcl, |
|
|
double precision, dimension(nfabor) |
tparop, |
|
|
double precision, dimension(nfabor) |
qincip, |
|
|
double precision, dimension(nfabor) |
textp, |
|
|
double precision, dimension(nfabor) |
tintp, |
|
|
double precision, dimension(nfabor) |
xlamp, |
|
|
double precision, dimension(nfabor) |
epap, |
|
|
double precision, dimension(nfabor) |
epsp, |
|
|
double precision, dimension(nfabor) |
hfconp, |
|
|
double precision, dimension(nfabor) |
flconp, |
|
|
double precision, dimension(ncelet) |
tempkp |
|
) |
| |