From 0897924d89b2298357d54cd41734fda24eb3bd2f Mon Sep 17 00:00:00 2001 From: allen Date: Tue, 20 Aug 2002 15:26:27 +0000 Subject: 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 --- src/petsc_confmetric_solver.c | 2 +- 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); -- cgit v1.2.3