Help needed in gcc fortran

[psbgccft]

Hi,

I was trying to compile a fortran subroutine, using gcc compiler. I got the following errors during compilation,

radff.f:4339.25:

RANDOM(I) = rand(random(max(1,i-1)))
1

Error: 'i' argument of 'rand' intrinsic at (1) must be INTEGER

radff.f:4350.28:

RANDOM(I) = rand(random(max(1,i-1)))
1

Error: 'i' argument of 'rand' intrinsic at (1) must be INTEGER


Can you please help to suggest how to fix it. Thanks.

 

[xwb]

What it is trying to tell you is

random(max(1,i-1)) should be an integer

What has random been defined as?

 

[psbgccft]

Just have defined RND and RANDOM in dimension :

DO I = 1,IRM
DIMENSION RND(0:NRND)
DIMENSION RANDOM(IRM)

 

[xwb]

Then they have been defined as real. You need something like

INTEGER RND(0:NRND)
INTEGER RANDOM(IRM)

The dimension keyword is a hangover from the Fortran I/II/IV days. Not really necessary. Alternative syntax is

INTEGER, DIMENSION(0:NRND):: RND
INTEGER, DIMENSION(IRM):: RANDOM