!----------------------------------------------------------------------------------
!  randomDistributions.f90
!
!   Using a Random Module (see random.f90), prints the results of 
!   popular random number generators.
!
!   See also randomDistributions.cxx, which is the ROOT version of this code,
!   to look the graphical form of the distributions.
!
!    Aug 2008
!----------------------------------------------------------------------------------

INCLUDE "random.f90"

PROGRAM Random_Distributions

  USE Random

  INTEGER :: I

  DO i=1, 10
     PRINT *, Random_Flat(),            "  ", &
              Random_Gauss(),           "  ", &
              Random_Exponential(10.0), "  ", &
              Random_BreitWigner(),     "  ", &
              Random_Integer(1,6)
  END DO

END PROGRAM