      REM PLW-MAIN
*PIC-LAN
*
*ALL
*PC
*N
*
*
*
*
      INCLUDE SYS.TYPE.INCLUDE
*
      INCLUDE PL.COMMON
      INCLUDE PL.COMMON.DEFS
      INCLUDE PL.DEFS
      INCLUDE PLIP.COMMON
      INCLUDE PLW.COMMON
      INCLUDE PL.INIT.INCLUDE
*
      FOR I = 0 TO 2000
         PRINT I : CR :
         PL_DEALLOC.PLCB I ELSE NULL
      NEXT I
   END
