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

Diff of /trunk/models/johnpye/fprops/test/ideal.c

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

revision 2734 by jpye, Tue Dec 10 12:11:46 2013 UTC revision 2735 by jpye, Tue Dec 10 12:26:54 2013 UTC
# Line 34  int main(void){ Line 34  int main(void){
34      P[CH4] = ideal_prepare(&eos_rpp_methane, &ref);      P[CH4] = ideal_prepare(&eos_rpp_methane, &ref);
35    
36      int i;      int i;
     MSG("%-20s\t%s\t%s\t%s","comp","h(850 K)","h(1520 K)","Dh (kJ/kmol)");  
37      for(i=0;i<NFLUIDS;++i){      for(i=0;i<NFLUIDS;++i){
38            double cp0 = ideal_cp(298.2, 0, P[i]->data, &err);
39          double h0 = ideal_h(298.2, 0, P[i]->data, &err);          double h0 = ideal_h(298.2, 0, P[i]->data, &err);
40          MSG("%-20s: hbar(298.2) = %f J/kmol",P[i]->name,h0*P[CH4]->data->M);          MSG("%-20s: M = %f, R = %f, cp0(298.2) = %f, hbar(298.2) = %f J/kmol",P[i]->name,P[i]->data->M, P[i]->data->R, h0*P[CH4]->data->M);
41      }      }
42    
43      MSG("%-20s\t%s\t%s\t%s","comp","h(850 K)","h(1520 K)","Dh (kJ/kmol)");      MSG("%-20s\t%s\t%s\t%s","comp","h(850 K)","h(1520 K)","Dh (kJ/kmol)");

Legend:
Removed from v.2734  
changed lines
  Added in v.2735

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