blob: b6ce7ff0853e176eceb211d828a0c2f443faf129 (
plain)
1
2
3
4
5
6
7
8
9
|
#include "__complex.h" // for REAL_PART, long_double_complex
#include <complex.h> // for creall, complex
long double creall(long double complex z)
{
long_double_complex w = { .z = z };
return (REAL_PART(w));
}
|