Patrick Corde & Anne Fouilloux

La directive INCLUDE 185
SUBROUTINE sub
IMPLICIT NONE
INCLUDE ’inclusion.inc’
PRINT*,’Tableau réels = ’, rtab
PRINT*,’Tableau logique = ’, ltab
END SUBROUTINE sub
Le fichier inclusion.inc contient les déclarations de
COMMONs et de paramètres :
DOUBLE PRECISION, PARAMETER :: PI=3.14159265d0
DOUBLE PRECISION, DIMENSION(6) :: rtab
LOGICAL, DIMENSION(3)
:: ltab
COMMON rtab,ltab
Remarques :
☞ L’inclusion du contenu du fichier se fait là où est placée
la directive INCLUDE,
☞ Il est possible d’imbriquer plusieurs directives INCLUDE.
Le nombre d’imbrications possible dépend du compilateur.
☞ La localisation du fichier à inclure peut être précisée à
l’aide de l’option -I du système de compilation.
INSTITUT DU DÉVELOPPEMENT
ET DES RESSOURCES
EN INFORMATIQUE SCIENTIFIQUE
Cours langage Fortran – 27 janvier 2006
Patrick Corde et Anne Fouilloux