Commit 2ffa8f64751463fdd426173072bcb05ae588fd8a

Authored by Annie Hughes
1 parent 2fe314fa
Exists in master

changed to dustem native routines

Showing 1 changed file with 2 additions and 1 deletions   Show diff stats
src/idl/dustem_get_band_flux.pro
... ... @@ -238,7 +238,8 @@ FUNCTION DUSTEM_GET_BAND_FLUX, dpath, inst, xs=xs, ys=ys, smi=smi, unit=unit, VE
238 238 for itp=0,ntype-1 do begin
239 239 inu = 1d17 * yw(ixw,itp)/nu/1d9 ; MJy/sr
240 240 y0 = INTERPOL(yw(ixw,itp),nu,wbd(k))
241   - cc = HFI_COLOR_CORRECTION( bp,bnm(k),bolo_cc, nu,inu )
  241 +; cc = HFI_COLOR_CORRECTION( bp,bnm(k),bolo_cc, nu,inu )
  242 + cc = HFI_COLOR_CORRECTION_DUSTEM( bp.name,bp.freq/1e9,bp.trans,bnm(k),bolo_cc, nu,inu )
242 243 smdat.(itx).ym(k,itp) = cc.cc * y0 ; SED (erg/cm2/s/sr) @ band center
243 244 smdat.(itx).flx(k,itp) = 1d17*cc.cc*y0/wbd(k)/1d9 ; in MJy/sr
244 245 smdat.(itx).cc(k,itp) = cc.cc
... ...