SUBROUTINE  PLTQ4 (X,Y,P)

C     [QUADRANT #4]
C     SCALE X,Y TO FIT INTO THE FOURTH QUADRANT ASSUMING THAT THEY
C     ALREADY LIE IN THE RANGE (0.0 .LE. X,Y .LE. 1.0).
C     [15-FEB-74]

      LOGICAL*1     P
      DATA        HX,HY/4.50,3.25/

      CALL PLTMS (HX*X,HY*(Y-1.0),P)
      RETURN

      END