wham & cluster PBC

[unres.git] / source / unres / src-HCD-5D / readpdb.F

diff --git a/source/unres/src-HCD-5D/readpdb.F b/source/unres/src-HCD-5D/readpdb.F
index 1190bb1..c56b1df 100644 (file)
--- a/source/unres/src-HCD-5D/readpdb.F
+++ b/source/unres/src-HCD-5D/readpdb.F
@@ -30,6 +30,7 @@ C geometry.
       lsecondary=.false.
       nhfrag=0
       nbfrag=0
+      ires=0
       do
         read (ipdbin,'(a80)',end=10) card
         if (card(:5).eq.'HELIX') then