linkage f90 / f77

Bonjour à tous,

Je suis en train de dépouiller un code Fortran que j'ai trouvé sur le net et qui permet de faire des transformations de Radon (peu importe ce que c'est en fait...)

Voici l'adresse du lien donnant tous les codes

http://www.met.reading.ac.uk/~remi/radon.html

En gros ce code est constitué d'un programme principal (verify_analysis.f90) et de sous-routines externes. L'une des sous-routines (hilbert_transform.f90) fait appel à la fonction FOURT définie dans dfft.f (écrit en fortran77). Dans hilbert_transform.f90, apparaît une déclaration du type

Code:

---

1 2	EXTERNAL FOURT

---

Tous les fichiers compilent très bien mais cependant lorsque j'exécute le programme principal j'obtiens l'erreur suivante

Code:

---

1 2 3 4 5 6 7 8

Casimirs@toto:~/Bureau/test $ gfortran verify_analysis.f90 -o toto /tmp/ccawWteR.o: In function `__hilbert_transform_MOD_hilbert_fft': verify_analysis.f90:(.text+0x538): undefined reference to `fourt_' verify_analysis.f90:(.text+0x710): undefined reference to `fourt_' /tmp/ccawWteR.o: In function `__timeseries_mod_MOD_init': verify_analysis.f90:(.text+0xb472): undefined reference to `fourt_' collect2: ld returned 1 exit status

---

Comme si la fonction FOURT n'étais pas reconnue...

Comment dire à mes programmes .f90 d'aller chercher la fonction FOURT dans le fichier extérieur dfft.f (fortran77) ?

Je vous remercie pour votre aide

Pierre

Bonjour,

Citation:

---

Comment dire à mes programmes .f90 d'aller chercher la fonction FOURT dans le fichier extérieur dfft.f (fortran77) ?

---

Soit en compilant tout le monde "en bloc"

Code:

---

1 2	gfortran verify_analysis.f90 dfft.f -o toto

---

(mais c'est un peu bête de recompiler tous les éléments à chaque fois que l'on a modifié seulement l'un d'entre eux).

Soit en ayant par ailleurs déjà compilé dfft.f pour créer l'objet dfft.o

Code:

---

1 2	gfortran dfft.f -c

---

Et en indiquant lors de la compilation de "verify_analysis"

Code:

---

1 2	gfortran verify_analysis.f90 dfft.o -o toto

---

(à condition que dfft.o soit dans le même répertoire, sinon il faut précisier chemin/vers/repertoire/dfft.o).

Soit en créant une librairie 'libdfft.a' contenant dfft.o

Code:

---

1 2 3

gfortran dfft.f -c ar -r libdfft.a dfft.o

---

Et en indiquant que l'on va utiliser cette dernière lors de la compilation de "verif_analysis"

Code:

---

1 2	gfortran verify_alalysis.f90 -ldfft -o toto

---

(a condition que libdfft.a soit dans le même répertoire, sinon il faut rajouter un '-Lchemin/vers/repertoire/de/la/librairie' avant le '-ldfft').

Bonne continuation.

Merci beaucoup pour ta réponse !

Tout marche maintenant très bien !

Pierre