From 2650964d21aca13b28a8aae5666998afb2540cbd Mon Sep 17 00:00:00 2001
From: Adam Sieradzan <adasko@piasek4.chem.univ.gda.pl>
Date: Fri, 18 Aug 2017 14:24:35 +0200
Subject: [PATCH] correction of gamsc

---
 source/unres/MD.f90 |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/source/unres/MD.f90 b/source/unres/MD.f90
index caa953f..82ecbe8 100644
--- a/source/unres/MD.f90
+++ b/source/unres/MD.f90
@@ -5097,7 +5097,7 @@
 !  Load the friction coefficients corresponding to side chains
       m=nct-nnt
       ind=0
-      do j=1,5
+      do j=1,2
       gamsc(ntyp1_molec(j),j)=1.0d0
       enddo
       do i=nnt,nct
-- 
1.7.9.5