%N pgpoint %F $MIR/src/pgpoint.f
%D Non-standard alias for PGPT
%B
      SUBROUTINE PGPOINT (N, XPTS, YPTS, SYMBOL)
      INTEGER N
      REAL XPTS(*), YPTS(*)
      INTEGER SYMBOL

 See description of PGPT.
