110461Sdlw /* 222860Skre * Copyright (c) 1980 Regents of the University of California. 322860Skre * All rights reserved. The Berkeley software License Agreement 422860Skre * specifies the terms and conditions for redistribution. 522860Skre * 6*23855Sjerry * @(#)d_lg10.c 5.2 07/08/85 710461Sdlw */ 810461Sdlw 910461Sdlw double d_lg10(x) 1010461Sdlw double *x; 1110461Sdlw { 1210461Sdlw double log(); 1310461Sdlw 14*23855Sjerry return( log10(*x) ); 1510461Sdlw } 16