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

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

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

revision 2658 by jpye, Wed Jan 16 02:04:07 2013 UTC revision 2659 by jpye, Wed Jan 16 03:09:20 2013 UTC
# Line 53  static HelmholtzData helmholtz_data_tolu Line 53  static HelmholtzData helmholtz_data_tolu
53      , /* rho_c */ 3.169*TOLUENE_M /* kg/m3 */      , /* rho_c */ 3.169*TOLUENE_M /* kg/m3 */
54      , /* T_t */ 178.15      , /* T_t */ 178.15
55    
56      ,{FPROPS_REF_TRHS,{.trhs={      ,{FPROPS_REF_TPF}
57    #if 0
58    {FPROPS_REF_TRHS,{.trhs={
59          .T0 = 273.15          .T0 = 273.15
60          , .rho0 = 8.85419387005E+2          , .rho0 = 8.85419387005E+2
61          , .h0 = -1.99730529336E+5          , .h0 = -1.99730529336E+5
62          , .s0 = -6.10308234395E+2          , .s0 = -6.10308234395E+2
63      }}}      }}}
64    #endif
65    
66      , 0.2657 /* acentric factor */      , 0.2657 /* acentric factor */
67      , &ideal_data_toluene      , &ideal_data_toluene
# Line 103  EosData eos_toluene = { Line 106  EosData eos_toluene = {
106  #ifdef TEST  #ifdef TEST
107    
108  #include "../test.h"  #include "../test.h"
109    #include "../refstate.h"
110  #include <math.h>  #include <math.h>
111  #include <assert.h>  #include <assert.h>
112  #include <stdio.h>  #include <stdio.h>
# Line 111  const TestData td[]; const unsigned ntd; Line 115  const TestData td[]; const unsigned ntd;
115    
116  int main(void){  int main(void){
117      PureFluid *P = helmholtz_prepare(&eos_toluene, NULL);      PureFluid *P = helmholtz_prepare(&eos_toluene, NULL);
118        ReferenceState R = {FPROPS_REF_TRHS,{.trhs={
119            .T0 = 273.15
120            , .rho0 = 8.85419387005E+2
121            , .h0 = -1.99730529336E+5
122            , .s0 = -6.10308234395E+2
123        }}};
124        fprops_set_reference_state(P, &R);
125      return helm_run_test_cases(P, ntd, td, 'C');      return helm_run_test_cases(P, ntd, td, 'C');
126  }  }
127    

Legend:
Removed from v.2658  
changed lines
  Added in v.2659

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