X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2Fparmread.F;h=bd2165b23f642ff16ffa79e95ece16159a53bb37;hb=892c42fe1b098aac20f41e47faf97b1b2479b647;hp=22236bc5c6e5db5c8ce980fa8e15da13e15176d4;hpb=0bb81c1c3180a2079d70af7dd534295e1e0b1e4c;p=unres.git

diff --git a/source/unres/src_MD-M/parmread.F b/source/unres/src_MD-M/parmread.F
index 22236bc..bd2165b 100644
--- a/source/unres/src_MD-M/parmread.F
+++ b/source/unres/src_MD-M/parmread.F
@@ -591,7 +591,6 @@ C
       read (itorp,*,end=113,err=113) ntortyp,nterm_old
       if (lprint)write (iout,*) 'ntortyp,nterm',ntortyp,nterm_old
       read (itorp,*,end=113,err=113) (itortyp(i),i=1,ntyp)
-      itortyp(ntyp1)=0
       do i=1,ntortyp
 	do j=1,ntortyp
 	  read (itorp,'(a)')