[cig-commits] r12980 - short/3D/PyLith/trunk/libsrc/faults

[knepley at geodynamics.org]

Author: knepley
Date: 2008-10-01 08:02:42 -0700 (Wed, 01 Oct 2008)
New Revision: 12980

Modified:
   short/3D/PyLith/trunk/libsrc/faults/FaultCohesiveKin.cc
Log:
Fixed (I think) kinetic slip faults in parallel


Modified: short/3D/PyLith/trunk/libsrc/faults/FaultCohesiveKin.cc
===================================================================
--- short/3D/PyLith/trunk/libsrc/faults/FaultCohesiveKin.cc	2008-10-01 12:53:54 UTC (rev 12979)
+++ short/3D/PyLith/trunk/libsrc/faults/FaultCohesiveKin.cc	2008-10-01 15:02:42 UTC (rev 12980)
@@ -646,8 +646,11 @@
     ncV.clear();
   } // for
 
+  _orientation->view("ORIENTATION Before complete");
+  _orientation->setDebug(2);
   // Assemble orientation information
-  ALE::Completion::completeSection(_faultMesh->getSendOverlap(), _faultMesh->getRecvOverlap(), _orientation, _orientation);
+  ALE::Completion::completeSectionAdd(_faultMesh->getSendOverlap(), _faultMesh->getRecvOverlap(), _orientation, _orientation);
+  _orientation->view("ORIENTATION After complete");
 
   // Loop over vertices, make orientation information unit magnitude
   double_array vertexDir(orientationSize);
@@ -716,7 +719,7 @@
     PetscLogFlops(5 + count * 3);
   } // if
 
-  //_orientation->view("ORIENTATION");
+  _orientation->view("ORIENTATION");
 } // _calcOrientation
 
 // ----------------------------------------------------------------------
@@ -912,7 +915,7 @@
   } // for
 
   // Assemble area information
-  ALE::Completion::completeSection(_faultMesh->getSendOverlap(), _faultMesh->getRecvOverlap(), _area, _area);
+  ALE::Completion::completeSectionAdd(_faultMesh->getSendOverlap(), _faultMesh->getRecvOverlap(), _area, _area);
 } // _calcArea
 
 // ----------------------------------------------------------------------