diff options
| author | allen <allen@1d96b42b-98df-4a6a-9d84-1b24288d4588> | 2002-08-20 15:26:27 +0000 |
|---|---|---|
| committer | allen <allen@1d96b42b-98df-4a6a-9d84-1b24288d4588> | 2002-08-20 15:26:27 +0000 |
| commit | 0897924d89b2298357d54cd41734fda24eb3bd2f (patch) | |
| tree | 5bc4c07201ef928297739d9ee9b3c4bdfa080892 | |
| parent | 7b4c8d596dad37ec4e8398e271f864b6945b72a9 (diff) | |
Added patch from Erik Schnetter for compiling with latest PETSc
git-svn-id: http://svn.cactuscode.org/arrangements/CactusElliptic/EllPETSc/trunk@70 1d96b42b-98df-4a6a-9d84-1b24288d4588
| -rw-r--r-- | src/petsc_confmetric_solver.c | 2 | ||||
| -rw-r--r-- | src/petsc_flat_solver.c | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/src/petsc_confmetric_solver.c b/src/petsc_confmetric_solver.c index 131b26c..bad9169 100644 --- a/src/petsc_confmetric_solver.c +++ b/src/petsc_confmetric_solver.c @@ -1010,7 +1010,7 @@ int petsc_confmetric_solver(cGH *GH, int *MetricPsiI, int MetricPsiISize, */ if (verbose) CCTK_INFO("KSPSetInitialGuess\n"); -#if PETSC_VERSION_MAJOR < 2 || (PETSC_VERSION_MAJOR == 2 && PETSC_VERSION_MINOR == 0) +#if PETSC_VERSION_MAJOR < 2 || (PETSC_VERSION_MAJOR == 2 && PETSC_VERSION_MINOR <= 0) ierr = KSPSetInitialGuessNonzero(ksp); CHKERRQ(ierr); #else ierr = KSPSetInitialGuessNonzero(ksp, PETSC_TRUE); CHKERRQ(ierr); diff --git a/src/petsc_flat_solver.c b/src/petsc_flat_solver.c index e76631a..cf046db 100644 --- a/src/petsc_flat_solver.c +++ b/src/petsc_flat_solver.c @@ -605,7 +605,7 @@ int petsc_flat(cGH *GH, int FieldIndex, int MIndex, int NIndex, { CCTK_INFO("KSPSetInitialGuess"); } -#if PETSC_VERSION_MAJOR < 2 || (PETSC_VERSION_MAJOR == 2 && PETSC_VERSION_MINOR == 0) +#if PETSC_VERSION_MAJOR < 2 || (PETSC_VERSION_MAJOR == 2 && PETSC_VERSION_MINOR <= 0) ierr = KSPSetInitialGuessNonzero(ksp); #else ierr = KSPSetInitialGuessNonzero(ksp, PETSC_TRUE); |