TABLE OF CONTENTS
ABINIT/m_random_zbq [ Modules ]
NAME
m_random_zbq
FUNCTION
This library contains routines for generating uniform random numbers between 0 & 1, using a Marsaglia-Zaman type subtract-with-borrow generator. This random number generator is non deterministic (it is not "pseudo-random"). These routines have been downloaded from Richard Chandler homepage, then converted into Fortran90 standard. Authors: Richard Chandler (email: richard@stats.ucl.ac.uk) Paul Northrop (email: paul@stats.ucl.ac.uk)
COPYRIGHT
Copyright (C) Richard Chandler/Paul Northrop Please feel free to use and adapt these routines for your own use. We do, however, request that if the routines are used in work which is later presented in public, or published, the source of the code (ie. us!) is acknowledged. If for no other reason, this will allow other people to test the routines to see if there's anything horribly wrong with them that will invalidate your results. See http://www.ucl.ac.uk/~ucakarc/work/software/randgen.txt for further information
SOURCE
30 #if defined HAVE_CONFIG_H 31 #include "config.h" 32 #endif 33 34 #include "abi_common.h" 35 36 37 module m_random_zbq 38 39 use m_abicore 40 41 use defs_basis, only : sp, dp, std_out 42 43 implicit none 44 45 private