X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc-HCD-5D%2Fint_from_cart.F;fp=source%2Funres%2Fsrc-HCD-5D%2Fint_from_cart.F;h=ded15f975b2035a5092aa4515d93d0e56920a811;hb=5aac27f7c6317fa0975184363614b42716034716;hp=b36fae48e96d4bafd0f685bdc76b414006865360;hpb=fd10e81284102e5a8466e05c87f0202979a2f00b;p=unres.git

diff --git a/source/unres/src-HCD-5D/int_from_cart.F b/source/unres/src-HCD-5D/int_from_cart.F
index b36fae4..ded15f9 100644
--- a/source/unres/src-HCD-5D/int_from_cart.F
+++ b/source/unres/src-HCD-5D/int_from_cart.F
@@ -227,8 +227,8 @@ c---------------------------------------------------------------------------
       integer i,j,ires,nscat
       double precision sccor(3,50)
       double precision sccmj
-      write (2,*) "sccenter",ires,nscat
-      call flush(2)
+c      write (2,*) "sccenter",ires,nscat
+c      call flush(2)
       do j=1,3
         sccmj=0.0D0
         do i=1,nscat