Il Linguaggio Fortran 90/95

188 Operazioni di I/O interattive
4.4.4 Il descrittore E
Il descrittore di formato E è utilizzato per controllare il formato di rappresentazione dei valori
reali secondo la notazione esponenziale. Il suo formato è:
Ew.d [Ee]
dove w rappresenta la larghezza di campo, ossia il numero di caratteri da utilizzare per rappresentare
i dati di input e output, d rappresenta il numero di cifre da visualizzare a destra
del punto decimale, mentre e rappresenta il numero di cifre nell’esponente (si noti che, per
default, ad e viene attribuito valore due). Si faccia attenzione al fatto che i valori reali rappresentati
secondo la notazione esponenziale con il descrittore E sono ”normalizzati” ossia sono
rappresentati con una mantissa compresa tra 0.1 e 1.0 moltiplicata per una potenza di 10. La
dimensione dei campi dei numeri reali deve essere valutata con molta attenzione quando si fa
uso del descrittore E. Infatti, nel caso in cui il suffisso Ee sia assente è necessario che w e d
soddisfino alla condizione:
w ≥ d + 7
ossia, per stampare una variabile con d cifre significative occorre un campo di almeno d+7
caratteri (infatti occorrono, oltre a d caratteri per le cifre significative della mantissa, anche un
carattere per il segno della mantissa, due per lo zero e il punto decimale, uno per la lettera E,
uno per il segno dell’esponente e due per l’esponente). Nel caso in cui questa condizione non sia
soddisfatta, il campo destinato all’output del reale sarà riempito di asterischi. Analogamente,
la forma ”completa” del descrittore, che prevede anche il gruppo Ee implica il rispetto della
condizione:
w ≥ d +e+5
Si noti che nel caso in cui il numero da rappresentare sia positivo la larghezza minima del
campo può essere diminuita di un’unità (così, ad esempio, in assenza del suffisso Ee basta che
la larghezza w del campo sia di soli sei caratteri più grande di d). Si noti, infine, che alcuni
compilatori eliminano lo zero iniziale per cui, in questi casi, è richiesta una colonna in meno.
Come esempio, si guardino le seguenti istruzioni:
REAL :: a=1.2345E6, b=0.01, c=-77.7E10, d=-77.7E10 WRITE(*,100)
a,b,c,d 100 FORMAT(1X,2E14.4,E13.6,E11.6)
le quali, come è logico attendersi, generano il seguente risultato:
0.1235E+07 0.1000E-01-0.777000E+12***********
(ai piedi del precedente record di uscita si sono indicate schematicamente anche le dimensioni
di ciascun campo, al fine di rendere più evidente la formattazione del risultato).
Si supponga ora di voler rappresentare in uscita il valore complesso z = 4.25 + j78.3 Dal
momento che un numero complesso è costituito da una coppia di valori reali, il relativo formato
viene specificato mediante due successivi descrittori di formato validi per i reali, rispettivamente
per la parte reale ed il coefficiente della parte immaginaria. Pertanto le istruzioni: