	FUNCTION GSXLCM()
C
C	THIS FUNCTION RETURNS THE X AXIS LENGTH OF THE CURRENT DEVICE
C	IN CENTIMETERS.
C
	COMMON /GCDCHR/ DEVID, XLENCM, YLENCM, XRES, YRES,
	1   NDCLRS, IDVBTS, NFLINE, XCLIPD, YCLIPD
C
	GSXLCM = XLENCM
	RETURN
	END
