%
% Atop menuing location for Nexus
%
% stack: atop-cont-name
%
0 !Atop.Vector
*atoplocn
"atlocn" log)(
%
% stack: cont-num cont-group
%
&"_" ^
^"=AtopA_" !Nx@
_Atop.Vector !Nx*