# swt --- return to the Subsystem command interpreter

   subroutine swt

   call rtn$$     # never returns here

   end