Il Linguaggio Fortran 90/95

196 Operazioni di I/O interattive
WRITE(*,100) m,n,x WRITE(*,100) m,n 100 FORMAT(1X,"m =",I3,2X,"n
=",I3 : 2X,"x =",F7.3)
che produce il seguente output:
m = 1 n = 2 x = 1.000 m = 1 n = 2
4.5.4 Il descrittore /
Il descrittore di formato / (slash) indica la fine del trasferimento dei dati sul record corrente.
In operazioni di input questo descrittore di formato fa sì che venga saltato il buffer di input
corrente e che venga acquisito un nuovo buffer dall’unità di input sicché l’acquisizione continuerà
dall’inizio del nuovo buffer. Ad esempio, la seguente istruzione READ formattata legge i valori
delle variabili i e j dalla prima riga di input, salta due righe e legge i valori delle variabili k e
l dalla terza riga di input:
INTEGER :: i, j, k, l READ(*,100) i, j, k, l 100 FORMAT(2I3,//,2I3)
In operazioni di output il descrittore / trasmette al dispositivo di uscita il contenuto del buffer
corrente di output e apre un nuovo buffer. Grazie a questo descrittore è possibile, ad esempio,
visualizzare valori di output di una stessa istruzione WRITE in più righe. E’ possibile usare più
slash consecutivi per saltare più righe; inoltre, si noti che non è necessario fare uso di virgole
per separare lo slash dagli altri descrittori. Come esempio si consideri la seguente istruzione
WRITE formattata:
REAL :: massa, pressione, temperatura ... WRITE(*,100) massa,
pressione, temperatura 100 FORMAT("Stato del
gas:",20("="),//,"massa:",F7.3,/, &
"pressione",F7.3,/,"temperatura",F7.3)
Se, ad esempio, i valori delle variabilimassa, pressione etemperatura fossero, rispettivamente,
0.01, 2.01 e 298.3 l’output del precedente frammento di programma sarebbe:
Stato del gas:
====================
massa: 0.010 pressione: 2.010 temperatura: 298.300
Un discorso del tutto analogo vale se le operazioni di I/O avvengono su file esterni. Ogni
qualvolta un file viene connesso per operazioni di input usando l’accesso sequenziale, la presenza
di questo descrittore nella frase di specificazione di formato posiziona il file all’inizio del
successivo record da leggere. Analogamente, quando un file è connesso per operazioni di output
usando l’accesso sequenziale, la presenza di uno slash nella frase di specificazione di formato
posiziona il file all’inizio di un nuovo record da scrivere.