FUNCTION rfindfile,path,count=count f=FINDFILE(path,COUNT=count) RETURN,f END