Skip to content

Commit

Permalink
Revert the Rmath RNG to the built-in one, until we can load it from l…
Browse files Browse the repository at this point in the history
…ibrandom.
  • Loading branch information
ViralBShah committed Apr 7, 2012
1 parent 6df4418 commit 28fd168
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions external/Rmath/src/sunif.c
Original file line number Diff line number Diff line change
Expand Up @@ -20,7 +20,6 @@

/* A version of Marsaglia-MultiCarry */

/*
static unsigned int I1=1234, I2=5678;

void set_seed(unsigned int i1, unsigned int i2)
Expand All @@ -40,11 +39,12 @@ double unif_rand(void)
I2= 18000*(I2 & 0177777) + (I2>>16);
return ((I1 << 16)^(I2 & 0177777)) * 2.328306437080797e-10; // in [0,1)
}
*/

#include "../../random/dsfmt-2.1/dSFMT.c"
/*
#include "../../random/dsfmt-2.1/dSFMT.h"
double unif_rand(void)
{
return dsfmt_gv_genrand_close_open();
}
*/

0 comments on commit 28fd168

Please sign in to comment.