Sign in
plan9port
/
plan9
/
219cf22d6863a21a7378fc5481bb05bbb6edd2dc
/
.
/
src
/
cmd
/
map
/
libmap
/
ccubrt.c
blob: 8a7af566182cfe06601aef4a1b2afa1462b32006 [
file
] [
log
] [
blame
]
#include
<u.h>
#include
<libc.h>
#include
"map.h"
void
ccubrt
(
double
zr
,
double
zi
,
double
*
wr
,
double
*
wi
)
{
double
r
,
theta
;
theta
=
atan2
(
zi
,
zr
);
r
=
cubrt
(
hypot
(
zr
,
zi
));
*
wr
=
r
*
cos
(
theta
/
3
);
*
wi
=
r
*
sin
(
theta
/
3
);
}