33 lines
1.1 KiB
Diff
33 lines
1.1 KiB
Diff
Index: SuperLU_3.0/SRC/cutil.c
|
|
===================================================================
|
|
--- SuperLU_3.0.orig/SRC/cutil.c
|
|
+++ SuperLU_3.0/SRC/cutil.c
|
|
@@ -239,9 +239,10 @@ cPrint_SuperNode_Matrix(char *what, Supe
|
|
nsup = sup_to_col[k+1] - c;
|
|
for (j = c; j < c + nsup; ++j) {
|
|
d = Astore->nzval_colptr[j];
|
|
for (i = rowind_colptr[c]; i < rowind_colptr[c+1]; ++i) {
|
|
- printf("%d\t%d\t%e\t%e\n", rowind[i], j, dp[d++], dp[d++]);
|
|
+ printf("%d\t%d\t%e\t%e\n", rowind[i], j, dp[d], dp[d+1]);
|
|
+ d += 2;
|
|
}
|
|
}
|
|
}
|
|
#if 0
|
|
Index: SuperLU_3.0/SRC/zutil.c
|
|
===================================================================
|
|
--- SuperLU_3.0.orig/SRC/zutil.c
|
|
+++ SuperLU_3.0/SRC/zutil.c
|
|
@@ -239,9 +239,10 @@ zPrint_SuperNode_Matrix(char *what, Supe
|
|
nsup = sup_to_col[k+1] - c;
|
|
for (j = c; j < c + nsup; ++j) {
|
|
d = Astore->nzval_colptr[j];
|
|
for (i = rowind_colptr[c]; i < rowind_colptr[c+1]; ++i) {
|
|
- printf("%d\t%d\t%e\t%e\n", rowind[i], j, dp[d++], dp[d++]);
|
|
+ printf("%d\t%d\t%e\t%e\n", rowind[i], j, dp[d], dp[d+1]);
|
|
+ d += 2;
|
|
}
|
|
}
|
|
}
|
|
#if 0
|