Discussion :

[Kaluza]

Bonjour à tous.

Venant du monde C++ et me mettant depuis peu au Fortran pour un projet, j'aurai besoin de vos éclaircissements sur la gestion de la mémoire.
Concrètement que se passe-t-il quand on passe un tableau en argument d'une subroutine ?
Celui-ci est-il recopié en mémoire, ou la subroutine travaille-t-elle sur le tableau original ?

De même dans le cas où le programme principal et l'une des subroutines utilisent un module dans lequel est déclaré un tableau, combien de fois ce tableau est-il créé en mémoire ?

Merci

[Sylvain Bergeron]

Bonjour à tous.

Venant du monde C++ et me mettant depuis peu au Fortran pour un projet, j'aurai besoin de vos éclaircissements sur la gestion de la mémoire.
Concrètement que se passe-t-il quand on passe un tableau en argument d'une subroutine ?
Celui-ci est-il recopié en mémoire, ou la subroutine travaille-t-elle sur le tableau original ?

Le standard ne le dit pas. Il est possible d'avoir un argument intent in, intent out ou intent inout. Dans le cas intent in, ça ne dit pas non plus que c'est par valeur. La clause intent sert plutôt à renseigner le compilateur aux fins d'optimisation. Généralement, le passage se fait par pointeur (ou by ref), indépendamment de la clause intent. Il y a donc une seule copie du tableau. C'est vrai aussi pour les scalaires.

Dans le cas où tu voudrais passer une section de tableau seulement, il est cependant possible, si le dummy argument ne le prévoit pas, qu'il y ait création d'une copie de la section à l'appel, et une mise à jour de la section du tableau au retour (si intent out ou inout). Pour prévoir les sections de tableau et éviter la copie, le dummy doit être déclaré avec la forme (:). N.B. : Le prototypage est alors obligatoire (par module ou par interface).

De même dans le cas où le programme principal et l'une des subroutines utilisent un module dans lequel est déclaré un tableau, combien de fois ce tableau est-il créé en mémoire ?

Une seule, par définition : Les variables d'un module sont communes à l'ensemble des utilisateurs du module.

[MABROUKI]

bonjour
Indubitablement,je n'ai pas vu de compilateur fortran passer des parametres par valeur comme pour un language "low-level" tel que c ou c++.
La regle etablie pour tous les compilateurs est de passer par reference,c.à.d que c'est l'adresse de l'argument qui est passe .
Cela peut etre verifie aisement si on fait appel en c ou c++ à un sous programme fortran,car on doit passer des pointeurs pour les tableaux, et des operateurs adresses pour des variables scalaires.
Les clauses INTENT ne signifient pas qu'on passe par valeur mais bien par reference avec les restrictions suivantes:

INTENT(IN) The procedure must not change the argument.

INTENT(OUT) The argument is undefined on entry and may be given a value in the procedure.

INTENT(INOUT) The argument may be given a value in the procedure.

Aussi n'y a t-il de recopie en memoire.
Idem pour les modules
Et c'est la l'un des avantages de fortran-une seule regle de passage des arguments et aussi l'une des difficultes majeure avec les fameux "effets de bord" des variables.
Le seul moyen de l'eviter est le pool de variables communes dans des modules specialise pour eviter de passer par des arguments puisque l'occupation memoire est identique.
arguments.
bon code....

[Kaluza]

Merci beaucoup pour ces explications très claires.