/[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 1848 by jpye, Fri Aug 22 07:23:58 2008 UTC revision 1849 by jpye, Mon Sep 1 14:48:55 2008 UTC
# Line 45  Line 45 
45  /* for the moment, species data are defined in C code, we'll implement something  /* for the moment, species data are defined in C code, we'll implement something
46  better later on, hopefully. */  better later on, hopefully. */
47  #include "ammonia.h"  #include "ammonia.h"
48    #include "nitrogen.h"
49    
50  #ifndef ASC_EXPORT  #ifndef ASC_EXPORT
51  # error "Where is ASC_EXPORT?"  # error "Where is ASC_EXPORT?"
# Line 143  int helmholtz_prepare(struct BBoxInterp Line 144  int helmholtz_prepare(struct BBoxInterp
144          return 1;          return 1;
145      }      }
146    
147      if(strcmp(comp,"ammonia")!=0){      if(strcmp(comp,"ammonia")==0){
148          ERROR_REPORTER_HERE(ASC_USER_ERROR,"Component must be 'ammonia' at this stage (only one component supported)");          bbox->user_data = (void*)&helmholtz_data_ammonia;
149        }else if(strcmp(comp,"nitrogen")==0){
150            bbox->user_data = (void*)&helmholtz_data_nitrogen;
151        }else{
152            ERROR_REPORTER_HERE(ASC_USER_ERROR,"Component must be 'ammonia' or 'nitrogen' at this stage (only two components supported)");
153      }      }
154    
155      ERROR_REPORTER_HERE(ASC_PROG_NOTE,"PREPARING HELMHOLTZ...\n");      ERROR_REPORTER_HERE(ASC_PROG_NOTE,"Prepared component '%s' OK.\n",comp);
   
     bbox->user_data = (void*)&helmholtz_data_ammonia;  
   
156      return 0;      return 0;
157  }  }
158    

Legend:
Removed from v.1848  
changed lines
  Added in v.1849

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