Il Linguaggio Fortran 90/95

184 Operazioni di I/O interattive
dove w rappresenta la larghezza di campo, ossia il numero di caratteri da utilizzare per rappresentare
i dati di input e output, mentre m rappresenta il numero minimo di cifre da visualizzare.
In input non vi è alcuna differenza fra i descrittori Iw.m e Iw; inoltre non ha importanza la
posizione in cui viene inserito il valore intero (nel senso che eventuali bianchi di testa vengono
completamente ignorati) purché il valore venga inserito all’interno del campo di w caratteri ad
esso riservato.
In output il dato intero viene rappresentato in un campo di w caratteri con almeno m cifre,
di cui le prime uguali a zero se il numero da rappresentare è composto da meno di m cifre. Se,
però, l’ampiezza di campo w non è sufficiente per contenere tutte le cifre del valore intero da
produrre, il campo sarà riempito con w asterischi.
Come esempio di istruzione di uscita formattata si consideri il seguente ramo di codice:
INTEGER :: a = 3, b = -5, c = 128 ... WRITE(*,"(3I4.2)") a, b, c
Il descrittore di formato utilizzato è 3I4.2 che è equivalente a (I4.2,I4.2,I4.2) per via
della presenza del contatore di ripetizione 3. Pertanto, ciascuna delle tre variabili intere verrà
stampata in accordo con lo specificatore I4.2 ottenendosi il risultato seguente:
bb03b-05b128
dove con il simbolo b si è indicato uno spazio bianco mentre la presenza degli zeri è giustificata
dalla presenza del termine ”.2” in coda allo specificatore che richiede un minimo di 2 cifre
significative.
Come ulteriore esempio, si osservino le seguenti istruzioni:
INTEGER :: i=-12, j=4, number=-12345 WRITE(*,100) i, i+12, j, number
WRITE(*,110) i, i+12, j, number WRITE(*,120) i, i+12, j, number 100
FORMAT(1X,2I5,I7,I10) 110 FORMAT(1X,2I5.0,I7,I10.8) 120
FORMAT(1X,2I5.3,I7,I5)
Il risultato prodotto questa volta è, chiaramente, il seguente:
-12 0 4 -12345
-12 4 -00012345
-012 000 4*****
dove la presenza degli asterischi che riempiono l’intero campo finale dipende dal fatto che
il valore intero -12345 richiede sei caratteri ossia uno in più rispetto a quanti ne riserva lo
specificatore I5 utilizzato per la variabile number nell’ultima istruzione FORMAT (a margine
dell’ultimo record si sono evidenziate graficamente le ampiezze dei campi associati a ciascuno
specificatore di formato in modo da rendere più chiara l’interpretazione del risultato).
Nelle istruzioni di ingresso, invece, i valori interi possono essere inseriti ovunque all’interno
dei campi ad essi destinati e saranno letti sempre correttamente. Così, ad esempio, data
l’istruzione di lettura: