Adam's changes
[unres.git] / source / unres / src-HCD-5D / int_from_cart.F
index b36fae4..ded15f9 100644 (file)
@@ -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