X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fcluster%2Fwham%2Fsrc%2Freadpdb.F;h=0160eb10302ae6e893ab279c82f77688cc635dca;hb=9ae8ee5cf9fc01ccc83a4930bf2db2d77802755e;hp=604b840a960df236f4759700792d9168a506df59;hpb=d28adcc189ba04a8f8ede9160c3e51e73d92a920;p=unres.git

diff --git a/source/cluster/wham/src/readpdb.F b/source/cluster/wham/src/readpdb.F
index 604b840..0160eb1 100644
--- a/source/cluster/wham/src/readpdb.F
+++ b/source/cluster/wham/src/readpdb.F
@@ -347,7 +347,7 @@ c          vbld(nres)=3.8d0
 c          vbld_inv(nres)=1.0d0/vbld(2)
 c        endif
 c      endif
-      if (lside) then
+      if (lside1) then
         do i=2,nres-1
           do j=1,3
             c(j,maxres2)=0.5D0*(2*c(j,i)+(c(j,i-1)-c(j,i))*vbld_inv(i)