X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD%2Fparmread.F;h=f6ea06a52205cfe6c69d0abc8fe91d5f8c570fa4;hb=18010d3bb85a86b499dc4569225e21faffea9634;hp=9024b505d7c719b67aaec8c2fbd6ca67ebddf72c;hpb=c1b8e24ad8ccf66d0617b0055089ea0c1193840d;p=unres.git

diff --git a/source/unres/src_MD/parmread.F b/source/unres/src_MD/parmread.F
index 9024b50..f6ea06a 100644
--- a/source/unres/src_MD/parmread.F
+++ b/source/unres/src_MD/parmread.F
@@ -211,7 +211,7 @@ C
       read (ithep,*,err=111,end=111) nthetyp,ntheterm,ntheterm2,
      &  ntheterm3,nsingle,ndouble
       nntheterm=max0(ntheterm,ntheterm2,ntheterm3)
-C      write(iout,*) "I am here",ntyp1
+      write(iout,*) "I am here",ntyp1
       read (ithep,*,err=111,end=111) (ithetyp(i),i=1,ntyp1)
 C      write(iout,*) "I am herew"
       do i=-ntyp1,-1