	SUBROUTINE GSDLNS(ILTYPE,ON1,OFF1,ON2,OFF2)
C
C	Define LiNe Style
C
	LOGICAL*1 LINILT, LPOSND
	COMMON /GCLTYP/ ILNTYP, DLEFT, DIST(4,3), LINILT, LPOSND
C
	IF (ILTYPE .LT. 2 .OR. ILTYPE .GT. 4) RETURN
	INDEX = ILTYPE-1
	DIST(1,INDEX) = ON1
	DIST(2,INDEX) = OFF1
	DIST(3,INDEX) = ON2
	DIST(4,INDEX) = OFF2
	RETURN
	END
