retuning R1234

Author: AAAlvesJr

hydra/detail/external/hydra_R123/philox.h

@@ -272,7 +272,7 @@ _mulhilo_fail_tpl(64, uint64_t)
 #endif
 
 #ifndef PHILOX4x64_DEFAULT_ROUNDS
-#define PHILOX4x64_DEFAULT_ROUNDS 9
+#define PHILOX4x64_DEFAULT_ROUNDS 7//10
 #endif
 /** \cond HIDDEN_FROM_DOXYGEN */
 

hydra/detail/external/hydra_R123/threefry.h

@@ -189,7 +189,7 @@ R123_CUDA_DEVICE R123_STATIC_INLINE uint32_t RotL_32(uint32_t x, unsigned int N)
 #endif
 
 #ifndef THREEFRY4x64_DEFAULT_ROUNDS
-#define THREEFRY4x64_DEFAULT_ROUNDS 13
+#define THREEFRY4x64_DEFAULT_ROUNDS 12
 #endif
 
 #define _threefry2x_tpl(W)                                              \

testing/threefry_long_practrand.cpp

@@ -36,6 +36,7 @@
 #define TCLAP_SETBASE_ZERO 1
 #include <tclap/CmdLine.h>
 
+
 //set a global seed
 static const uint64_t default_seed= 0x548c9decbce65295  ;
 
@@ -63,8 +64,14 @@ int main(int argv, char** argc)
 
 	hydra::threefry_long RNG(seed);
 
+	constexpr size_t BUFFER_SIZE = 1024 * 1024 / sizeof(uint64_t);
+	static uint64_t  buffer[BUFFER_SIZE];
+
 	while (1) {
-		uint64_t value = RNG();
-		fwrite((void*) &value, sizeof(value), 1, stdout);
+		//uint64_t value = RNG();
+		for (size_t i = 0; i < BUFFER_SIZE; ++i)
+			buffer[i] = RNG();
+		//fwrite((void*) &value, sizeof(value), 1, stdout);
+		fwrite((void*) buffer, sizeof(buffer[0]), BUFFER_SIZE, stdout);
 	}
 }