* tree.h: Remove include of version.h
[official-gcc.git] / libf2c / libF77 / h_dnnt.c
blob46c83bbd28e1c3e26477421f47a0233593054c5b
1 #include "f2c.h"
3 #undef abs
4 #include <math.h>
5 shortint
6 h_dnnt (doublereal * x)
8 return (shortint) (*x >= 0. ? floor (*x + .5) : -floor (.5 - *x));