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

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

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

revision 2659 by jpye, Wed Jan 16 02:04:07 2013 UTC revision 2660 by jpye, Wed Jan 16 05:57:03 2013 UTC
# Line 81  static HelmholtzData helmholtz_data_carb Line 81  static HelmholtzData helmholtz_data_carb
81      , /* rho_c */ CARBONDIOXIDE_RHOC      , /* rho_c */ CARBONDIOXIDE_RHOC
82      , /* T_t */ 216.592      , /* T_t */ 216.592
83    
84      , {      , {FPROPS_REF_TPF}
         FPROPS_REF_PHI0  
         , .data = {.phi0 = {  
             .c = 8.37304456  
             , .m = -3.70454304  
         }}  
     }  
85      ,  0.2239 /* acentric factor, from Reid, Prausnitz & Polling */      ,  0.2239 /* acentric factor, from Reid, Prausnitz & Polling */
86      , &ideal_data_carbondioxide      , &ideal_data_carbondioxide
87      , 34 /* power terms */      , 34 /* power terms */
# Line 160  EosData eos_carbondioxide = { Line 154  EosData eos_carbondioxide = {
154  #ifdef TEST  #ifdef TEST
155  #include "../test.h"  #include "../test.h"
156  #include "../sat.h"  #include "../sat.h"
157    #include "../refstate.h"
158  /*  /*
159      Test suite. These tests attempt to validate the current code using      Test suite. These tests attempt to validate the current code using
160      a few sample figures output by REFPROP 7.0.      a few sample figures output by REFPROP 7.0.
# Line 180  const TestDataSat tds[]; const unsigned Line 175  const TestDataSat tds[]; const unsigned
175  int main(void){  int main(void){
176      test_init();      test_init();
177      FpropsError err = FPROPS_NO_ERROR;      FpropsError err = FPROPS_NO_ERROR;
     //unsigned n;  
     //double rho, T, cp0, p, u, h, s;  
   
178      PureFluid *d = helmholtz_prepare(&eos_carbondioxide,NULL);      PureFluid *d = helmholtz_prepare(&eos_carbondioxide,NULL);
179        ReferenceState S = {FPROPS_REF_IIR};
180        fprops_set_reference_state(d,&S);
181      double maxerr = 0;      double maxerr = 0;
182    
183  #if 0  #if 0

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

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