*COMDECK LPOOL1 
          CONTROL NOLIST;    #LPOOL1# 
         CONTROL EJECT; 
          COMMON LPOOLCOMM; 
  # #     BASED ARRAY LPOOL[0:0] S(1);
  # #       ITEM LP$WORD           U(0,0,60); 
          CONTROL LIST;      #LPOOL1# 
