mirror of
https://github.com/ziglang/zig.git
synced 2026-01-20 14:25:16 +00:00
14 lines
233 B
C
14 lines
233 B
C
#include "complex_impl.h"
|
|
|
|
#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
|
|
long double cabsl(long double complex z)
|
|
{
|
|
return cabs(z);
|
|
}
|
|
#else
|
|
long double cabsl(long double complex z)
|
|
{
|
|
return hypotl(creall(z), cimagl(z));
|
|
}
|
|
#endif
|