1*10499Sdlw /* 2*10499Sdlw * "@(#)i_dnnt.c 1.1" 3*10499Sdlw */ 4*10499Sdlw 5*10499Sdlw long int i_dnnt(x) 6*10499Sdlw double *x; 7*10499Sdlw { 8*10499Sdlw double floor(); 9*10499Sdlw 10*10499Sdlw return( (*x)>=0 ? 11*10499Sdlw floor(*x + .5) : -floor(.5 - *x) ); 12*10499Sdlw } 13