| |
| | [No title] (Site not responding. Last check: 2007-11-01) |
 | | * double precision randu double precision random_low, random_med open(unit=10,file='output_randu2.dat',status='new') random_low=randu() do 10 i=1,2500 random_med=randu() write(10,*), random_low, random_med random_low=random_med 10 continue * * Now view the 2D plot in 'output_randu2.dat' * using Matlab. |
 | | * end ******************************************************************* double precision function randu () * * This function is a modification of ranu() given * in Chapter 11: Monte Carlo. |
 | | * Note that the parameters q,r have been modified * according to randu's a,m. |
| monod.biomath.nyu.edu /index/book-supply/randu2D.f (129 words) |
|