; Since not all images seem to have recorded filter wheel
; temperatures, interpolate now to estimate temperatures for
; all images.

wnz=WHERE(imtemps,nwnz)
IF nwnz GT 1 $
THEN imtemps=interpol(imtemps(wnz),utsec(wnz),utsec) $
ELSE BEGIN
READ,'No filter wheel temperatures stored; enter a best guess: ' $
,gtemp
imtemps=REPLICATE(gtemp,N_ELEMENTS(imtemps))
PRINT,interpol(filtrans,filtemp,gtemp)
ENDELSE
ENDIF ELSE BEGIN
filtemp=FINDGEN(12)*2+10
filtrans=REPLICATE(1.,12)
ENDELSE