real, dimension(10), parameter, private module_mp_thompson::sa = (/ 5.065339, -0.062659, -3.032362, 0.029469, -0.000285, 0.31255, 0.000204, 0.003199, 0.0, -0.015952/)

private

Referenced by calc_effectrad(), calc_refl10cm(), mp_thompson(), and qr_acr_qs().