.TITLE	DUBHGT
DUBHGT::
	MOV	#FD.DHT,R1
	JMP	CTLOUT
	.END