diff options
Diffstat (limited to 'eigen/blas/f2c/r_cnjg.c')
| -rw-r--r-- | eigen/blas/f2c/r_cnjg.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/eigen/blas/f2c/r_cnjg.c b/eigen/blas/f2c/r_cnjg.c new file mode 100644 index 0000000..c08182f --- /dev/null +++ b/eigen/blas/f2c/r_cnjg.c @@ -0,0 +1,6 @@ +#include "datatypes.h" + +void r_cnjg(complex *r, complex *z) { + r->r = z->r; + r->i = -(z->i); +} |