36 return (0.98925439 + 0.084594094*t)/(1. + t*(0.64794212 + t*0.44743976));
50 if( !
rfield.lgInducProcess )
85 static const double BREAK = 3.;
86 yinc1 = con_pump_op.
sum(0.,
BREAK,func);
87 yinc2 = con_pump_op.
sum(
BREAK,100.,func);
89 a0 = 0.886227*(1. + func.
damp);
90 ContPump_v = (yinc1 + yinc2)/
a0;
sys_float sexp(sys_float x)
#define DEBUG_ENTRY(funcname)
realnum & opacity() const
double sum(double min, double max, Integrand func)
EmissionList::reference Emis() const
double operator()(double x)
double DrvContPump(const TransitionProxy &t, realnum DopplerWidth)
static const double BREAK
void VoigtH(realnum a, const realnum v[], realnum y[], int n)