[cig-commits] r22148 - short/3D/PyLith/trunk/libsrc/pylith/problems

[knepley at geodynamics.org]

Author: knepley
Date: 2013-05-28 04:50:23 -0700 (Tue, 28 May 2013)
New Revision: 22148

Modified:
   short/3D/PyLith/trunk/libsrc/pylith/problems/Solver.cc
Log:
Use correct field for fault PC

Modified: short/3D/PyLith/trunk/libsrc/pylith/problems/Solver.cc
===================================================================
--- short/3D/PyLith/trunk/libsrc/pylith/problems/Solver.cc	2013-05-28 11:49:36 UTC (rev 22147)
+++ short/3D/PyLith/trunk/libsrc/pylith/problems/Solver.cc	2013-05-28 11:50:23 UTC (rev 22148)
@@ -311,7 +311,7 @@
     
   PetscObject field = NULL;
   err = DMSetNumFields(dmMesh, 2);PYLITH_CHECK_ERROR(err);
-  err = DMGetField(dmMesh, 0, &field);PYLITH_CHECK_ERROR(err);
+  err = DMGetField(dmMesh, 1, &field);PYLITH_CHECK_ERROR(err);
   err = PetscObjectCompose(field, "pmat", (PetscObject) _jacobianPCFault);PYLITH_CHECK_ERROR(err);
 
   PYLITH_METHOD_END;