X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2Fparmread.F;fp=source%2Funres%2Fsrc_MD-M%2Fparmread.F;h=183a91715a4e8249b57392d7aa14fedc906c9a1f;hb=4a3d4a16fc1c0c5c973b9ca6ada3c4b0a2152651;hp=093ca8afad8acd3e0a7caf1352fde74b2dd8ed63;hpb=7bb45761e592e3631013f7f09a37c57068707c48;p=unres.git

diff --git a/source/unres/src_MD-M/parmread.F b/source/unres/src_MD-M/parmread.F
index 093ca8a..183a917 100644
--- a/source/unres/src_MD-M/parmread.F
+++ b/source/unres/src_MD-M/parmread.F
@@ -1122,6 +1122,7 @@ C       do j=1,ntyp
 C       epslip(i,j)=epslip(i,j)+0.05d0
 C       enddo
       enddo
+      write(iout,*) epslip(1,1),"OK?"
 C For the GB potential convert sigma'**2 into chi'
       if (ipot.eq.4) then
 	do i=1,ntyp