| 
| character(len=12)  | namgas | 
|   | 
| double precision, save  | pcigas | 
|   | 
| double precision, dimension(:,:), pointer, save  | coefeg | 
|   | 
| double precision, dimension(:,:), pointer, save  | compog | 
|   | 
| integer  | nmaxf | 
|   | 
| integer  | nmaxfm | 
|   | 
| integer  | nmaxh | 
|   | 
| integer  | nmaxhm | 
|   | 
| integer, dimension(nozppm), save  | ientox | 
|   | 
| integer, dimension(nozppm), save  | ientfu | 
|   | 
| double precision, save  | tinoxy | 
|   | 
| double precision, save  | tinfue | 
|   | 
| double precision, save  | hinfue | 
|   | 
| double precision, save  | hinoxy | 
|   | 
| double precision, save  | hstoea | 
|   | 
| double precision, dimension(nmaxhm), save  | hh | 
|   | 
| double precision, dimension(nmaxfm), save  | ff | 
|   | 
| double precision, dimension(nmaxfm, nmaxhm), save  | tfh | 
|   | 
| integer, dimension(nozppm), save  | ientgf | 
|   | 
| integer, dimension(nozppm), save  | ientgb | 
|   | 
| double precision, dimension(nozppm), save  | fment | 
|   | 
| double precision, dimension(nozppm), save  | tkent | 
|   | 
| double precision, dimension(nozppm), save  | qimp | 
|   | 
| double precision, save  | frmel | 
|   | 
| double precision, save  | tgf | 
|   | 
| double precision, save  | cebu | 
|   | 
| double precision, save  | hgf | 
|   | 
| double precision, save  | tgbad | 
|   | 
| integer  | ndracm | 
|   | 
| integer, save  | ndirac | 
|   | 
| integer, dimension(ndracm), save  | irhol | 
|   | 
| integer, dimension(ndracm), save  | iteml | 
|   | 
| integer, dimension(ndracm), save  | ifmel | 
|   | 
| integer, dimension(ndracm), save  | ifmal | 
|   | 
| integer, dimension(ndracm), save  | iampl | 
|   | 
| integer, dimension(ndracm), save  | itscl | 
|   | 
| integer, dimension(ndracm), save  | imaml | 
|   | 
| integer, dimension(ndracm), save  | ihhhh | 
|   | 
| integer, save  | imam | 
|   | 
| double precision, save  | vref | 
|   | 
| double precision, save  | lref | 
|   | 
| double precision, save  | ta | 
|   | 
| double precision, save  | tstar | 
|   | 
| double precision, save  | fmin | 
|   | 
| double precision, save  | fmax | 
|   | 
| double precision, save  | hmin | 
|   | 
| double precision, save  | hmax | 
|   | 
| double precision, save  | coeff1 | 
|   | 
| double precision, save  | coeff2 | 
|   | 
| double precision, save  | coeff3 | 
|   | 
| double precision, pointer, save  | xsoot | 
|   | 
| double precision, pointer, save  | rosoot | 
|   | 
Module for gas combustion