new modff.c code, fix nan handling in modfl

[musl] / src / complex / creal.c

#include <complex.h>

double creal(double complex z)
{
        return z;
}