%N grmark %F $MIR/src/grmark.f
%D Mark points with specified symbol
%B
      SUBROUTINE GRMARK (IDENT,CENTER,SYMBOL,ABSXY,POINTS,X,Y)

 GRPCKG: mark a sequence of points with a specified symbol. The
 plot is windowed in the current subarea.

 Arguments:

 IDENT (integer, input): plot identifier from GROPEN.
 CENTER (input, logical): if .TRUE. the symbol is centered on the point,
      otherwise the bottom left corner is placed at the point.
 SYMBOL (byte or integer, input): code number of symbol in range 0-127
      (ASCII character or special symbol); if SYMBOL is outside this
      range, nothing is plotted.
 ABSXY (logical, input): if .TRUE. (X,Y) are absolute (device)
      coordinates; otherwise they are world coordinates and the
      scaling transformation is applied.
 POINTS (integer, input): the number of points; if POINTS is less than
      or equal to 0, nothing is plotted.
 X,Y (real arrays, dimension at least POINTS, input): the coordinate
      pairs; if POINTS=1, these may be scalars instead of arrays.

 (9-Mar-1983)
