modfl
extern long double modfl(long double value, long double *iptr);
long double n, y = modfl(x, &n);