Patrick Corde & Anne Fouilloux

Fichier texte séquentiel 113
Remarque
En ce qui concerne les formats a d’écriture I, B,
O, Z et F, lorsque le gabarit de la zone réceptrice est
insuffisant celle-ci est remplie par le caractère *. Depuis
la norme Fortran 95 il est possible d’éviter cela en
indiquant 0 comme largeur de zone.
Exemples
PROGRAM gabarit
INTEGER I
REAL R
I = 129876
R = -2345.78
WRITE( UNIT=1, FMT=’(I4, F6.3)’ ) I, R
WRITE( UNIT=1, FMT=’(I0, F0.3)’ ) I, R
END PROGRAM gabarit
Sorties
**********
129876-2345.780
a formats B, O, Z : c.f. Remarques en fin de chapitre.
INSTITUT DU DÉVELOPPEMENT
ET DES RESSOURCES
EN INFORMATIQUE SCIENTIFIQUE
Cours langage Fortran – 27 janvier 2006
Patrick Corde et Anne Fouilloux