[cig-commits] commit: Modifying this to account for a change I made
Mercurial
hg at geodynamics.org
Mon Nov 24 11:31:12 PST 2008
changeset: 117:977da3a363ef
user: LukeHodkinson
date: Thu Sep 11 05:26:49 2008 +0000
files: MaterialPoints/src/ParticleFeVariable.c MaterialPoints/src/ParticleFeVariable.h
description:
Modifying this to account for a change I made
in the rheology code; passing particle index
along with the particle itself.
diff -r 05b31774b616 -r 977da3a363ef MaterialPoints/src/ParticleFeVariable.c
--- a/MaterialPoints/src/ParticleFeVariable.c Sat Sep 06 14:45:03 2008 +0000
+++ b/MaterialPoints/src/ParticleFeVariable.c Thu Sep 11 05:26:49 2008 +0000
@@ -38,7 +38,7 @@
** License along with this library; if not, write to the Free Software
** Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
**
-** $Id: ParticleFeVariable.c 583 2008-08-19 08:03:13Z LukeHodkinson $
+** $Id: ParticleFeVariable.c 595 2008-09-11 05:26:49Z LukeHodkinson $
**
**~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~*/
@@ -331,6 +331,7 @@ void ParticleFeVariable_AssembleElement(
/* Find this particle in the element */
particle = (IntegrationPoint*) Swarm_ParticleInCellAt( swarm, cell_I, cParticle_I );
+ self->currentParticleIndex = swarm->cellParticleTbl[cell_I][cParticle_I];
ParticleFeVariable_ValueAtParticle( self, swarm, lElement_I, particle, particleValue );
ElementType_EvaluateShapeFunctionsAt( elementType, particle->xi, shapeFunc );
@@ -373,6 +374,7 @@ void ParticleFeVariable_AssembleElement_
ElementType_ShapeFunctionsGlobalDerivs( elementType, mesh, lElement_I,
particle->xi, dim, &detJac, self->GNx );
+ self->currentParticleIndex = swarm->cellParticleTbl[cell_I][cParticle_I];
ParticleFeVariable_ValueAtParticle( self, swarm, lElement_I, particle, particleValue );
for ( dof_I = 0 ; dof_I < dofCount ; dof_I++ ) {
diff -r 05b31774b616 -r 977da3a363ef MaterialPoints/src/ParticleFeVariable.h
--- a/MaterialPoints/src/ParticleFeVariable.h Sat Sep 06 14:45:03 2008 +0000
+++ b/MaterialPoints/src/ParticleFeVariable.h Thu Sep 11 05:26:49 2008 +0000
@@ -71,6 +71,7 @@
Name massMatrixName; \
ForceVector* massMatrix; \
ForceTerm* massMatrixForceTerm; \
+ int currentParticleIndex; \
Bool useDeriv; \
double** GNx;
More information about the CIG-COMMITS
mailing list