C Library Functions  - system_rand (3)

NAME
system_rand(3f) - [M_system:PSEUDORANDOM] call pseudo-random number generator rand(3c) (LICENSE:PD)

CONTENTS

Synopsis
Description
Examples

SYNOPSIS
integer(kind=c_int) :: function system_rand()

DESCRIPTION
Use rand(3c) to generate pseudo-random numbers.

EXAMPLES
Sample program: 

      program demo_system_rand
      use M_system, only : system_srand, system_rand
      implicit none
      integer :: i


      call system_srand(1001)
      do i=1,10
         write(*,*)system_rand()
      enddo
      write(*,*)


      end program demo_system_rand
expected results: 

     1512084687
     1329390995
     1874040748
       60731048
      239808950
     2017891911
       22055588
     1105177318
      347750200
     1729645355


     1512084687
     1329390995
     1874040748
       60731048
      239808950
     2017891911
       22055588
     1105177318
      347750200
     1729645355

Nemo Release 3.1 system_rand (3) February 23, 2025
Generated by manServer 1.08 from d059662b-866e-455a-8e3f-fb642c0c3783 using man macros.