GFSR.c File Reference

#include <fcntl.h>

Defines
#define	SIZE   (99*sizeof(unsigned long))
Functions
double	GFSR ()
unsigned long	igfsr ()
int	readGFSR (char *f)
int	writeGFSR (char *f)
double	gfsr_ ()
int	readgfsr_ (char *file)
int	writegfsr_ (char *file)
Variables
unsigned long	GFSRstate [99]
unsigned long	GFSRtable [99]
double	GFSRnormal = 2147483647.0

---

Define Documentation

#define SIZE   (99*sizeof(unsigned long))

Referenced by readGFSR(), and writeGFSR().

---

Function Documentation

double GFSR

(

)

References GFSRnormal, and GFSRtable.

Referenced by gfsr_(), make_seq(), normdist(), and unidist().

double gfsr_

(

)

References GFSR().

unsigned long igfsr

(

)

References GFSRtable.

Referenced by main().

int readGFSR

(

char *

f

)

References close(), GFSRstate, GFSRtable, read(), and SIZE.

Referenced by main(), and readgfsr_().

int readgfsr_

(

char *

file

)

References readGFSR().

int writeGFSR

(

char *

f

)

References close(), GFSRtable, and SIZE.

Referenced by main(), and writegfsr_().

int writegfsr_

(

char *

file

)

References writeGFSR().

---

Variable Documentation

double GFSRnormal = 2147483647.0

Referenced by GFSR().

unsigned long GFSRstate[99]

Initial value:

{40,
        1387256442, 539505633, 7126687, 2115653676, 480642437,
        1403109719, 898019591, 1609472695, 742049136, 964528840,
        1774590149, 531014893, 1478060509, 224730595, 1413365137,
        1415397063, 370513614, 1981855272, 1672294721, 1559669404,
        1992066581, 440083042, 1552169384, 949029171, 1848294689,
        1014369863, 1226252978, 199445637, 552539314, 101995811,
        1795618857, 1468200845, 403608434, 466262418, 1783034892,
        2125486341, 1437171068, 839437811, 685760609, 311739045,
        1876584692, 223544964, 667792106, 1829604735, 887026472,
        688815796, 1153871680, 1135467106, 1975710098, 1393037901,
        330755675, 804762632, 393596594, 1695657725, 50479950,
        1039358666, 1885424316, 400881551, 142829986, 187416368,
        821029919, 1292641081, 415120294, 1104581275, 1258423968,
        304285054, 400491932, 2014625087, 1619263031, 750624285,
        1996732699, 97476312, 1250544934, 2145510054, 1510875684,
        262891578, 616032534, 1316668730, 1500747974, 2138561534,
        809719156, 1605036043, 510086967, 317411066, 54278455,
        2052774305, 439191668, 1881943474, 1397167115, 2046084812,
        644321591, 328615697, 1004646018, 1110120728, 2007784487,
        992677826, 1756605308, 796797739
        }

Referenced by readGFSR().

unsigned long GFSRtable[99]

Initial value:

{40,
        1387256442, 539505633, 7126687, 2115653676, 480642437,
        1403109719, 898019591, 1609472695, 742049136, 964528840,
        1774590149, 531014893, 1478060509, 224730595, 1413365137,
        1415397063, 370513614, 1981855272, 1672294721, 1559669404,
        1992066581, 440083042, 1552169384, 949029171, 1848294689,
        1014369863, 1226252978, 199445637, 552539314, 101995811,
        1795618857, 1468200845, 403608434, 466262418, 1783034892,
        2125486341, 1437171068, 839437811, 685760609, 311739045,
        1876584692, 223544964, 667792106, 1829604735, 887026472,
        688815796, 1153871680, 1135467106, 1975710098, 1393037901,
        330755675, 804762632, 393596594, 1695657725, 50479950,
        1039358666, 1885424316, 400881551, 142829986, 187416368,
        821029919, 1292641081, 415120294, 1104581275, 1258423968,
        304285054, 400491932, 2014625087, 1619263031, 750624285,
        1996732699, 97476312, 1250544934, 2145510054, 1510875684,
        262891578, 616032534, 1316668730, 1500747974, 2138561534,
        809719156, 1605036043, 510086967, 317411066, 54278455,
        2052774305, 439191668, 1881943474, 1397167115, 2046084812,
        644321591, 328615697, 1004646018, 1110120728, 2007784487,
        992677826, 1756605308, 796797739
        }

Referenced by GFSR(), igfsr(), readGFSR(), and writeGFSR().