# include "dgd.h"
extern void srand48 P((long));
extern long lrand48 P((void));
/*
* NAME: P->srandom()
* DESCRIPTION: set the random seed
*/
void P_srandom(s)
long s;
{
srand48(s);
}
/*
* NAME: P->random()
* DESCRIPTION: return a long random number
*/
long P_random()
{
return lrand48();
}