1 /* Test the Mersenne Twister random number generator.
3 Copyright 2002 Free Software Foundation, Inc.
5 This file is part of the GNU MP Library.
7 The GNU MP Library is free software; you can redistribute it and/or modify
8 it under the terms of the GNU Lesser General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or (at your
10 option) any later version.
12 The GNU MP Library is distributed in the hope that it will be useful, but
13 WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
14 or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public
15 License for more details.
17 You should have received a copy of the GNU Lesser General Public License
18 along with the GNU MP Library. If not, see http://www.gnu.org/licenses/. */
32 /* Test that the sequence without seeding equals the sequence with the
35 chk_default_seed (void)
37 gmp_randstate_t r1, r2;
42 mpz_init2 (a, 19936L);
43 mpz_init2 (b, 19936L);
47 gmp_randseed_ui (r2, 5489L); /* Must match DEFAULT_SEED in randmt.c */
48 for (i = 0; i < 3; i++)
50 /* Extract one whole buffer per iteration. */
51 mpz_urandomb (a, r1, 19936L);
52 mpz_urandomb (b, r2, 19936L);
53 if (mpz_cmp (a, b) != 0)
56 printf ("Default seed fails in iteration %d\n", i);
69 main (int argc, char *argv[])
75 ok = chk_default_seed ();