Bonjour, j'ai un problème avec fortran.
Je souhaite utiliser une structure dans plusieurs modules.
voila ce que j'ai fait :
Voila seulement lorsque je compile, l'erreur suivante s'affiche:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32 MODULE blabla IMPLICIT NONE CONTAINS SUBROUTINE sub1(A) TYPE(matCSR), INTENT(IN) :: A ... END SUBROUTINE sub1 SUBROUTINE sub2(A) TYPE(matCSR), INTENT(INOUT) ... END SUBROUTINE sub2 END MODULE blabla PROGRAM projet USE blabla IMPLICIT NONE TYPE matCSR integer... ... END TYPE matCSR TYPE(matCSR) :: A .... CALL sub1(A) ... END PROGRAM projet
"Derived type 'matCSR' is being used before it is defined"
Quelqu'un pourrait m'aider à corriger mon ou mes erreurs s'il vous plaît ?
Merci!
Partager