65 p3 =
atom_pop3(4.,10.,6.,cs,cs13,cs23,a12,a13,a23,6.96e4,3.58e4,&p2,
91 CoolHeavy.c2569 =
atom_pop3(9.,5.,1.,1.38,0.173,cs,1.68,16.9,5.27,5.01e4,
92 5.60e4,&p2,
dense.xIonDense[
ipSODIUM][5],0.,0.,0.)*5.27*6.70e-12;
double atom_pop3(double g1, double g2, double g3, double o12, double o13, double o23, double a21, double a31, double a32, double Tex12, double Tex23, realnum *pop2, double abund, double gam2, double r12, double r13)