Changeset 15564 for issm/trunk-jpl/src/c/toolkits/petsc/objects/PetscSolver.cpp

Timestamp:

07/23/13 14:23:07 (12 years ago)

Author:

Mathieu Morlighem

Message:

CHG: hutter-> SIA macayeal->SSA pattyn->HO stokes->FS

File:

• issm/trunk-jpl/src/c/toolkits/petsc/objects/PetscSolver.cpp (modified) (3 diffs)

issm/trunk-jpl/src/c/toolkits/petsc/objects/PetscSolver.cpp

@@ -52 +52 @@
         #endif
 
-        /*Stokes: */
+        /*FS: */
         IS         isv=NULL;
         IS         isp=NULL;
@@ -118 +118 @@
         }
 
-        /*Stokes: */
-        if (solver_type==StokesSolverEnum){
+        /*FS: */
+        if (solver_type==FSSolverEnum){
                 /*Make indices out of doftypes: */
-                if(!df)_error_("need doftypes for Stokes solver!\n");
-                DofTypesToIndexSet(&isv,&isp,df,StokesSolverEnum);
+                if(!df)_error_("need doftypes for FS solver!\n");
+                DofTypesToIndexSet(&isv,&isp,df,FSSolverEnum);
 
                 /*Set field splits: */
@@ -179 +179 @@
         int      velocity_count=0;
 
-        if(typeenum==StokesSolverEnum){
+        if(typeenum==FSSolverEnum){
 
                 /*Ok, recover doftypes vector values and indices: */