23 p.
NoNumb(
"extinguishing column");
30 if(
rfield.ExtinguishColumnDensity>35. )
33 " The first parameter on this command line is the log of either the column density or optical depth.\n");
35 " The value seems pretty big to me - please check it.\n");
45 rfield.ExtinguishLeakage = 0.;
48 if(
rfield.ExtinguishLeakage < 0. )
51 if(
rfield.ExtinguishLeakage > 1. )
54 fprintf(
ioQQQ,
" A leakage of%9.0f%% was entered - this must be less than 100%%\n",
55 rfield.ExtinguishLeakage*100. );
65 rfield.ExtinguishLowEnergyLimit = 0.99946f;
68 if(
rfield.ExtinguishLowEnergyLimit <= 0. )
70 if(
rfield.ExtinguishLowEnergyLimit < 0.99946 )
71 fprintf(
ioQQQ,
" Energy less than 1 Ryd!!\n" );
79 pow(
rfield.ExtinguishLowEnergyLimit,
rfield.ExtinguishEnergyPowerLow) );