X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD%2Fparmread.F;fp=source%2Funres%2Fsrc_MD%2Fparmread.F;h=f6ea06a52205cfe6c69d0abc8fe91d5f8c570fa4;hb=ee63e3c2690474ee368e6d7c6fd51dabec6a5406;hp=9024b505d7c719b67aaec8c2fbd6ca67ebddf72c;hpb=fe11b148c6a194dc08227d7d7bcb8979f1e4f11d;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