d_cnjg.c « f2c « blas « eigen - opentrack-depends.git - build-time dependencies for opentrack

summary refs log tree commit diff homepage

path: root/eigen/blas/f2c/d_cnjg.c

blob: 623090c6b0ecf9eae7f76a8fa16ca8cde9e98171 (plain)

#include "datatypes.h"    

void d_cnjg(doublecomplex *r, doublecomplex *z) {
    r->r = z->r;
    r->i = -(z->i);
}