
; take two images separated by 120 seconds and look at average and
;  difference for data1 


avg=(data1[*,*,0]+ data1[*,*,2])/2.
window,0,retain=2
tvim,avg,/scale,xtitle='x',ytitle='y',title='data1, average frame 0 & 2'

; display difference in window 1

diff=(data1[*,*,1] - data1[*,*,0])
window,1,retain=2
tvim,diff,/scale,xtitle='x',ytitle='y',title='data1 frame 2 - 0'
