Patrick Corde & Anne Fouilloux

Remarques 149
Les fichiers associés au clavier et à l’écran d’une
session interactive sont pré-connectés en général aux
numéros d’unités logiques 5 et 6 respectivement : en
lecture pour le premier, en écriture pour le second.
Dans un souci de portabilité, on préférera utiliser
dans les instructions READ/WRITE le caractère * à la
place du numéro de l’unité logique pour référencer
l’entrée standard (READ) ou la sortie standard (WRITE).
C’est la valeur par défaut du paramètre UNIT. L’instruction
PRINT remplace l’instruction WRITE dans le cas
où celui-ci n’est pas précisé.
Formes équivalentes
CHARACTER(LEN=8) :: fmt = "(F8.3)"
READ( UNIT=5, FMT=fmt) ...
READ( UNIT=*, FMT=fmt) ...
READ fmt, ...
WRITE( UNIT=6, FMT=fmt) ...
WRITE( UNIT=*, FMT=fmt) ...
PRINT fmt, ...
INSTITUT DU DÉVELOPPEMENT
ET DES RESSOURCES
EN INFORMATIQUE SCIENTIFIQUE
Cours langage Fortran – 27 janvier 2006
Patrick Corde et Anne Fouilloux