Changeset 23212

Timestamp:

09/04/18 09:12:43 (7 years ago)

Author:

Mathieu Morlighem

Message:

CHG: make sure code compile with PETSc 3.4

File:

• issm/trunk-jpl/src/c/solutionsequences/solutionsequence_schurcg.cpp (modified) (2 diffs)

issm/trunk-jpl/src/c/solutionsequences/solutionsequence_schurcg.cpp

@@ -89 +89 @@
         /* Create KSP context */
         KSPCreate(IssmComm::GetComm(),&kspu);
+        #if (_PETSC_MAJOR_==3) && (_PETSC_MINOR_>=5)
         KSPSetOperators(kspu,A,A);
+        #else
+        KSPSetOperators(kspu,A,A,DIFFERENT_NONZERO_PATTERN);
+        #endif
         KSPSetType(kspu,KSPCG);
         KSPSetInitialGuessNonzero(kspu,PETSC_TRUE);
@@ -120 +124 @@
         /* Create KSP context */
         KSPCreate(IssmComm::GetComm(),&kspp);
+        #if (_PETSC_MAJOR_==3) && (_PETSC_MINOR_>=5)
         KSPSetOperators(kspp,IP,IP);
+        #else
+        KSPSetOperators(kspp,IP,IP,DIFFERENT_NONZERO_PATTERN);
+        #endif
         
         /* Create RHS */