The R Project SVN R

Rev

Rev 6098 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6098 Rev 7660
Line 21... Line 21...
21 
/* only used by ../main/random.c  & ../nmath/{snorm,sunif}.c
 21 
/* only used by ../main/random.c  & ../nmath/{snorm,sunif}.c
22 
 */
 22 
 */
23 
#ifndef RANDOM_H
 23 
#ifndef RANDOM_H
24 
#define RANDOM_H
 24 
#define RANDOM_H
25 
 
 25 
 
26 
typedef unsigned long Int32;/* how is this done on 64-bit archtictures? */
 26 
typedef unsigned long Int32;/* how is this done on 64-bit architectures? */
27 
 
 27 
 
28 
typedef enum {
 28 
typedef enum {
29 
    WICHMANN_HILL,
 29 
    WICHMANN_HILL,
30 
    MARSAGLIA_MULTICARRY,
 30 
    MARSAGLIA_MULTICARRY,
31 
    SUPER_DUPER,
 31 
    SUPER_DUPER,
Line 55... Line 55...
55 
 *		                      i2_seed   i3_seed
 55 
 *		                      i2_seed   i3_seed
56 
 */
 56 
 */
57 
void MaybeAllocSeeds(RNGtype);
 57 
void MaybeAllocSeeds(RNGtype);
58 
void Randomize(RNGtype);
 58 
void Randomize(RNGtype);
59 
void FixupSeeds(RNGtype);
 59 
void FixupSeeds(RNGtype);
60 
void RNG_Init(RNGtype kind, long seed);
 60 
void RNG_Init(RNGtype kind, Int32 seed);
61 
 
 61 
 
62 
extern RNGTAB  RNG_Table[];
 62 
extern RNGTAB  RNG_Table[];
63 
extern RNGtype RNG_kind;
 63 
extern RNGtype RNG_kind;
64 
 
 64 
 
65 
#endif
 65 
#endif