        SUBROUTINE BGNPLT
        IMPLICIT NONE
        REAL*4 X,Y
C
C
        CALL GSDRVR(2,X,Y)
        RETURN
        END

