Changeset 1711
- Timestamp:
- 12/21/07 20:19:01 (7 months ago)
- Files:
-
- trunk/source/atmdat_chianti.cpp (modified) (1 diff)
- trunk/source/atom_feii.cpp (modified) (1 diff)
- trunk/source/cont_createmesh.cpp (modified) (1 diff)
- trunk/source/cont_ffun.cpp (modified) (3 diffs)
- trunk/source/ion_recomb_Badnell.cpp (modified) (1 diff)
- trunk/source/parse_table.cpp (modified) (2 diffs)
- trunk/source/rfield.h (modified) (1 diff)
- trunk/source/zero.cpp (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/source/atmdat_chianti.cpp
r1700 r1711 686 686 free( atmolStatesEnergy ); 687 687 free( intNewIndex ); 688 689 fclose( atmolLevDATA ); 690 fclose( atmolTraDATA ); 691 fclose( atmolEleColDATA ); 692 688 693 return; 689 694 } trunk/source/atom_feii.cpp
r1698 r1711 679 679 } 680 680 681 fclose( ioDATA ); 682 681 683 /*generate needed opacity data for the large FeII atom */ 682 684 trunk/source/cont_createmesh.cpp
r1557 r1711 771 771 } 772 772 773 fclose( ioDATA ); 774 773 775 /* now verify continuum grid is ok - first are all values but the last positive? */ 774 776 for( i=1; i<continuum.nStoredBands-1; ++i ) trunk/source/cont_ffun.cpp
r1557 r1711 13 13 14 14 /*ReadTable called by TABLE READ to read in continuum from PUNCH TRANSMITTED CONTINUUM */ 15 STATIC void ReadTable( FILE * io);15 STATIC void ReadTable(const string& fnam); 16 16 17 17 /* evaluate sum of all individual continua at one energy, return is … … 357 357 358 358 /*ReadTable called by TABLE READ to read in continuum from PUNCH TRANSMITTED CONTINUUM */ 359 STATIC void ReadTable( FILE * io)359 STATIC void ReadTable(const string& fnam) 360 360 { 361 361 char chLine[INPUT_LINE_LENGTH]; … … 364 364 double Differ, 365 365 EnerLast; 366 FILE *io; 366 367 367 368 DEBUG_ENTRY( "ReadTable()" ); 368 369 369 370 /* make sure the file handle points somewhere */ 370 ASSERT( io != NULL ); 371 if( NULL == ( io = fopen(fnam.c_str(),"r") ) ) 372 { 373 fprintf( ioQQQ, " I could not open file %s.\n", fnam.c_str() ); 374 puts( "[Stop in ReadTable]" ); 375 cdEXIT(EXIT_FAILURE); 376 } 371 377 372 378 /* read in first line of header */ trunk/source/ion_recomb_Badnell.cpp
r1679 r1711 812 812 } 813 813 814 fclose( ioDATA ); 815 814 816 /*output coefficients for defined values for testing */ 815 817 # ifdef PRINT_DR trunk/source/parse_table.cpp
r1557 r1711 1058 1058 } 1059 1059 1060 /* now open this file */ 1061 if( NULL==(rfield.ioTableRead[rfield.nspec]=fopen( chFile,"r"))) 1062 { 1063 fprintf( ioQQQ, " I could not open file %s.\n",chFile ); 1064 puts( "[Stop in ParseTable]" ); 1065 cdEXIT(EXIT_FAILURE); 1066 } 1060 /* store file name for later reading */ 1061 rfield.ioTableRead[rfield.nspec] = string( chFile ); 1067 1062 1068 1063 /* set flag saying really just read in continuum exactly as punched */ … … 1079 1074 ++rfield.nspec; 1080 1075 return; 1081 1082 1076 } 1083 1077 trunk/source/rfield.h
r1403 r1711 318 318 319 319 /** pointer to file for table read command */ 320 FILE *ioTableRead[LIMSPC];320 string ioTableRead[LIMSPC]; 321 321 322 322 /** these are total numbers of photons over various energy ranges */ trunk/source/zero.cpp
r1703 r1711 1264 1264 rfield.range[i][0] = HIONPOT; 1265 1265 rfield.range[i][1] = rfield.egamry; 1266 rfield.ioTableRead[i] = NULL;1266 rfield.ioTableRead[i].clear(); 1267 1267 } 1268 1268 rfield.comtot = 0.;
