Module subroutine et interopérabilité f77/f90
Bonjour tout le monde.
L'incompréhension est la suivante :
J'ai un programme en f90 qui utilise un module où sont stockées des Subroutines écrites en f77. Les subroutines s'appellent entre elle.
Mon programme est rédigé de la façon suivante :
Code:
1
2
3
4
5
6
7
| PROGRAM Progf90
USE Modulef77
CALL TEST1
END PROGRAM Progf90 |
Le fichier module est écris de la façon suivante :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
| MODULE Modulef77
CONTAINS
SUBROUTINE TEST
CALL BOXON
END SUBROUTINE TEST
SUBROUTINE BOXON
END SUBROUTINE BOXON
END MODULE |
Je compile de la façon suivante :
1- compilation du module écris en f77 de la façon suivante :
Code:
gfortran -o Modulef77 Modulef77.f
2- compilation du programme principale en f90 de la façon suivante :
Code:
gfortran Modulef77.o Progf90.f90 -o Progf90
Et le problème qui ressort est que l'appel de la subroutine boxon dans la surboutine test 1 est une "référence indéfinie" ...
Quelqu'un peut il mettre un peu de combustible dans ma lampe à pétrole svp ?
D'avance merci !
