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