X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2Freadrtns_CSA.F;h=d02b83fe23a7068692fd6177a01afd635e53a0ff;hb=d7d33ac73e7386cf74bb07da09b67fa6619a0b11;hp=9c34d47c306197a6d4216ee69e50b92dc034a9e2;hpb=0c5fb524ca994d617a32adfb678302e2f3dcef1e;p=unres.git

diff --git a/source/unres/src_MD-M/readrtns_CSA.F b/source/unres/src_MD-M/readrtns_CSA.F
index 9c34d47..d02b83f 100644
--- a/source/unres/src_MD-M/readrtns_CSA.F
+++ b/source/unres/src_MD-M/readrtns_CSA.F
@@ -237,6 +237,12 @@ C      endif
       if ((lipbufthick*2.0d0).gt.lipthick)
      &write(iout,*) "WARNING WRONG SIZE OF LIP AQ BUF"
       endif
+      write(iout,*) "bordliptop=",bordliptop
+      write(iout,*) "bordlipbot=",bordlipbot
+      write(iout,*) "bufliptop=",bufliptop
+      write(iout,*) "buflipbot=",buflipbot
+
+
       if (me.eq.king .or. .not.out1file ) 
      &  write (iout,*) "DISTCHAINMAX",distchainmax