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

App.PerSub

_existed not
{
 "Load" *persists
 root\ Tree.Select
} if