Sign in
third-party-mirror
/
eigen
/
26133d6d484a9768678153d10de8f75133be0462
/
.
/
blas
/
f2c
/
d_cnjg.c
blob: 623090c6b0ecf9eae7f76a8fa16ca8cde9e98171 [
file
] [
log
] [
blame
]
#include
"datatypes.h"
void
d_cnjg
(
doublecomplex
*
r
,
doublecomplex
*
z
)
{
r
->
r
=
z
->
r
;
r
->
i
=
-(
z
->
i
);
}