[Tech] Fortran77 File I/O

Christian argonauta74@gmail.com
Mar 3 Feb 2009 12:17:17 CET


Ciao, qualcuno può aiutarmi con il Fortran77?

Per motivi di lavoro, devo utilizzare un programma scritto in Fortran77
ma l'opzione che dovrei usare sembra non funzionare correttamente.
Quello che ottengo in output è il seguente errore: 

list in: end of file
apparent state: unit 97 named parfile.dat
last format: list io
lately reading sequential formatted external IO
Aborted

Riporto la parte di codice direttamente interessata: 

IF(IFENS.EQ.2)THEN
        POURCE = 0.0
        READ(99,'(A)') CFENS
        OPEN(97,FILE=CFENS,STATUS='OLD')
        DO 16 IT = 1,NIT+1
          READ(97,*) FENS(IT)
16      CONTINUE
        CLOSE(97)
      ENDIF

Più precisamente il programma legge un file principale che viene fornito
come input. Arrivato ad un certo punto il file principale fornisce il
nome di un secondo file (CFENS) che dovrebbe essere aperto e letto.

Forse non è corretta la specifica 97 ? 
Forse bisogna indicare esplicitamente la directory in cui è presente il
file?

Grazie.  
-- 
Christian
Instant messaging (Gtalk/jabber-Skype): argonauta74@gmail.com
        
"..chiunque abbia osservato almeno una volta con i propri occhi la
bellezza della natura non è destinato alla morte, ma alla natura
stessa."

Konrad Lorenz




Maggiori informazioni sulla lista flug-tech