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