real, parameter, private module_mp_thompson::pi = 3.1415926536

private

Referenced by calc_refl10cm(), eff_aero(), mp_thompson(), qr_acr_qg(), qr_acr_qs(), table_efrw(), table_efsw(), and thompson_init().