repo.or.cz
/
uclibc-ng.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
Rules.mak fix typo (qstrup -> qstrip)
[uclibc-ng.git]
/
libm
/
w_cabs.c
blob
4044f4bffe1eb1839bd619d49c5587417ef9b005
1
/*
2
* cabs() wrapper for hypot().
3
*
4
* Written by J.T. Conklin, <jtc@wimsey.com>
5
* Placed into the Public Domain, 1994.
6
*/
7
8
#include <complex.h>
9
#include <math.h>
10
11
double
cabs
(
double
_Complex z
)
12
{
13
return
hypot
(
__real__ z
,
__imag__ z
);
14
}
15
libm_hidden_def
(
cabs
)