Math/fg_random.c

   1 /**************************************************************************
   2  * fg_random.c -- routines to handle random number generation
   3  *
   4  * Written by Curtis Olson, started July 1997.
   5  *
   6  * Copyright (C) 1997  Curtis L. Olson  - curt@infoplane.com
   7  *
   8  * This program is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU General Public License as
  10  * published by the Free Software Foundation; either version 2 of the
  11  * License, or (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful, but
  14  * WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16  * General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  21  *
  22  * $Id$
  23  * (Log is kept at end of this file)
  24  **************************************************************************/
  25
  26
  27 #include <stdlib.h>         /* for random(), srandom() */
  28 #include <time.h>           /* for time() to seed srandom() */
  29
  30 #include "fg_random.h"
  31
  32 #ifndef USE_RAND
  33 #  ifdef sgi
  34 #    undef RAND_MAX
  35 #    define RAND_MAX 2147483647
  36 #  endif
  37 #endif
  38
  39
  40 /* Seed the random number generater with time() so we don't see the
  41  * same sequence every time */
  42 void fg_srandom(void) {
  43 #ifdef USE_RAND
  44     srand(time(NULL));
  45 #else
  46     srandom(time(NULL));
  47 #endif
  48 }
  49
  50
  51 /* return a random number between [0.0, 1.0) */
  52 double fg_random(void) {
  53 #ifdef USE_RAND
  54     return(rand() / (double)RAND_MAX);
  55 #else
  56     return(random() / (double)RAND_MAX);
  57 #endif
  58 }
  59
  60
  61 /* $Log$
  62 /* Revision 1.1  1997/07/30 16:04:09  curt
  63 /* Moved random routines from Utils/ to Math/
  64 /*
  65  * Revision 1.1  1997/07/19 22:31:57  curt
  66  * Initial revision.
  67  *
  68  */