%
% find the most recent complete or invalid cnc program
% could be imp_ or pgm_ prefix of *.pgm
%

"*.pgm" !wilder
_Telem &"\" ofconn
empty
{
 prevfile ?
 dup term2 "." left$ !Mach.Plate
 true ?
} loop
filing)