fix a bug in pxssvx and pxssvx_ABglobal

abagusetty · Jul 9, 2024 · 250e7c4 · 250e7c4
1 parent 6d2087e
commit 250e7c4
Show file tree

Hide file tree

Showing 6 changed files with 6 additions and 1 deletion.
diff --git a/SRC/complex16/pzgssvx.c b/SRC/complex16/pzgssvx.c
@@ -561,6 +561,7 @@ pzgssvx(superlu_dist_options_t *options, SuperMatrix *A,
 #endif
 
 	LUstruct->dt = 'z';
+	LUstruct->trf3Dpart= NULL;
 
     /* Structures needed for parallel symbolic factorization */
     int_t *sizes, *fstVtxSep, parSymbFact;

diff --git a/SRC/complex16/pzgssvx_ABglobal.c b/SRC/complex16/pzgssvx_ABglobal.c
@@ -508,6 +508,7 @@ pzgssvx_ABglobal(superlu_dist_options_t *options, SuperMatrix *A,
     double   dmin, dsum, dprod;
 #endif
 	LUstruct->dt = 'z';
+	LUstruct->trf3Dpart= NULL;
 
     /* Test input parameters. */
     *info = 0;

diff --git a/SRC/double/pdgssvx.c b/SRC/double/pdgssvx.c
@@ -560,7 +560,7 @@ pdgssvx(superlu_dist_options_t *options, SuperMatrix *A,
 #if ( PRNTlevel>= 2 )
     double   dmin, dsum, dprod;
 #endif
-
+	LUstruct->trf3Dpart= NULL;
 	LUstruct->dt = 'd';
 
     /* Structures needed for parallel symbolic factorization */

diff --git a/SRC/double/pdgssvx_ABglobal.c b/SRC/double/pdgssvx_ABglobal.c
@@ -509,6 +509,7 @@ pdgssvx_ABglobal(superlu_dist_options_t *options, SuperMatrix *A,
     double   dmin, dsum, dprod;
 #endif
 	LUstruct->dt = 'd';
+	LUstruct->trf3Dpart= NULL;
 
     /* Test input parameters. */
     *info = 0;

diff --git a/SRC/single/psgssvx.c b/SRC/single/psgssvx.c
@@ -562,6 +562,7 @@ psgssvx(superlu_dist_options_t *options, SuperMatrix *A,
 #endif
 
 	LUstruct->dt = 's';
+	LUstruct->trf3Dpart= NULL;
 
     /* Structures needed for parallel symbolic factorization */
     int_t *sizes, *fstVtxSep, parSymbFact;

diff --git a/SRC/single/psgssvx_ABglobal.c b/SRC/single/psgssvx_ABglobal.c
@@ -509,6 +509,7 @@ psgssvx_ABglobal(superlu_dist_options_t *options, SuperMatrix *A,
     double   dmin, dsum, dprod;
 #endif
 	LUstruct->dt = 's';
+	LUstruct->trf3Dpart= NULL;
 
     /* Test input parameters. */
     *info = 0;