générer un nombre aléatoire en fortran

[bbdoll]

Bonjour,
J'ai codé en fortran une matrice et je voudrais sur sa diagonale des coefficients dont les valeurs sont aléatoires.
J'ai utilisé la fonction random_number(), mais elle ne prend en parametre que des reels, quand j'utilise une matrice d'entiers du coup ca ne marche plus.
En C, et c++ c'est plus facile a gérer il suffit de faire un cast mais en fortran normalement il les fait tout seul là il me met quand memeun message d'erreur :

Error: 'harvest' argument of 'random_number' intrinsic at (1) must be REAL

J'appelle la fonction de cette façon là : CALL RANDOM_NUMBER(AA(I,1))

Est-ce qu'il y aurait une solution de contournement?

Cordialement.
-----

[Zartan]

Bonjour, vous lui donnez une matrice réelle en paramètre puis vous transférez celle-ci dans une matrice d'entiers.

[bbdoll]

Non en fait c'est pas possible je declare le type de ma matrice dans une macro (precompilateur)
je ne definis pas le type à l'interieur du programme.

[Zartan]

RANDOM_NUMBER vous renvoie un nombre à virgule flottante compris entre 0 et 1.

Vous déclarez un réel et ensuite vous appelez votre routine et transférez dans la matrice :

REAL ::intermediaire
INTEGER :: valeurmax,valeurmin
	  
    valeurmax = 100
    valeurmin = 10

    CALL RANDOM_NUMBER(intermediaire)
    AA(1,1) = INT(intermediaire*(valeurmax-valeurmin) +valeurmin)

avec valeurmax et valeurmin les deux bornes que vous voulez.

Sinon vous pouvez utiliser d'autres générateurs de nombres aléatoires, certains fonctionnent avec des entiers.

[A voir en vidéo sur Futura]

[bbdoll]

Bonjour,

effectivement ca marche.
merci beaucoup.