%N grinqli %F $MIR/src/grinqli.f
%D Obsolete routine*
%B
      SUBROUTINE GRINQLI (INTEN)

 GRPCKG: obtain the line intensity of the current graphics device.
 Obsolete routine.
 Argument:

 INTEN (integer, output): always returns 1.
