1#define _GNU_SOURCE
2#include <math.h>
3
4double significand(double x)
5{
6	return scalbn(x, -ilogb(x));
7}
8