/***********************************
  generic mainfile for lotos prototypes
***********************************/

/***********************************
  (C) Copyright 1992-1993; dit/upm
  Distributed under the conditions stated in the
  TOPO General Public License (see file LICENSE)
 ***********************************
 $Log: topomain.c,v $
 * Revision 1.5  1993/01/18  17:41:27  lotos
 * distribution issues
 *
 * Revision 1.4  1992/11/17  16:26:09  lotos
 * add a call to ldcinit ();
 *
 * Revision 1.3  1992/02/29  13:21:27  lotos
 * fix use of random
 *
 * Revision 1.2  92/01/14  15:22:25  lotos
 * distribution issues
 * 
 * Revision 1.1  91/09/09  19:58:58  lotos
 * Initial revision
 * 
***********************************/

#ifndef lint
static char rcsid[]= "$Id: topomain.c,v 1.5 1993/01/18 17:41:27 lotos Exp lotos $";
#endif

/* #define USE_rand     /* */
#define USE_random      /* */
/* #define USE_lrand48  /* */

#include "lotos.hh"

main (argc, argv)
  int argc;
  char* argv[];
{
#ifdef USE_rand
  int rand();
  konfig.random= rand;
  srand (getpid ());
#endif

#ifdef USE_random
  long random();
  konfig.random= random;
  srandom (getpid ());
#endif

#ifdef USE_lrand48
  long lrand48 ();
  konfig.random= lrand48;
  srand48 ((long)getpid ());
#endif

  konfig.trace= 0;
  ldcinit ();
  lbcinit (0, NULL);
  exit (sch ());
}
