Go to the documentation of this file.
34 if( lgEOL && !
nMatch(
" OFF",chCard) )
39 if(
nMatch(
"TEMP",chCard) )
42 if( lgEOL &&
nMatch(
" OFF",chCard) )
54 if( a <= 10. && !
nMatch(
"LINE",chCard) )
67 " Temperatures below %.2e K not allowed. Reset to lowest value."
68 " I am doing this myself.\n" ,
76 " Temperatures is above %.2e K not allowed. Reset to highest value."
77 " I am doing this myself.\n" ,
83 if(
nMatch(
"EXCE",chCard) )
99 else if(
nMatch(
"OPTI",chCard) &&
nMatch(
"21CM",chCard) )
103 if(
nMatch(
"LINE",chCard) )
112 fprintf(
ioQQQ,
" First number on STOP 21CM OPTICAL DEPTH command must be 21\n" );
131 else if(
nMatch(
"OPTI",chCard) )
135 if(
nMatch(
"LINE",chCard) )
143 fprintf(
ioQQQ,
" optical depth too big\n" );
162 if(
nMatch(
"LYMA",chCard) )
167 else if(
nMatch(
"BALM",chCard) )
174 fprintf(
ioQQQ,
" There must be a second number, the energy in Ryd. Sorry.\n" );
190 fprintf(
ioQQQ,
" The energy must be in the range %10.2e to %10.2e. It was %10.2e. Sorry.\n",
198 else if(
nMatch(
" AV ",chCard) )
207 if(
nMatch(
"EXTE" , chCard ) )
219 else if(
nMatch(
"MOLE",chCard) &&
nMatch(
"DEPL",chCard) )
232 else if(
nMatch(
"VELO",chCard) )
239 else if(
nMatch(
"MASS",chCard) )
252 else if(
nMatch(
"THIC",chCard) ||
nMatch(
"DEPT",chCard) )
256 if(
nMatch(
"LINE",chCard) )
265 fprintf(
ioQQQ,
" thickness too large\n" );
272 if(
nMatch(
"PARS",chCard) )
287 if(
nMatch(
"LINE",chCard) )
295 fprintf(
ioQQQ,
" thickness too large\n" );
300 if(
nMatch(
"PARS",chCard) )
325 else if(
nMatch(
"ZONE",chCard) )
355 else if(
nMatch(
"EFRA",chCard) )
369 else if(
nMatch(
"MFRA",chCard) )
383 else if(
nMatch(
"PFRA",chCard) )
396 else if(
nMatch(
"COLU",chCard) )
400 if(
nMatch(
"LINE" , chCard ) )
404 if(
nMatch(
"EFFE",chCard) )
424 else if(
nMatch(
"IONI",chCard) )
429 fprintf(
ioQQQ,
" column too big\n" );
450 else if(
nMatch(
"NEUT",chCard) )
471 else if(
nMatch(
" H2 ",chCard) )
480 fprintf(
ioQQQ,
" Something is wrong with the order of the numbers on this line.\n" );
481 fprintf(
ioQQQ,
" The first number I encounter should be the 2 in H2.\n Sorry.\n" );
501 else if(
nMatch(
"ATOM",chCard) )
518 else if(
nMatch(
"H/TS",chCard) )
536 else if(
nMatch(
" CO ",chCard) )
561 fprintf(
ioQQQ,
" column too big\n" );
583 else if(
nMatch(
"EDEN",chCard) )
587 if(
nMatch(
"LINE",chCard) )
599 else if(
nMatch(
"LINE",chCard) )
607 GetQuote( chLabel , chCard ,
true );
635 fprintf(
ioQQQ,
" There MUST be a relative intensity entered "
636 "for first line in STOP LINE command. Sorry.\n" );
655 GetQuote( chLabel , chCard ,
true );
681 else if(
nMatch(
"NTOT" , chCard ) &&
nMatch(
"ALIO" , chCard ) )
692 fprintf(
ioQQQ,
" I did not recognize a keyword on this STOP line, line image follows;\n" );
693 fprintf(
ioQQQ,
" \"%s\"\n Sorry.\n" , chCard);
Generated for cloudy by
1.8.3.1