SUBROUTINE VERS(QINPUT)
	LOGICAL*1 QINPUT
	RETURN
	END