The user state point query function enables the evaluation of thermodynamic properties at a user specified state. This is accomplished by calling the following utility routine from within User Fortran subroutines (User CEL functions or Junction Boxes):
CALL USER_STATEPT(VAR,CPROCALC,CPROPIND,RPROPIND,NPROPIND, & CERACT,CRESLT,CZ,DZ,IZ,LZ,RZ)
The input arguments for this utility are:
CHARACTER*(*) CPROPCALC- Name of requested output property variable.CHARACTER*(*) CPROPIND(NPROPIND)- Array of independent thermodynamic property names.REAL RPROPCALC(NPROPIND)- Array of independent thermodynamic property values.INTEGER NPROPIND- Number of independent thermodynamic properties.CHARACTER*4 CERACT- Error action:STOPto stop on error, orSKIPto continue silently, with the result code returned inCRESLT.CHARACTER*1(*) CZ-CHARACTERdata stack.DOUBLE DZ-DOUBLE PRECISIONdata stack.DOUBLE IZ-INTEGERdata stack.DOUBLE LZ-LOGICALdata stack.DOUBLE RZ-REALdata stack.
The output arguments for this utility are:
REAL VAR- Return value ofCPROPCALCat the user-specified thermodynamic state.CHARACTER*4 CRESLT- result code, which isGOODif successful.