Quelques règles d'écriture d'un programme Fortran

Les identificateurs. Ils servent à désigner les différentes objets manipulés par le programme : variables, fonctions, noms de types ... ils sont formés d'une suite de caractères (lettres ou chiffres). Le caractère souligne    est considéré comme une lettre.

Exemples :

$${\it nombre\underline{~~}premier~~~~~~valeur\underline{~~}5~~~~~~ \underline{~~}total~~~~~~\underline{~~}89 }$$

$${\it X1~~~~~~Q123~~~~~~MASS~~~~~~VOLUME}$$

sont des indentificateurs valides. Par contre

$$1A ~~~~~~ UNE~~CHOSE ~~~~~\Vert toto$$

sont invalides

$\ominus$ Les majuscules et les miniscules ne sont pas distinguées. Ainsi

$$racine~~~~~~RACINE~~~~~~RAciNe$$

ont la même valeur.

$\ominus$ La longueur d'un indentificateur est limitée à 31 caractères.

Les mots clés. Ce sont des identificateurs prédéfinis par le langage : program, integer, real, print, read, if, do, else, ...

Les séparateurs. Deux identificateurs successifs doivent inpérativement être séparés soit par un espace soit par un changement de ligne, sauf si la syntaxe impose un séparateur tel que +, -, =, *, :, (), ...

Exemple :

 
     do i=1,nrac                                      !  valide
     doi = 1,nrac                                     !  invalide
     do   i =     1       ,                   nrac    !   valide

Instruction sur plusieurs lignes. Une ligne de programme contient en général une instruction. La longueur d'une ligne autorisée est de 132 caractères. Mais on peut écrire une instruction jusqu'a 39 lignes, en terminant chaque ligne par $\&$ sauf la dernière. Exemple

       print*, valeur, x, ordonnee, y

est équivalent à

       print*, valeur   , &
               x        , &
               ordonnee , &
               y

$\ominus$ Afin de couper une chaîne de caractère, il faut ajouter $\&$ au début de la ligne afin de maîtriser le nombre d'espace dans la chaîne. Exemple :

 
       print*, ' Bonjour &
               & monsieur'

Les commentaires. Dès que $!$ figure sur une ligne, tout ce qui suit, jusqu'à la fin de la ligne est en commentaire.

On peut présenter les déclarations sous la forme

       integer  :: i,     &     ! indice de boucle
                   nrac,  &     ! nombre de racines
                   nval         ! nombre de valeurs