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

Diff of /trunk/models/johnpye/fprops/ideal.mac

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

revision 1883 by jpye, Thu Sep 18 10:19:06 2008 UTC revision 1884 by jpye, Thu Sep 18 13:51:59 2008 UTC
# Line 46  cp0_exp(tau) := R * subst(beta*tau/Tc,x, Line 46  cp0_exp(tau) := R * subst(beta*tau/Tc,x,
46    
47  term(tau,cp0) := -tau/R*integrate(cp0(tau)/tau^2,tau,tau0,tau) + 1/R*integrate(cp0(tau)/tau,tau,tau0,tau);  term(tau,cp0) := -tau/R*integrate(cp0(tau)/tau^2,tau,tau0,tau) + 1/R*integrate(cp0(tau)/tau,tau,tau0,tau);
48    
49  phi0(tau,del) := log(del) + 2.5*log(tau) - 12.76953 - 0.007841630*tau - 1.934819e-4/tau - 1.247742e-5/tau^2 + 6.678326e-8/tau^3  # expression for nitrogen...
50    phi0(tau,del) := log(del) + 2.5*log(tau) - 12.76953 - 0.007841630*tau - 1.934819e-4/tau - 1.247742e-5/tau^2 + 6.678326e-8/tau^3 + 1.012941*log(1-exp(-26.65788*tau));
51    
52    
53  #------------------------------------------------  #------------------------------------------------

Legend:
Removed from v.1883  
changed lines
  Added in v.1884

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