aij , stoichiometric coefficient of ith element in jth species.
ADD
MISC
REACT
THERMP
MOLEWT
Increment of ith reactant mole fraction.
ALTER
INDX
MAIN
REACT
THERMP
MOLEWT
Logical variable indicating reactant mole fractions with unequal TOP and BASE values are to be altered.
ANUM
MISC
REACT
SEARCH
OUT1
Stochiometric coefficients of elements on reactant cards.
BASE
MISC
REACT
SEARCH
OUT1
THERMP
MOLEWT
First value of mole fraction of ith reactant.
BO
MISC
REACT
MATRIX
bi , assigned Kg-atoms of element i per Kg of total reactant.
COEF
SPECES
SEARCH
CPHS
Constants in empirical equations for thermodynamic functions. COEF(I,J,K) : I = 1 for upper T interval and I = 2
for the lower one: J = 1,....,7 for the 7 coefficients, aj : K = 1,....100 for the number of species.
EN
SPECES
EQLBRM
MATRIX
THERMP
OUT1
INIT
nj , Kg-moles of jth species/Kg of mixture. EN/Σ EN = mole fraction of jth species.
59
VARIABLE
COMMON LABEL
ROUTINES WHERE USED
DESCRIPTIONS AND COMMENTS
ENLN
SPECES
EQLBRM
MATRIX
INIT
ln nj = ln (EN).
ENN
MISC
EQLBRM
MATRIX
INIT
n, moles of mixture, KG - mole/KG.
ENNL
MISC
EQLBRM
INIT
ln n = ln (ENN).
ENSERT
SPECES
MAIN
SEARCH
ith specie of n species which are specified to be considered or input.
G
DOUBLE
MATRIX
GAUSS
Elements of the matrix.
GAMMA
MISC
EQLBRM
MATRIX
FCOEFF
γ , Fugacity coefficient for gases.
HO
SPECES
EQLBRM
MATRIX
CPHS
Hj , dimensionless enthalpy for species j. ΔHo298 - (Ht - H298).
IMAT
INDX
EQLBRM
MATRIX
GAUSS
Number of rows in matrix setup.
IQ1
INDX
EQLBRM
MATRIX
INIT
Number of elements plus the number of condensed species included in matrix equations plus one.
IUSE
SPECES
SEARCH
EQLBRM
CPHS
MATRIX
FCOEFF
INIT
Variable used to identify status of ith specie. IUSE = 0, specie is gas; = +, specie is condensed specie to be
included in matrix equation: = -, specie is condensed specie to be excluded in matrix equation.
JUSE
SPECES
SEARCH
EQLBRM
CPHS
Variable used to identify which phase of a condensed specie should be used or if the specie fits the T range
being considered. = +, phase is not considered; = - , phase is considered.
60
VARIABLE
COMMON LABEL
ROUTINES WHERE USED
DESCRIPTIONS AND COMMENTS
KASE
INDX
MAIN
OUT1
Optional identification number for problem being considered.
LLMT
MISC
REACT
SEARCH
EQLBRM
Alphameric symbols for the elements in the system being studied.
NAME
MISC
REACT
SEARCH
OUT1
Alphanumeric symbols for the elements as given in the reactant cards.
NC
INDX
SEARCH
EQLBRM
INIT
Number of condensed species being considered in the system.
NEWMOL
INDX
MAIN
REACT
SEARCH
THERMP
MOLEWT
Used in REACT to determine if reactant cards have been read and if type of mixture
problem has been determined. Used in SEARCH to determine if species should be read from
tape 3 or tape 4. Used in MOLEWT to determine what species are to be added or deleted
from the current system.
NLM
INDX
MAIN
REACT
SEARCH
EQLBRM
MATRIX
INIT
Number of elements in the system.
NMIN
INDX
MAIN
REACT
SEARCH
MOLEWT
Number of elements that are put into temporary storage for SYSTM and PLUS problems.
NMIX
INDX
THEMP
MOLEWT
Increment multiplier for mole fraction computations in PLUS and SYSTM problems.
61
VARIABLE
COMMON LABEL
ROUTINES WHERE USED
DESCRIPTIONS AND COMMENTS
NOCONV
MISC
MAIN
SEARCH
Accumulates number of times there is no solution to a T - P point.
NOMIT
INDX
MAIN
SEARCH
Number of species to be omitted.
NP
INDX
MAIN
THERMP
Number of P values read.
NPT
INDX
All routines
except:
REACT
GAUSS
SEARCH
CPHS
FCOEFF
Index for data saved for output (1 ≤ NPT ≤ 9).
NRAT
INDX
THERMP
MOLEWT
Used to determine if the reactants should be added or incremented in SYSTM and PLUS problems.
NREAC
INDX
REACT
SEARCH
OUT1
THERMP
MOLEWT
Number of reactant cards.
NS
INDX
All routines
except:
REACT
GAUSS
VARFMT
MOLEWT
Number of species being considered in the system.
NSERT
INDX
MAIN
SEARCH
Number of species listed on INSER cards.
NT
INDX
MAIN
THERMP
Number of T values read.
OMIT
SPECES
MAIN
THERMP
Alphameric name of specie to be omitted from current system.
P
POINTS
MAIN
THERMP
P values in bars that have been read.
62
VARIABLE
COMMON LABEL
ROUTINES WHERE USED
DESCRIPTIONS AND COMMENTS
PLUS
INDX
MAIN
REACT
THERMP
MOLEWT
Logical variable used to indicate if reactants are to be added to the system or if a ternary system is being considered.
PP
MISC
EQLBRM
THERMP
MATRIX
CPHS
FCOEFF
Assigned P for current point.
PPP
POINTS
EQLBRM
OUT1
Static P stored for output.
R
MISC
MAIN
EQLBRM
MATRIX
FCOEFF
CPHS
Universal gas constant 1.987165 cal / (g-mole) (oK).
RSIZE
POINTS
MAIN
EQLBRM
Determines size of mole fraction values for gas specie to be output.
S
SPECES
EQLBRM
CPHS
MATRIX
(Sot)j / R, dimensionless entropy calculated from coefficients for reaction species.
SUB
SPECES
SEARCH
FCOEFF
OUT1
Alphameric names of species read from THERMO data. Each name takes 8 words, 4 characters each.
SUMN
MISC
EQLBRM
MATRIX
INIT
Σmj=1 nj , moles of mixture. Kg - mole/Kg.
SYSTM
INDX
MAIN
REACT
THERMP
MOLEWT
Logical variable used to denote that a ternary system is being considered.
T
POINTS
MAIN
THERMP
T values in o K that have been read.
63
VARIABLE
COMMON LABEL
ROUTINES WHERE USED
DESCRIPTIONS AND COMMENTS
TEM
POINTS
MAIN
THERMP
Logical variable used to denote that for each assigned T there is an assigned P.
TEMP
SPECES
SEARCH
EQLBRM
T ranges of individual condensed specie.
TM
MISC
EQLBRM
MATRIX
ln (Pbars / n).
TOP
MISC
REACT
THERMP
MOLEWT
Final value of mole fraction of ith reactant.
TOTN
POINTS
EQLBRM
OUT1
ΣNSj=1 nj used in calculation of mole fraction.
TRI
MISC
MAIN
THERMP
MOLEWT
Increment value of mole fraction for all reactants of ternary system.
TT
MISC
EQLBRM
CPHS
FCOEFF
THERMP
MATRIX
Assigned T in o K for current point.
TTT
POINTS
EQLBRM
OUT1
T stored for output.
VOL
MISC
SEARCH
EQLBRM
MATRIX
CPHS
Molar volume of species.
X
DOUBLE
EQLBRM
GAUSS
π , Answer region for matrix solution (Lagrangian multiplier).