SUBROUTINE LINEF
C TO PRODUCE A LINEFEED WITHOUT A CARRIAGE RETURN
C BY OUTPUTTING 212
C FORTRAN II
S	CLA CLL
S	TAD (212
SLF,	TSF
S	JMP LF
S	TLS
S	CLA
	RETURN
	END