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

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

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

revision 1994 by jpye, Fri Oct 3 07:30:04 2008 UTC revision 1995 by jpye, Wed Feb 4 13:20:31 2009 UTC
# Line 46  Line 46 
46  better later on, hopefully. */  better later on, hopefully. */
47  #include "ammonia.h"  #include "ammonia.h"
48  #include "nitrogen.h"  #include "nitrogen.h"
49    #include "hydrogen.h"
50    #include "water.h"
51    
52  #ifndef ASC_EXPORT  #ifndef ASC_EXPORT
53  # error "Where is ASC_EXPORT?"  # error "Where is ASC_EXPORT?"
# Line 166  int helmholtz_prepare(struct BBoxInterp Line 168  int helmholtz_prepare(struct BBoxInterp
168          bbox->user_data = (void*)&helmholtz_data_ammonia;          bbox->user_data = (void*)&helmholtz_data_ammonia;
169      }else if(strcmp(comp,"nitrogen")==0){      }else if(strcmp(comp,"nitrogen")==0){
170          bbox->user_data = (void*)&helmholtz_data_nitrogen;          bbox->user_data = (void*)&helmholtz_data_nitrogen;
171        }else if(strcmp(comp,"hydrogen")==0){
172            bbox->user_data = (void*)&helmholtz_data_hydrogen;
173        }else if(strcmp(comp,"water")==0){
174            bbox->user_data = (void*)&helmholtz_data_water;
175      }else{      }else{
176          ERROR_REPORTER_HERE(ASC_USER_ERROR,"Component must be 'ammonia' or 'nitrogen' at this stage (only two components supported)");          ERROR_REPORTER_HERE(ASC_USER_ERROR,"Component name was not recognised. Check the source-code for for the supported species.");
177      }      }
178    
179      ERROR_REPORTER_HERE(ASC_PROG_NOTE,"Prepared component '%s' OK.\n",comp);      ERROR_REPORTER_HERE(ASC_PROG_NOTE,"Prepared component '%s' OK.\n",comp);

Legend:
Removed from v.1994  
changed lines
  Added in v.1995

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