Name:         PGQPOS

Purpose:      inquire current pen position

Category:     GRAPHICS

File:         pgplot.src

Author:       T.J. Pearson

Use:          see description below.

Description:

            SUBROUTINE PGQPOS (X, Y)
            REAL X, Y
      
       Query the current "pen" position in world C coordinates (X,Y).
      
       Arguments:
        X      (output)  : world x-coordinate of the pen position.
        Y      (output)  : world y-coordinate of the pen position.

Updates:      Oct 16, 1998: JPT automatically extracted from source.