%
% stack: x y w h pep-name
%
% focus on the named pep
%
true exch *freeacts

App.PerSub

_existed not
{
 "Foad" *persists
 rootnode Tree.Select
} if