Sto eseguendo un ciclo in un programma Fortran 90 che emette valori numerici su un file di output per ciascuna iterazione del ciclo. Il problema è che l'output non viene salvato nel file ma in ogni passo. Come faccio a scaricare ogni passo?Come svuotare l'output su file dopo ogni scrittura con un programma Fortran 90 di gfortran?
codice Esempio:
open(unit=1,file='output')
do i = 1, 1000
write(1,*) i
end do
close(unit=1)
Grazie in anticipo.
L'altro modo, se gfortran lo implementa, è chiamare la subroutine flush non standard. Non tutti i compilatori implementano questo.
È necessario rendere l'uscita non bufferizzata. Prova a impostare la variabile di ambiente GFORTRAN_UNBUFFERED_ALL su 'y', 'Y' o 1.
Dovrei fare questo da bash come segue: GFORTRAN_UNBUFFERED_ALL = 'y' esportazione $ GFORTRAN_UNBUFFERED_ALL ? Solo curioso? – banDedo
Sì, anche se non è necessario il '$' nella riga di esportazione. Funzionerà finché non si esce dalla shell corrente. Se vuoi questo comportamento in modo permanente, potresti voler aggiungere quelle linee al tuo file '.bashrc'. –
Ho provato la seguente prescrizione e ho digitato: GFORTRAN_UNBUFFERED_ALL = 'y' esportazione GFORTRAN_UNBUFFERED_ALL echo $ GFORTRAN_UNBUFFERED_ALL Echo stampato il valore corretto. Ho provato questo con 'y', 'Y', e 1. Nessuno del problema risolto. Grazie per il suggerimento, però. – banDedo
Quando ho bisogno di svuotare, basta chiudere il file e riaprirlo. Questo è maldestro e lento, ma non conosco un modo migliore in Fortran 90 che funzioni con tutti i compilatori.
'FLUSH' come subroutine (come in' chiamata flush() ') non è standard, ma la dichiarazione' FLUSH' vale Fortran 2003: 'A FILO (10)' –
Dal sito GNU, si dice: L'intrinseco FLUSH e l'istruzione FLUSH 2003 di Fortran hanno lo stesso effetto: svuotano il buffer I/O della libreria di runtime in modo che i dati diventino visibili ad altri processi. Questo non garantisce che i dati vengano trasferiti su disco. –