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

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

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

revision 1856 by jpye, Thu Sep 11 13:50:55 2008 UTC revision 1857 by jpye, Thu Sep 11 14:46:51 2008 UTC
# Line 97  double helmholtz_u(double T, double rho, Line 97  double helmholtz_u(double T, double rho,
97      assert(!isnan(data->R));      assert(!isnan(data->R));
98  #endif  #endif
99    
100  #ifdef TEST  #if 0
101      fprintf(stderr,"ideal_tau = %f\n",helm_ideal_tau(tau,delta,data->ideal));      fprintf(stderr,"ideal_tau = %f\n",helm_ideal_tau(tau,delta,data->ideal));
102      fprintf(stderr,"resid_tau = %f\n",helm_resid_tau(tau,delta,data));      fprintf(stderr,"resid_tau = %f\n",helm_resid_tau(tau,delta,data));
103      fprintf(stderr,"R T = %f\n",data->R * data->T_star);      fprintf(stderr,"R T = %f\n",data->R * data->T_star);

Legend:
Removed from v.1856  
changed lines
  Added in v.1857

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