r_cnjg.c « f2c « blas « EigenDir « Tango.TCC.LoadTestLib « TCC « Visual_Studio « Software - Tango - Twine softwares

about summary refs log tree commit diff stats

path: root/Software/Visual_Studio/TCC/Tango.TCC.LoadTestLib/EigenDir/blas/f2c/r_cnjg.c

blob: c08182f88ec5bf785540739cdfad9ad343982005 (plain)

#include "datatypes.h"    

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