PROGRAM TESTF

	CALL HELLO()
	CALL WORLD()

	END