C
      PARAMETER (MAXLU=200)
      LOGICAL LU(MAXLU)
      COMMON /COPCL/ LU