subr t3d_selectortool
 if defined($t3dselectwidget) eq 0 then {
 ;the compile_file is supposed to operate at top level and hence the edb's
 ;are temporary and don't add to our accumulation
 compile_file, getenv('ANA_WLIB') + '/trace3dselectorwidgettool.ana'
 } else { xtpopup, $t3dselectwidget }
 endsubr
 ;===============================================================================