From 53425480f52fa1a6323e51623ae2a14154f22fa1 Mon Sep 17 00:00:00 2001
From: Mathieu Faverge <mathieu.faverge@inria.fr>
Date: Wed, 17 Oct 2018 18:50:28 +0200
Subject: [PATCH] Fix issue in zlansy
---
compute/pzlansy.c | 7 +++----
1 file changed, 3 insertions(+), 4 deletions(-)
diff --git a/compute/pzlansy.c b/compute/pzlansy.c
index c9cfc11ab..eac88cc06 100644
--- a/compute/pzlansy.c
+++ b/compute/pzlansy.c
@@ -335,12 +335,11 @@ void chameleon_pzlansy_generic( cham_normtype_t norm, cham_uplo_t uplo, cham_tra
case ChamInfNorm:
RUNTIME_options_ws_alloc( &options, 1, 0 );
- CHAMELEON_Desc_Create( &Wcol, NULL, ChamRealDouble, 1, A->nb, A->nb,
- workmt, worknt * A->nb, 0, 0, workmt, worknt * A->nb, A->p, A->q );
+ CHAMELEON_Desc_Create( &Wcol, NULL, ChamRealDouble, A->mb, 1, A->mb,
+ workmt * A->mb, worknt, 0, 0, workmt * A->mb, worknt, A->p, A->q );
CHAMELEON_Desc_Create( &Welt, NULL, ChamRealDouble, 1, 1, 1,
- A->p, worknt, 0, 0, A->p, worknt, A->p, A->q );
-
+ workmt, A->q, 0, 0, workmt, A->q, A->p, A->q );
break;
/*
--
GitLab