.TITLE	FULINT
FULINT::
	MOV	#FD.FUL,R1
	JMP	CTLOUT
	.END