Files
epfl-archive/cs440-acg/ext/eigen/blas/f2c/r_cnjg.c
2022-04-07 18:46:57 +02:00

7 lines
105 B
C

#include "datatypes.h"
void r_cnjg(complex *r, complex *z) {
r->r = z->r;
r->i = -(z->i);
}