Getting error while using random_seed()

Getting error while using random_seed()

Hi,

I am doing the migration of one of my codes from AIX to Linux. In my program I am calling random_seed() function. It was compiled correclty using xlf but getting syntax error with ifort.The following is the piece of code.

call random_seed(generator=2)
call random_seed(put=iseed1(1:ksize))

Error: This is not a valid keyword.   [GENERATOR]

Please help me how to replace this routine.

Regards,

Ramesh Naidu

2 post / 0 nuovi
Ultimo contenuto
Per informazioni complete sulle ottimizzazioni del compilatore, consultare l'Avviso sull'ottimizzazione
Ritratto di mecej4

If GENERATOR is a keyword that works with IBM Fortran on AIX, it is a vendor extension. The Fortran standard specifies

Citazione:

13.7.136 RANDOM SEED ([SIZE, PUT, GET])

Unless you can find a description of the algorithm used by IBM for the selection GENERATOR=2, you will have to accept the standard RNG provided by the Intel compiler, to do which you should just remove the first of your two CALL statements.

Accedere per lasciare un commento.