modf
extern double modf(double x, double *y);
current = modf(current, &ipart);
double n, y = modf(x, &n);
r = modf(x, &d);