        FUNCTION GSXLCM()
C
C       THIS FUNCTION RETURNS THE X AXIS LENGTH OF THE CURRENT DEVICE
C       IN CENTIMETERS.
C
        INCLUDE GCDCHR.PRM
C
        GSXLCM = XLENCM
        RETURN
        END
