/[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 2274 by jpye, Sun Aug 8 12:17:00 2010 UTC revision 2275 by jpye, Wed Aug 11 13:58:25 2010 UTC
# Line 1135  double helm_resid_deldel(double tau,doub Line 1135  double helm_resid_deldel(double tau,doub
1135      const HelmholtzGausTerm *gt;      const HelmholtzGausTerm *gt;
1136      const HelmholtzCritTerm *ct;      const HelmholtzCritTerm *ct;
1137            
     if(__isnan(delta)){  
         abort();  
     }  
   
1138  #ifdef RESID_DEBUG  #ifdef RESID_DEBUG
1139          fprintf(stderr,"tau=%f, del=%f\n",tau,delta);          fprintf(stderr,"tau=%f, del=%f\n",tau,delta);
1140  #endif  #endif
# Line 1322  double helm_resid_tautau(double tau, dou Line 1318  double helm_resid_tautau(double tau, dou
1318    
1319  /* === THIRD DERIVATIVES (this is getting boring now) === */  /* === THIRD DERIVATIVES (this is getting boring now) === */
1320    
1321    #ifdef INCLUDE_THIRD_DERIV_CODE
1322  /**  /**
1323      Third derivative of helmholtz residual function, with respect to      Third derivative of helmholtz residual function, with respect to
1324      delta (thrice).      delta (thrice).
# Line 1446  double helm_resid_deldeldel(double tau,d Line 1443  double helm_resid_deldeldel(double tau,d
1443      return res;      return res;
1444  }  }
1445    
1446    #endif
1447    
1448    

Legend:
Removed from v.2274  
changed lines
  Added in v.2275

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