definer
{

"deleting" "Delete Dir Cycle Seed File"
"Exec" % "path seed -->path seed"
"filing del"
newdef

"prevof" "Previous File of Wildcard Spec"
"Exec" % "path seed spec --> path next no-next-file"
"^3 File.PrevOf isnull"
newdef

"listing" "Create List of Objects From Dir Cycle"
"Exec" % "path seed -->path seed empty [ . . . ]"
"empty second ^4 exec$"
newdef

"finalerr" "Finalized File Process with Error Tag"
"Exec" % "path file-name --> path file-name"
'dup ^3 ".xty" overext'
newdef

} if