1*10462Sdlw /* 2*10462Sdlw * "@(#)d_log.c 1.1" 3*10462Sdlw */ 4*10462Sdlw 5*10462Sdlw double d_log(x) 6*10462Sdlw double *x; 7*10462Sdlw { 8*10462Sdlw double log(); 9*10462Sdlw return( log(*x) ); 10*10462Sdlw } 11