From a3c7fdb156b8597d174cfdef85ee072e72019264 Mon Sep 17 00:00:00 2001 From: Adam Sieradzan Date: Thu, 23 Oct 2014 17:56:27 +0200 Subject: [PATCH] poprawka w stochasticfric --- source/unres/src_MD-M/stochfric.F | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/source/unres/src_MD-M/stochfric.F b/source/unres/src_MD-M/stochfric.F index 13d02fb..10531b4 100644 --- a/source/unres/src_MD-M/stochfric.F +++ b/source/unres/src_MD-M/stochfric.F @@ -365,7 +365,7 @@ c Load the friction coefficients corresponding to peptide groups c Load the friction coefficients corresponding to side chains m=nct-nnt ind=0 - gamsc(ntyp1)=1.0d0 +C gamsc(ntyp1)=1.0d0 do i=nnt,nct ind=ind+1 ii = ind+m -- 1.7.9.5