Need quick help with F77

[agz at houxz.UUCP]

Help! This F77 program is written just as the F77 manual specifies for
writing and reading in List-directed format:

	a=1
	write(3,*)a
	close(3)
	read(3,*)b
	print*,b
	stop
	end

Running a.out yields:

list in: end of file -1
apparent state: unit 3 named fort.3
last format: list io
lately reading direct formatted external IO

What am I doing wrong? Counseling can't help.

	Abdel Zebib BTL HOx0131  ../houxz!agz