Fonctions déclarées en external

Bonjour tout le monde,

Je voudrais savoir comment fait Fortran pour savoir quelles valeurs affecter aux arguments d'une fonction déclarée en external, et appelée sans paramètres....
Je m'explique : j'ai un programme qui marche nickel, et qui contient un main, une fonction f1(x,y) et f2(z,f1); f1 étant déclarée en tant que external.
Dans le main, on appelle f2 directement comme ça

Code:

---

toto=f2(z,f1)

---

Ce que je ne comprends pas c'est comment fait le programme pour connaître les valeurs de x et y (les paramètres de f1)?? sachant qu'il n'y a absolument rien dans le main sur f1 ni ses arguments x et y...
(pour z, il n'y a pas de problème, je veux juste savoir comment fortran sait quels x et y entrer pour calculer f1(x,y)).

Je ne sais pas si ce que j'ai écrit est clair..
Merci de votre aide ^^

Bonjour,

Dans ce contexte, c'est la procédure f1 qui est passée en argument, et non une valeur particulière de la fonction f1.
Ainsi, c'est dans f2 que seront spécifiés les arguments de f1, un truc du genre

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

program main [...] f2(xxx,f1) [...] end program main   function f1(a1,a2) [...] end function f1   function f2(zdummy,fdummy) [...] external fdummy [...] val=fdummy(arg1,arg2) [...] end function f2

---

dans cet exemple, c'est uniquement à la ligne val=fdummy(arg1,arg2) que seront spécifiés les arguments de f1.

Mettre une procédure en argument, c'est se permettre de pouvoir interchanger cette procédure.
Par exemple, une fonction (au sens routine informatique) de recherche de racine ou de minimum de fonctions (au sens mathématiques) permet d'avoir une routine générique applicable à plusieurs problèmes.

Cordialement,
xflr6

Citation:

---

Envoyé par xflr6

Bonjour,

Dans ce contexte, c'est la procédure f1 qui est passée en argument, et non une valeur particulière de la fonction f1.
Ainsi, c'est dans f2 que seront spécifiés les arguments de f1, un truc du genre

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

program main [...] f2(xxx,f1) [...] end program main   function f1(a1,a2) [...] end function f1   function f2(zdummy,fdummy) [...] external fdummy [...] val=fdummy(arg1,arg2) [...] end function f2

---

dans cet exemple, c'est uniquement à la ligne val=fdummy(arg1,arg2) que seront spécifiés les arguments de f1.

Mettre une procédure en argument, c'est se permettre de pouvoir interchanger cette procédure.
Par exemple, une fonction (au sens routine informatique) de recherche de racine ou de minimum de fonctions (au sens mathématiques) permet d'avoir une routine générique applicable à plusieurs problèmes.

Cordialement,
xflr6

---

Bonjour xflr6 et merci beaucoup de votre réponse. Je comprends mieux ! :)

Cordialement,
S.B.