20 fprintf(ioOUT,
"%s", chString );
35 strcpy( chUnits ,
"c" );
41 strcpy( chUnits ,
"m" );
46 strcpy( chUnits ,
" " );
51 strcpy( chUnits ,
"A" );
59 sprintf(chString,
"%5i", 0 );
63 sprintf(chString,
"%5.3f", wl );
67 sprintf(chString,
"%5.2f", wl );
71 sprintf(chString,
"%5.1f", wl );
75 sprintf(chString,
"%5.0f", wl );
79 sprintf(chString,
"%5i", (
int)wl );
91 sprintf(chString,
"%5i", 0 );
95 sprintf(chString,
"%5.4f", wl );
99 sprintf(chString,
"%5.3f", wl );
103 sprintf(chString,
"%5.2f", wl );
107 sprintf(chString,
"%5.1f", wl );
111 sprintf(chString,
"%5.0f", wl );
115 sprintf(chString,
"%5i", (
int)wl );
128 sprintf(chString,
"%6i", 0 );
132 sprintf(chString,
"%6.5f", wl );
136 sprintf(chString,
"%6.4f", wl );
140 sprintf(chString,
"%6.3f", wl );
144 sprintf(chString,
"%6.2f", wl );
148 sprintf(chString,
"%6.1f", wl );
152 sprintf(chString,
"%6.0f", wl );
156 sprintf(chString,
"%6i", (
int)wl );
163 strcat( chString , chUnits );
181 if( strcmp(
LineSv[i].chALab ,
"####" )==0 )
184 fprintf( ioOUT,
"####\t%s",
LineSave.chHoldComments[(
int)
LineSv[i].wavelength] );
189 (strcmp(
LineSv[i].chALab ,
"Inwd" )==0 ||
190 strcmp(
LineSv[i].chALab ,
"Coll" )==0 ||
191 strcmp(
LineSv[i].chALab ,
"Pump" )==0 ||
192 strcmp(
LineSv[i].chALab ,
"Heat" )==0)
199 fprintf( ioOUT,
"%li\t%s\t",
206 while(
LineSv[i].chComment[j]!=
'\0' &&
LineSv[i].chComment[j]==
' ')
209 fprintf( ioOUT ,
"\t%s" , &
LineSv[i].chComment[j] );
211 fprintf( ioOUT,
"\n" );
NORETURN void TotalInsanity(void)
#define DEBUG_ENTRY(funcname)
static realnum * wavelength
void prt_wl(FILE *ioOUT, realnum wl)
void prt_LineLabels(FILE *ioOUT, bool lgPrintAll)
void sprt_wl(char *chString, realnum wl)