Name:         GRTRN0

Purpose:      define scaling transformation

Category:     GRAPHICS

File:         pgplot.src

Author:       T.J. Pearson

Use:          see description below.

Description:

            SUBROUTINE GRTRN0 (XORG,YORG,XSCALE,YSCALE)
      
       GRPCKG (internal routine): Define scaling transformation for current
       device (equivalent to GRTRAN without device selection).
      
       Arguments:
      
       XORG, YORG, XSCALE, YSCALE (input, real): parameters of the scaling
             transformation. This is defined by:
                     XABS = XORG + XWORLD * XSCALE,
                     YABS = YORG + YWORLD * YSCALE,
             where (XABS, YABS) are the absolute device coordinates
             corresponding to world coordinates (XWORLD, YWORLD).

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