PRO rdnflat,file,img

;procedure to read in images of flat frames multiplies by normalizing maps

img=INTARR(256,256)
openr,unt,file,/GET_LUN
READU,unt,img
close,unt & FREE_LUN,unt
RETURN
END