COSC-4P80-Assignment-2/lib/eigen-3.4.0/blas/f2c/r_cnjg.c

7 lines
105 B
C
Raw Permalink Normal View History

2024-10-21 16:42:03 -04:00
#include "datatypes.h"
void r_cnjg(complex *r, complex *z) {
r->r = z->r;
r->i = -(z->i);
}