diff options
Diffstat (limited to 'src/matrixOperations/division')
-rw-r--r-- | src/matrixOperations/division/Makefile.am | 8 | ||||
-rw-r--r-- | src/matrixOperations/division/Makefile.in | 8 | ||||
-rw-r--r-- | src/matrixOperations/division/zrdiva.c | 3 |
3 files changed, 12 insertions, 7 deletions
diff --git a/src/matrixOperations/division/Makefile.am b/src/matrixOperations/division/Makefile.am index 49562596..00f7e603 100644 --- a/src/matrixOperations/division/Makefile.am +++ b/src/matrixOperations/division/Makefile.am @@ -11,8 +11,8 @@ ## libMatrixDivision_la_CFLAGS = -I $(top_builddir)/type \ - -I $(top_builddir)/matrixOperations/includes \ - -I $(top_builddir)/elementaryFunctions/includes + -I $(top_builddir)/matrixOperations/includes \ + -I $(top_builddir)/elementaryFunctions/includes instdir = $(top_builddir)/lib @@ -36,10 +36,12 @@ check_LDADD = $(top_builddir)/type/libDoubleComplex.la \ $(top_builddir)/lib/lapack/libscilapack.la \ $(top_builddir)/matrixOperations/transpose/libMatrixTranspose.la \ $(top_builddir)/matrixOperations/cat/libMatrixConcatenation.la \ + $(top_builddir)/elementaryFunctions/conj/libConj.la \ libMatrixDivision.la check_INCLUDES = -I $(top_builddir)/type \ - -I $(top_builddir)/matrixOperations/includes + -I $(top_builddir)/matrixOperations/includes \ + -I $(top_builddir)/elementaryFunctions/includes testMatrixLDivision_SOURCES = testMatrixLDivision.c testMatrixLDivision_LDADD = $(check_LDADD) diff --git a/src/matrixOperations/division/Makefile.in b/src/matrixOperations/division/Makefile.in index 0184c910..def07905 100644 --- a/src/matrixOperations/division/Makefile.in +++ b/src/matrixOperations/division/Makefile.in @@ -210,8 +210,8 @@ target_alias = @target_alias@ top_builddir = @top_builddir@ top_srcdir = @top_srcdir@ libMatrixDivision_la_CFLAGS = -I $(top_builddir)/type \ - -I $(top_builddir)/matrixOperations/includes \ - -I $(top_builddir)/elementaryFunctions/includes + -I $(top_builddir)/matrixOperations/includes \ + -I $(top_builddir)/elementaryFunctions/includes instdir = $(top_builddir)/lib pkglib_LTLIBRARIES = libMatrixDivision.la @@ -229,10 +229,12 @@ check_LDADD = $(top_builddir)/type/libDoubleComplex.la \ $(top_builddir)/lib/lapack/libscilapack.la \ $(top_builddir)/matrixOperations/transpose/libMatrixTranspose.la \ $(top_builddir)/matrixOperations/cat/libMatrixConcatenation.la \ + $(top_builddir)/elementaryFunctions/conj/libConj.la \ libMatrixDivision.la check_INCLUDES = -I $(top_builddir)/type \ - -I $(top_builddir)/matrixOperations/includes + -I $(top_builddir)/matrixOperations/includes \ + -I $(top_builddir)/elementaryFunctions/includes testMatrixLDivision_SOURCES = testMatrixLDivision.c testMatrixLDivision_LDADD = $(check_LDADD) 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++) |