Fixed bug in assemble reactionforces

git-svn-id: http://svn.sintef.no/trondheim/IFEM/trunk@854 e10b68d5-8a6e-419e-a041-bce267b0401d
This commit is contained in:
rho
2011-03-02 16:46:51 +00:00
committed by Knut Morten Okstad
parent 019f022c3c
commit adcd197a00

View File

@@ -154,7 +154,7 @@ bool SAMpatchPara::assembleSystem (SystemVector& sysRHS,
if (!pvec) return false;
// Add contributions to SV (righthand side)
VecSetValues(pvec->getVector(),nedof,&l2g[0],&eSv[0],ADD_VALUES);
VecSetValues(pvec->getVector(),eSv.size(),&l2g[0],&eSv[0],ADD_VALUES);
// Add contributions to reaction forces
if (reactionForces)