Je cherche à générer une fonction random parce que mon compilateur ne la prend pas en charge. J'essaie d'utiliser la fonction ci-dessous :

INTEGER j

CALL time(j)
CALL srand(REAL(MOD(j,1000)))

Mais il n'accepte pas ces fonctions en disant que le nombre d'argument ou le type de l'argument est incorrect.

Est-ce que quelqu'un connait le type à passer à la fonction time ou alors vois une autre solution pour générer une valeur aléatoire ?

Merci