Changeset 2042 for branches/newmole/source/molcol.cpp
- Timestamp:
- 05/11/08 12:53:42 (8 months ago)
- Files:
-
- 1 modified
-
branches/newmole/source/molcol.cpp (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
branches/newmole/source/molcol.cpp
r2028 r2042 47 47 /* print the molecular column densities */ 48 48 int j=0; 49 long heavy=-1, lastheavy=0; 49 50 for( i=0; i < mole.num_calc; i++ ) 50 51 { 51 52 if(mole.list[i]->location == NULL) 52 53 { 54 lastheavy = heavy; 55 heavy = mole.list[i]->heavyElem(); 56 if(j == 8 || heavy != lastheavy) 57 { 58 fprintf( ioMEAN, "\n" ); 59 if (heavy != lastheavy) 60 { 61 fprintf ( ioMEAN, "==== %-2.2s compounds ====\n",element_list[heavy]->label); 62 } 63 j = 0; 64 } 53 65 fprintf( ioMEAN, " %-6.6s:", mole.list[i]->label ); 54 66 fprintf( ioMEAN, "%7.3f",log10(MAX2(SMALLFLOAT,mole.list[i]->column ))); 55 67 j++; 56 fixit(); /* Separate elemental chem more clearly -- would need to refactor mole.nElem */57 if( j == 8 )58 {59 fprintf( ioMEAN, "\n" );60 j = 0;61 }62 68 } 63 69 }
