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

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

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

revision 2224 by jpye, Mon Jul 26 01:14:48 2010 UTC revision 2225 by jpye, Mon Jul 26 03:40:18 2010 UTC
# Line 204  int main(void){ Line 204  int main(void){
204      fprintf(stderr,"ITERATION WITH SUCCESSIVE SUBSTITUTION\n");      fprintf(stderr,"ITERATION WITH SUCCESSIVE SUBSTITUTION\n");
205      double rf, rg;      double rf, rg;
206      T = 220;          T = 220;    
207      int sat_err = 0;      double p_sat;
208      double p_sat = fprops_sat_succsubs(T, &rf, &rg, d, &sat_err);      assert(0==fprops_sat_T(T, &p_sat, &rf, &rg, d));
     assert(sat_err==0);  
209    
210      fprintf(stderr,"p_sat(%f) = %f bar\n", T, p_sat / 1e5);      fprintf(stderr,"p_sat(%f) = %f bar\n", T, p_sat / 1e5);
211    

Legend:
Removed from v.2224  
changed lines
  Added in v.2225

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