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 : Sélectionner tout - Visualiser dans une fenêtre à part
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 : Sélectionner tout - Visualiser dans une fenêtre à part
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