X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_CSA%2Fparmread.F;h=0a99250111d6da04291887a9e078a05f233eedcc;hb=34d3ad3987785642be58fb2f26557d3314215577;hp=5a7b99f680027f7aec4f1b34c6540f8645a655ae;hpb=478a9d9a1c99eb3f4bc4ca676ff3162bdd01d633;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)