%
% stack: img-name-root
%
36 24 rot dup "Name" \! jpg ^"_icons\monads\" oflist
"seled " log()
_\ "Img" set