nsz Git - musl/blob - significand.c

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