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

publicaciones de 2 / 0 nuevos
Último envío
Para obtener más información sobre las optimizaciones del compilador, consulte el aviso sobre la optimización.

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

Cita:

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.

Inicie sesión para dejar un comentario.