c filter.dec c Array and common declarations for FUNCTION FILTER c mxft = 300 = maximum number of filters c mxwf = 200 = maximum number of wavelengths/filter PARAMETER (mxft=300,mxwf=200) COMMON /c_filter/ iread,jread,nf,np(mxft),r(mxwf,mxft,2)