CHARACTER       SLINE*80, AS*80, BS*80
	COMMON /CHARLINE/ SLINE, AS, BS