PRO rdcwlrpb,cwl,rpb,unitstring

@isitdos

unitstring='R'
cwl=FLTARR(10)
rpb=cwl
OPENR,funit,filtinfo,/GET_LUN
READF,funit,cwl,rpb
CLOSE,funit
FREE_LUN,funit

RETURN
END