g77的随机数发生器

Question

我目前正在使用使用以下内容的Fortran代码：

double precision random 
random() 

这是一个示例代码，显示了我正在尝试使用的随机数生成器：

  program rand
  M=128

  do j=1,M
  r=random()
  write(*,*)j,r
  end do

  stop
  end

但是，使用g77或gfortran在mac上编译，我收到以下错误：

Undefined symbols for architecture i386:
  "_random_", referenced from:
      _MAIN__ in ccqbVarp.o
ld: symbol(s) not found for architecture i386
collect2: ld returned 1 exit status

在使用g77或gfortran进行编译时是否可以使用类似的随机数生成器？请注意：我通常不使用Fortran，我只是想编译其他人的Fortran 77代码！提前感谢任何建议或帮助。

Answer 1

我通过包括：

来解决这个问题

 integer, parameter :: seed = 86456
 call srand(seed) 

然后使用rand（）。