[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