summaryrefslogtreecommitdiff
path: root/src/matrixOperations/inversion/zinverma.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/matrixOperations/inversion/zinverma.c')
-rw-r--r--src/matrixOperations/inversion/zinverma.c4
1 files changed, 1 insertions, 3 deletions
diff --git a/src/matrixOperations/inversion/zinverma.c b/src/matrixOperations/inversion/zinverma.c
index ef91f55e..c8d5052e 100644
--- a/src/matrixOperations/inversion/zinverma.c
+++ b/src/matrixOperations/inversion/zinverma.c
@@ -17,7 +17,7 @@
void zinverma ( doubleComplex* in, doubleComplex* out, int leadDimIn )
{
int info = 0 ;
- int* vectPivot = (int*) malloc ( sizeof(int) * (unsigned int)( leadDimIn*leadDimIn) );
+ int* vectPivot = (int*) malloc ( sizeof(int) * (unsigned int)( leadDimIn) );
doubleComplex* work = (doubleComplex*) malloc ( sizeof(doubleComplex) * (unsigned int) (leadDimIn*leadDimIn) );
int i = 0 ;
@@ -27,9 +27,7 @@ void zinverma ( doubleComplex* in, doubleComplex* out, int leadDimIn )
out[i] = in[i] ;
}
- printf ("avant dgefa\n");
zgetrf_ ( &leadDimIn, &leadDimIn, out, &leadDimIn, vectPivot, &info );
-printf ("avant dge\n");
zgetri_ ( &leadDimIn, out, &leadDimIn , vectPivot, work , &leadDimIn , &info );