conj using mapVector

1 files changed, 0 insertions, 12 deletions

diff --git a/lib/Data/Packed/Internal/auxi.c b/lib/Data/Packed/Internal/auxi.c
index 562c804..5c06cb6 100644
--- a/lib/Data/Packed/Internal/auxi.c
+++ b/lib/Data/Packed/Internal/auxi.c
@@ -64,18 +64,6 @@ int submatrixR(int r1, int r2, int c1, int c2, KRMAT(x),RMAT(r)) {
     OK
 }
 
-
-int conjugate(KCVEC(x),CVEC(t)) {
-    REQUIRES(xn==tn,BAD_SIZE);
-    DEBUGMSG("conjugate");
-    int k;
-    for (k=0; k<xn; k++) {
-        tp[k].dat[0] =   xp[k].dat[0];
-        tp[k].dat[1] = - xp[k].dat[1];
-    }
-    OK
-}
-
 //---------------------------------------
 void asm_finit() {
     asm("finit");