用于g77的随机数生成器

Question

我目前使用的是Fortran代码，它使用：

double precision random 
random() 

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

  program rand
  M=128

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

  stop
  end

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

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()。