diff --git a/src/idl/dustem_get_emission_conversion_factor.pro b/src/idl/dustem_get_emission_conversion_factor.pro new file mode 100644 index 0000000..6bd81ef --- /dev/null +++ b/src/idl/dustem_get_emission_conversion_factor.pro @@ -0,0 +1,9 @@ +FUNCTION dustem_get_emission_conversion_factor,bidon + +wav=dustem_get_wavelengths() + +;conversion factor to be multipied by to go from Fortran spectrum unit () into MJy/sr for NH=(*!dustem_HCD) +fact = 1.e4*(*!dustem_HCD)/(4.*!pi)/(3.e8/1.e-6/wav)*1.e20/1.e7 + +RETURN,fact +END \ No newline at end of file -- libgit2 0.21.2