%N grslct %F $MIR/src/grslct.f
%D Select active output device
%B
      SUBROUTINE GRSLCT (IDENT)

 GRPCKG: Check that IDENT is a valid plot identifier, and select the
 corresponding plot as the current plot. All subsequent plotting will
 be directed to this device until the assignment is changed by another
 call to GRSLCT.

 Argument:

 IDENT (input, integer): the identifier of the plot to be selected, as
       returned by GROPEN.
