Patrick Corde & Anne Fouilloux

Common étiqueté 181
☞ un bloc COMMON peut être découpé différemment
d’une unité de programme à une autre, c’est-à-dire
référencé à l’aide de variables de types différents
à condition que ce découpage soit cohérent (les
zones numériques doivent correspondre à des zones
numériques et de même pour les zones caractères),
☞ une instruction EQUIVALENCE ne peut pas :
➳ associer des variables déclarées dans des blocs
COMMON différents,
➳ avoir pour effet de prolonger le COMMON à sa
gauche. Dans l’exemple suivant, on ne peut pas
associer la variable scalaire A au scalaire B(2) :
REAL
:: A
REAL, DIMENSION(2) :: B
COMMON /X/A
EQUIVALENCE (A,B(2))
EQUIVALENCE (A,B(1))
! INVALIDE
! VALIDE
INSTITUT DU DÉVELOPPEMENT
ET DES RESSOURCES
EN INFORMATIQUE SCIENTIFIQUE
Cours langage Fortran – 27 janvier 2006
Patrick Corde et Anne Fouilloux