Sign in
third-party-mirror
/
eigen
/
6a5543807f8f60894a55986260942f4969cd7c29
/
.
/
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
);
}