Meg's Mirrors

zig

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