Генератор случайных чисел для g77

В настоящее время я использую код 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! Заранее спасибо за любой совет или помощь.

1 ответ

Я исправил это, в том числе:

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

А затем с помощью rand().

Другие вопросы по тегам