INTEGER Q_L_NUMBER, Q_L_DENSITY, Q_L_QUEUE

      PARAMETER (Q_L_NUMBER  = 1)
      PARAMETER (Q_L_DENSITY = 2)
      PARAMETER (Q_L_QUEUE   = 3)