filebase = '/umbradata3/optest/940222_190446'
i = 0 & rdtfr, filebase, img, hdr, nimg=1, first=i 	& print, i, total(img)
i = 1 & rdtfr, filebase, img, hdr, nimg=1, first=i 	& print, i, total(img)
i = 2 & rdtfr, filebase, img, hdr, nimg=1, first=i 	& print, i, total(img)
i = 3 & rdtfr, filebase, img, hdr, nimg=1, first=i 	& print, i, total(img)
;
end