-
Notifications
You must be signed in to change notification settings - Fork 2
/
metis_dqe.pro
33 lines (27 loc) · 1000 Bytes
/
metis_dqe.pro
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
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