*COMDECK LPOOL
          CONTROL NOLIST;    #LPOOL#
          CONTROL EJECT;
  # #     COMMON LPOOLCOMM; 
  # #      BASED  ARRAY LPOOL[0:0]   S(1);
  # #         BEGIN 
  # #        ITEM LPWORD             U(0,0,60); 
  # #         ITEM LPWORDC  C(0,0,10);
  # #         END 
          CONTROL LIST;      #LPOOL#
