subroutine cpteh1 |
( |
integer |
ncelet, |
|
|
integer |
ncel, |
|
|
integer |
ntbmci, |
|
|
integer |
ntbmcr, |
|
|
double precision, dimension(ncelet) |
eh, |
|
|
double precision, dimension(ncelet) |
fuel1, |
|
|
double precision, dimension(ncelet) |
fuel2, |
|
|
double precision, dimension(ncelet) |
fuel3, |
|
|
double precision, dimension(ncelet) |
oxyd, |
|
|
double precision, dimension(ncelet) |
prod1, |
|
|
double precision, dimension(ncelet) |
prod2, |
|
|
double precision, dimension(ncelet) |
xiner, |
|
|
double precision, dimension(ncelet) |
tp, |
|
|
integer, dimension(ncelet,ntbmci) |
tbmci, |
|
|
double precision, dimension(ncelet,ntbmcr) |
tbmcr, |
|
|
double precision, dimension(ncelet) |
eh0, |
|
|
double precision, dimension(ncelet) |
eh1 |
|
) |
| |