1 /* Copyright (c) 1979 Regents of the University of California */ 2 3 static char sccsid[] = "@(#)SEED.c 1.1 10/30/80"; 4 5 SEED(value) 6 7 long value; 8 { 9 static long seed; 10 long tmp; 11 12 srand(value); 13 tmp = seed; 14 seed = value; 15 return tmp; 16 } 17