SaraP
71 lines
2.2 KiB
C
71 lines
2.2 KiB
C
/*****************************************************************************/
|
|
/* */
|
|
/* Copyright (C) 1999-2023 M. Held */
|
|
/* */
|
|
/* This code is not in the public domain. All rights reserved! Please make */
|
|
/* sure to read the full copyright statement contained in "README.txt" or in */
|
|
/* the "main" file of this code, such as "main.cc". */
|
|
/* */
|
|
/*****************************************************************************/
|
|
/* */
|
|
/* Written by: Martin Held */
|
|
/* */
|
|
/* E-Mail: held@cs.sbg.ac.at */
|
|
/* Fax Mail: (+43 662) 8044-611 */
|
|
/* Voice Mail: (+43 662) 8044-6304 */
|
|
/* Snail Mail: Martin Held */
|
|
/* FB Informatik */
|
|
/* Universitaet Salzburg */
|
|
/* A-5020 Salzburg, Austria */
|
|
/* */
|
|
/*****************************************************************************/
|
|
|
|
#ifndef VRONI_RANDOM_H
|
|
#define VRONI_RANDOM_H
|
|
|
|
#include "defs.h"
|
|
|
|
#ifndef RAND
|
|
|
|
#define RND_MAX 2147483647
|
|
|
|
#define UniformRandom(x) \
|
|
{\
|
|
x = ((double) random()) / RND_MAX; }
|
|
|
|
#define RandomInteger(N) \
|
|
(\
|
|
assert(N > 0), \
|
|
random() % N)
|
|
|
|
#define InitRandom(seed) \
|
|
{\
|
|
srandom(seed); }
|
|
|
|
#else
|
|
|
|
#ifdef RAND_MAX
|
|
#define RND_MAX RAND_MAX
|
|
#else
|
|
#define RND_MAX 32767
|
|
#endif
|
|
|
|
#define UniformRandom(x) \
|
|
{\
|
|
x = ((double) rand()) / RND_MAX; \
|
|
}
|
|
|
|
#define RandomInteger(N) \
|
|
(\
|
|
assert(N > 0), \
|
|
rand() % N)
|
|
|
|
#define InitRandom(seed) \
|
|
{\
|
|
srand(seed); }
|
|
|
|
#endif
|
|
|
|
|
|
#endif
|