The EOF operator

[biebo]

Hello All,

I am new to fortran, I am compiling a program that uses file operations. I am getting the following error,

DO WHILE (.NOT. EOF(INPUT1))
1
Error: Operand of .NOT. operator at (1) is REAL(8)

I will appreciate any help in this regard.
thanks

--------------
More info

I went though the source code,

INPUT1 is declared like:

INPUT1 = 1

it is read couple of times like:

READ(INPUT1,*) LABEL

here LABEL is: CHARACTER (LEN=80) LABEL

then it is rewind like:

REWIND INPUT1

then the statement which gives the error is called:

LOOP_1234 : DO WHILE (.NOT. EOF(INPUT1))

 

[mikrom]

EOF isn't in standard Fortran - read this:

http://www.tek-tips.com/viewthread.cfm?qid=1371995