X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_CSA%2Fparmread.F;h=0a99250111d6da04291887a9e078a05f233eedcc;hb=0874c4ea42598369272a66bf4a345dcf7bff8b1f;hp=5a7b99f680027f7aec4f1b34c6540f8645a655ae;hpb=8f2aef346c425b9a9d9a768931954134dabd64ae;p=unres.git

diff --git a/source/unres/src_CSA/parmread.F b/source/unres/src_CSA/parmread.F
index 5a7b99f..0a99250 100644
--- a/source/unres/src_CSA/parmread.F
+++ b/source/unres/src_CSA/parmread.F
@@ -276,7 +276,7 @@ C
       enddo
       call flush(iout)
       endif
-      write (2,*) "Start reading THETA_PDB"
+c      write (2,*) "Start reading THETA_PDB"
       do i=1,ntyp
         read (ithep_pdb,*,err=111,end=111) a0thet(i),(athet(j,i),j=1,2),
      &    (bthet(j,i),j=1,2)