[cig-commits] r6831 - short/3D/PyLith/branches/pylith-0.8/pylith3d/module

leif at geodynamics.org leif at geodynamics.org
Wed May 9 17:38:31 PDT 2007


Author: leif
Date: 2007-05-09 17:38:31 -0700 (Wed, 09 May 2007)
New Revision: 6831

Modified:
   short/3D/PyLith/branches/pylith-0.8/pylith3d/module/mesh.cc
Log:
Fix for issue108: "change to VecScatterBegin/End".


Modified: short/3D/PyLith/branches/pylith-0.8/pylith3d/module/mesh.cc
===================================================================
--- short/3D/PyLith/branches/pylith-0.8/pylith3d/module/mesh.cc	2007-05-10 00:38:10 UTC (rev 6830)
+++ short/3D/PyLith/branches/pylith-0.8/pylith3d/module/mesh.cc	2007-05-10 00:38:31 UTC (rev 6831)
@@ -434,8 +434,8 @@
   PetscFunctionBegin;
   ierr = SectionRealGetLocalVector(displacement, &lv);CHKERRQ(ierr);
   ierr = PetscObjectQuery((PetscObject) sol, "injection", (PetscObject *) &injection);CHKERRQ(ierr);
-  ierr = VecScatterBegin(sol, lv, INSERT_VALUES, SCATTER_REVERSE, injection);CHKERRQ(ierr);
-  ierr = VecScatterEnd(sol, lv, INSERT_VALUES, SCATTER_REVERSE, injection);CHKERRQ(ierr);
+  ierr = VecScatterBegin(injection, sol, lv, INSERT_VALUES, SCATTER_REVERSE);CHKERRQ(ierr);
+  ierr = VecScatterEnd(injection, sol, lv, INSERT_VALUES, SCATTER_REVERSE);CHKERRQ(ierr);
   ierr = VecDestroy(lv);CHKERRQ(ierr);
   PetscFunctionReturn(0);
 }



More information about the cig-commits mailing list