From 96d72e22c73a591f924a3b334658cc7edb28dda1 Mon Sep 17 00:00:00 2001
From: simon
Date: Mon, 28 Jul 2008 09:37:43 +0000
Subject: updated complex transpose functions ( because they were doing
 hermitian transpose instead of normal one )

---
 src/matrixOperations/division/zrdiva.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'src/matrixOperations/division/zrdiva.c')

diff --git a/src/matrixOperations/division/zrdiva.c b/src/matrixOperations/division/zrdiva.c
index 43ed4d0f..b3b82988 100644
--- a/src/matrixOperations/division/zrdiva.c
+++ b/src/matrixOperations/division/zrdiva.c
@@ -68,9 +68,10 @@ int	zrdiva(	doubleComplex* in1, int lines1, int columns1 ,
 	dblEps		= getRelativeMachinePrecision() ;
 	dblAnorm	= C2F(zlange)(&cNorm, &lines2, &columns2, in2, &lines2, poDwork);
 
-	/*tranpose A and B*/
+	/* hermitian tranpose A   (transpose + conjugate )*/
 
 	ztransposea(in2, lines2, columns2, poAt);
+    zconja ( poAt , lines2*columns2 , poAt );
 		{
 		int i,j,ij,ji;
 		for(j = 0 ; j < lines1 ; j++)
-- 
cgit