Discussion :

[feynman]

Bonjour,
j ai vu plusieurs cours en Fortran , mais aucun na dit que représente le * dans le fortran , (comme print*)
et quelle est la difference entre print* et write(*,*) par exemple?
merci

[Sylvain Bergeron]

Je ne pense pas que l'astérisque ait une définition unique dans le language. Les principaux sens sont :

• Multiplication (évidemment)
• Stdin ou stdout si utilisé à la place d'un numéro de fichier externe
• «list-directed» si utilisé comme format

quelle est la difference entre print* et write(*,*) par exemple?

• print écrit sur stdout avec le format spécifié (* = list-directed dans ce cas-ci)
• write écrit dans le fichier indiqué (* = stdout dans ce cas-ci) avec le format indiqué (* = list-directed dans ce cas-ci)

En résumé, « print fmt, ... » et « write(*,fmt) ... » sont équivalents.

[gregory2526]

attention, en ce qui concerne le write, le * écrit à l'écran uniquement si on n'a pas utilisé l'UNIT de la sortie standard dans un fichier.

Il me semble que l'écran correspond à UNIT=6 donc si on fait un OPEN(6,"nomdefichier",.......)
et qu'après on fait un write(*,*), on aura la sortie dans le fichier et non a l'écran (d'ou l'intérêt d'utiliser des UNIT toujours supérieurs à 10 pour les fichiers, afin de ne pas utiliser celles reservées au système