WRITE(4,100)
100	FORMAT(' DIES IST EIN TEST !!!!!!!!!')
	END