File: ex3.c

package info (click to toggle)
testu01 1.2.3%2Bds1-3
  • links: PTS, VCS
  • area: non-free
  • in suites: sid, trixie
  • size: 17,748 kB
  • sloc: ansic: 52,357; makefile: 248; sh: 53
file content (33 lines) | stat: -rw-r--r-- 810 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
#include <testu01/unif01.h>
#include <testu01/ulcg.h>
#include <testu01/ulec.h>
#include "my16807.h"
#include <stdio.h>

int main (void)
{
   unif01_Gen *gen;
   double x = 0.0;
   int i;

   gen = ulcg_CreateLCGFloat (2147483647, 16807, 0, 12345);
   unif01_TimerSumGenWr (gen, 10000000, TRUE);
   ulcg_DeleteGen (gen);

   gen = CreateMy16807 (12345);
   unif01_TimerSumGenWr (gen, 10000000, TRUE);
   DeleteMy16807 (gen);

   gen = ulec_CreateMRG32k3a (123., 123., 123., 123., 123., 123.);
   unif01_TimerSumGenWr (gen, 10000000, TRUE);
   ulec_DeleteGen (gen);

   gen = ulec_Createlfsr113 (12345, 12345, 12345, 12345);
   unif01_TimerSumGenWr (gen, 10000000, TRUE);
   for (i = 0; i < 100; i++)
      x += unif01_StripD (gen, 0);
   printf ("Sum = %14.10f\n", x);
   ulec_DeleteGen (gen);

   return 0;
}