Permalink
Switch branches/tags
Nothing to show
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
33 lines (27 sloc) 1000 Bytes
function metis_dqe, l, band
; this function calculates the quantum efficiency of METIS detectors.
; based on experimental curves for the detector types.
; arguments:
; l - wavelength grid in micron
; band - band of observation - 'l', 'm' or 'n'
dqe=dblarr(n_elements(l))
if (band eq 'l') or (band eq 'm') then begin
for i=0l, n_elements(l)-1 do begin
if ((l[i] gt 1.) and (l[i] le 5.3)) then dqe[i] = 0.7 else begin
if ((l[i] gt 5.3) and (l[i] le 5.5)) then dqe[i] = 0.5 else dqe[i] = 0.0
endelse
endfor
endif else begin
for i=0l, n_elements(l)-1 do begin
if (l[i] lt 8.) then dqe[i] = (0.06*(l[i]-3.))+0.3 else begin
if ((l[i] gt 8.) and (l[i] le 14.)) then dqe[i]=0.6 else begin
if ((l[i] gt 14.) and (l[i] le 19.)) then dqe[i]=0.7 else begin
if ((l[i] gt 19.) and (l[i] le 24.)) then dqe[i]=0.6 else dqe[i]=(-0.092*(l[i]-24.))+0.6
endelse
endelse
endelse
endfor
endelse
dqe=dqe*1.2
return, dqe
end