/*****************************************************************************/
/*                                                                           */
/*            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