Discussion :

[saida29]

Bonjour
lorsque j'écris :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
while (k.le.max)
k=k+1
if (i.LE.n) then
i=i+1
end if
call streaming
call collision
.
.

est-ce que pour chaque valeur de i (pour une valeur de k) les instructions call sont fait ? Ou pour une valeur de k les instructions call ne sont fait que lorsque i=n ?
merci bien

[LittleOwl]

Bonjour,

Dans la version du code que vous proposez, les subroutines streaming et collision sont appelées quelque soit la valeur de i, pour une valeur de k fixée.

Si vous souhaitez faire appel à ces subroutines uniquement lors i = n vous pouvez utiliser la version modifiée ci-dessous :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
...
do while (k.le.max)
  k=k+1
  if (i < n) then
    i = i+1
  else if (i == n) then
    i = i+1
    call streaming
    call collision
  end if
 ...
end do
...

[ParkerL31884]

La réponse peut s'obtenir par soi-même en rajoutant un

print*,i,k

dans le code à l'endroit où l'on veut tester le passage.

Ou tout autre simple essai te permettrait de voir si le résultat est conforme à tes attentes ou pas...

D'une façon plus générale, pour des questions aussi simplement vérifiables par soi-même, je ne suis pas sûr que la solution passe par poser le problème sur un forum et attendre une durée indéterminée dans l'espoir d'une réponse.

Rends-toi compte : tu as passé plus de temps à écrire le problème ici que ne t'aurait pris ce simple test. Moi-même et l'auteur précédent ont passé plus de temps à lire la question que ne t'aurait pris ce simple test. Y répondre aura aussi pris plus de temps...

Je pense qu'il est plus judicieux (et bénéfique, et formateur) pour toi de chercher à tester par toi-même plutôt que de te tourner vers le forum à la moindre question.