mesytec-mnode/external/taskflow-3.8.0/3rd-party/eigen-3.3.7/blas/f2c/r_cnjg.c

#include "datatypes.h"    

void r_cnjg(complex *r, complex *z) {
    r->r = z->r;
    r->i = -(z->i);
}