EOF

[GerritGroot]

Hi,

I was using EOF to check for the end of file, like...

DO WHILE(.NOT.EOF(1))
   READ(1,*)MyVariable
END DO

But it doesn't seem to be standard fortran 90.

Is there a neat fortran 90 way to steer clear of this without using linenumbers (like ERR=100)?

Thanks,

Gerrit

 

[xwb]

You could try testing the IOSTAT in the READ for a -ve number.

 

[GerritGroot]

Works great, thanks!

IOSTAT seems to be -1 on the EOF (just had to substract one from the counter, because EOF() changes just before reading the eof, while IOSTAT changes on the eof itself).

After some search, I noticed that IOSTAT=err number for other cases.

Gerrit