%
% stack: filespec path
%
!path
empty !file
empty !time
empty
_path rot
File.Find
{
 isnull ?

 dup System.FileTimes
% filename --> modified accessed created
 pop2
 _time any?
 {
%
% is a valid time
%

  dup2nd
  "s" Time.Diff negative
  {
%
% current file is newer
%
   !time
   !file
  }
  {
%
% current file is older
%
   pop2

  } ifelse
 }
 {
%
% start of time compare, use this entry
%
  !time
  !file
 } ifelse
} loop
pop