From adcd197a00e584e758ca015880a1b4eab9ea8473 Mon Sep 17 00:00:00 2001
From: rho <rho@e10b68d5-8a6e-419e-a041-bce267b0401d>
Date: Wed, 2 Mar 2011 16:46:51 +0000
Subject: [PATCH] Fixed bug in assemble reactionforces

git-svn-id: http://svn.sintef.no/trondheim/IFEM/trunk@854 e10b68d5-8a6e-419e-a041-bce267b0401d
---
 src/ASM/SAMpatchPara.C | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/ASM/SAMpatchPara.C b/src/ASM/SAMpatchPara.C
index e0aad391..5effa92e 100644
--- a/src/ASM/SAMpatchPara.C
+++ b/src/ASM/SAMpatchPara.C
@@ -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)