1 /* Copyright (c) 1979 Regents of the University of California */ 2 3 static char sccsid[] = "@(#)SEED.c 1.3 01/06/81"; 4 5 #include <math.h> 6 7 SEED(value) 8 9 long value; 10 { 11 static long seed; 12 long tmp; 13 14 srand(value); 15 tmp = seed; 16 seed = value; 17 return tmp; 18 } 19