X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc-HCD-5D%2Fcxread.F;h=3f6c70bc1434484f7b8f84ea26d9e7d8ab3a1992;hb=b02e92ba725b185f053bd8a57db53a6c3427ed51;hp=46867c510774aca3f81d23cade4dbf34ac96aa9a;hpb=59be9794bde14291abe01fcdc62da623d4463042;p=unres.git

diff --git a/source/wham/src-HCD-5D/cxread.F b/source/wham/src-HCD-5D/cxread.F
index 46867c5..3f6c70b 100644
--- a/source/wham/src-HCD-5D/cxread.F
+++ b/source/wham/src-HCD-5D/cxread.F
@@ -69,8 +69,6 @@ c      call flush(iout)
            if (dyn_ss) then
             call xdrfint(ixdrf, idssb(j), iret)
             call xdrfint(ixdrf, jdssb(j), iret)
-        idssb(j)=idssb(j)-nres
-        jdssb(j)=jdssb(j)-nres
            else
             call xdrfint_(ixdrf, ihpb(j), iret)
             call xdrfint_(ixdrf, jhpb(j), iret)
@@ -174,7 +172,7 @@ c      call flush(iout)
 c      write (iout,*) "Before boxshift"
 c      call flush(iout)
 c Box shift
-      call oligomer
+c      call oligomer
 c      write (iout,*) "After oligomer"
 c      call flush(iout)
       do i=1,nres