1 /* Copyright (c) 1979 Regents of the University of California */ 2 3 static char sccsid[] = "@(#)TRUNC.c 1.1 10/30/80"; 4 5 TRUNC(value) 6 7 double value; 8 { 9 return (long)(value); 10 } 11