I inFile, filePrec,
l = ILNBLNK(inFile)
& ' EXF_INTERP: file="',inFile(1:l),'", rec=', irecord,
& 'EXF_INTERP: file="', inFile(1:l), '", rec=', irecord
& 'EXF_INTERP: file="', inFile(1:l), '", rec=', irecord,
I inFile, irecord, method,
CHARACTER*(*) inFile
& 'EXF_INTERPOLATE: file="', inFile(1:l), '", rec=', irecord