OpenMP et fortran + Cpp

Bonjour,

J'ai un programme C++ qui utilise openMP. Il fonction correctement (sous linux, gcc). Maintenant il utilise une librarie static de fonctions ecrtite en fortran compiler avec les options "-pthread -fexceptions -fno-automatic -fopenmp"

Ca resemble à quelquechose comme ca:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

BLOCK DATA IMPLICIT REAL*8 (a-h,o-z) END   PROGRAM MY_MAIN USE OMP_LIB END   SUBROUTINE MY_SUBROUT IMPLICIT REAL*8 (a-h,o-z)   print *,OMP_GET_NUM_THREADS() END

---

Et là ca m'affiche un "nan"
Aurais-je oublié quelque chose quelquepart, je débute en openMP

Merci d'avance

ok j'ai fini pas trouver, il fallait mettre la commande "USE OMP_LIB" dans la fonction plutot que dans le main