/[ascend]/trunk/models/johnpye/fprops/fluids/hydrogensulfide.c
ViewVC logotype

Diff of /trunk/models/johnpye/fprops/fluids/hydrogensulfide.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 2300 by jpye, Fri Aug 20 13:50:05 2010 UTC revision 2301 by jpye, Sat Aug 21 13:28:35 2010 UTC
# Line 8  Lemmon, E.W. and Span, R., Line 8  Lemmon, E.W. and Span, R.,
8  J. Chem. Eng. Data, 51:785-850, 2006.  J. Chem. Eng. Data, 51:785-850, 2006.
9  */  */
10    
11  #include "../helmholtz.h"  #include "../helmholtz.h"
12    
13  #define HYDROGENSULFIDE_M 34.08088 /* kg/kmol */  #define HYDROGENSULFIDE_M 34.08088 /* kg/kmol */
14  #define HYDROGENSULFIDE_R (8314.472/HYDROGENSULFIDE_M) /* J/kg/K */  #define HYDROGENSULFIDE_R (8314.472/HYDROGENSULFIDE_M) /* J/kg/K */
15  #define HYDROGENSULFIDE_TSTAR 373.1 /* K */  #define HYDROGENSULFIDE_TSTAR 373.1 /* K */
# Line 40  const HelmholtzData helmholtz_data_hydro Line 40  const HelmholtzData helmholtz_data_hydro
40    
41      , /* T_c */ HYDROGENSULFIDE_TSTAR      , /* T_c */ HYDROGENSULFIDE_TSTAR
42      , /* rho_c */ 10.19*HYDROGENSULFIDE_M /* kg/m3 */      , /* rho_c */ 10.19*HYDROGENSULFIDE_M /* kg/m3 */
43      , /* T_t */ 0      , /* T_t */ 187.7
44    
45      , 0.1005 /* acentric factor */      , 0.1005 /* acentric factor */
46      , &ideal_data_hydrogensulfide      , &ideal_data_hydrogensulfide

Legend:
Removed from v.2300  
changed lines
  Added in v.2301

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22