Discussion :

[sebduth]

Bonjour à tous!

J'ai un problème dans mon code fortran, je suppose que c'est tout bête mais ça fait plusieurs jours que je m'arrache les cheveux dessus!...

Voilà mon code. Mon problème est au niveau des tableaux cal_xmn et cal_ymn. Si je fais afficher les valeurs de ces tableaux dans les boucles do, elles sont correctes, mais après les enddo elles ne sont plus bonnes!!

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
 
do j=1,nby
   utmy(j) = yorigr + (j-1)*dgrid
   do i=1,nbx
     utmx(i) = xorigr + (i-1)*dgrid
     call utm_ll(iutmzn,utmx(i),utmy(j),lat,lon)
     call ll_xy(lat,lon,hpolelat,hpolelon,cal_xmn(i,j),cal_ymn(i,j)) ! 2 fonctions validées
     ! ici cal_xmn et cal_ymn sont corrects :
     print*,cal_xmn(i,j),cal_ymn(i,j)
   enddo
   ! ici cal_xmn et cal_ymn sont toujours corrects :
   do i=1,nbx
      print*,cal_xmn(i,j),cal_ymn(i,j)
   enddo
enddo 	
 
 !ici, ils ne sont plus bons! les valeurs semblent 'mélangées', par 
 !exemple, cal_xmn(1,1) ici est différent de cal_xmn(1,1) dans la boucle!
do j=1,nby
    do i=1,nbx
       print*,cal_xmn(i,j),cal_ymn(i,j)
    enddo
enddo

J'ai vérifié les tailles des tableaux, elles sont correctes.


N'importe quelle idée sera la bienvenue!

[Kenji]

C'est fort possible que je me trompe mais cela ne pose pas problème le fait que tu utilises la variable j pour ta boucle principale mais aussi dans une boucle interne pour afficher?

[sebduth]

Pardon je m'étais trompée dans la copie, ce n'était pas j mais i, j'ai corrigé.

Du coup ça ne viens pas de là.

[DaZumba]

Il n'y a aucune raison que les valeurs de cal_xmn et cal_ymn changent dans le code que tu as donne. S'ils changent, c'est qu'un autre tableau, quelque part, est depasse, et ecrase les valeurs de cal_xxx. Verifie les dimensions de utmy et utmx... Verifie egalement la fonction ll_xy.
Sinon, c'est que tu fais quelque-chose entre les deux derniers print, et que tu ne l'as pas montre.