Patrick Corde & Anne Fouilloux

Procédures internes 165
8.7 – Procédures internes
En Fortran une procédure peut en contenir
d’autres. Ces procédures sont appelées procédures
internes. Elles ne peuvent être appelées que depuis la
procédure les contenant.
Les définitions des procédures internes sont faites
dans la procédure les incluant après l’instruction
CONTAINS.
Il n’y a pas d’imbrications possibles : une procédure
interne ne peut pas elle-même en contenir.
Exemple
program proc_interne
implicit none
character(len=10) :: ch
read ’(a)’,ch
call conversion( ch )
print *,ch
end program proc_interne
INSTITUT DU DÉVELOPPEMENT
ET DES RESSOURCES
EN INFORMATIQUE SCIENTIFIQUE
Cours langage Fortran – 27 janvier 2006
Patrick Corde et Anne Fouilloux