Discussion :

[djocin]

Bonjour
Voici un programme permettant de générer des nombres aléatoires différents à chaque éxécution du programme. Mon problème est que je ne comprends pas ce que fait la ligne "i = rand ( time(1)+time(2)+time(3) )". Je sais que la somme des time additionne en fait les heures, minutes et seconde, mais je ne comprends pas l'affectation à i ; d'autant que quand je fais print*,i avant la boucle, cela me retourne la valeur 0..


program lab
IMPLICIT NONE
real::rand
integer::i
integer*4,dimension(3)::time

call itime(time)
i = rand ( time(1)+time(2)+time(3) )
do i = 1, 10
print *, rand(0)
end do
end program



Merci de votre aide.

[kango]

bonjour,

les fonctions de génération de nombres aléatoires dépendent pas mal des compilateurs mais ce que je peux te dire avec quasi certitude:

le premier rand de ton programme permet d'initialiser le "seed" du générateur de nombre aléatoire. amuse toi à supprimer cette ligne et tu verras que les nombres aléatoires générés par ton second rand seront les mêmes à chaque exécution du programme.

dans ton compilateur ce doit être une fonction qui renvoit une valeur par forcément utile. je pense que tu peux enlever le i= devant ce rand et que ça fonctionnera de la même façon.

la seule chose qui me surprend un peu c'est que la fonction qui initialise le seed a le même nom que celle qui génère le nombre aléatoire

elle s'appelle srand sur mon compilateur cette fonction

[djocin]

avec la commande srand je comprends un peu mieux ce qu'il se passe merci

voici ce que donne le programme avec srand (en tout cas ce programme marche):


program lab
IMPLICIT NONE

real::rand
integer::i
integer*4,dimension(3)::time

call itime(time)
call srand ( time(1)+time(2)+time(3) )
do i = 1, 10
print *, rand(0)
end do


end program