debug on for ions

[unres4.git] / source / unres / energy.F90

diff --git a/source/unres/energy.F90 b/source/unres/energy.F90
index 8f2be9f..5df4a0a 100644 (file)
--- a/source/unres/energy.F90
+++ b/source/unres/energy.F90
@@ -27632,7 +27632,7 @@
 !c! ecl
        sparrow  = w1 * Qj * om1
        hawk     = w2 * Qj * Qj * (1.0d0 - sqom2)
-       print *,"CO?!.", w1,w2,Qj,om1
+!       print *,"CO?!.", w1,w2,Qj,om1
        ECL = sparrow / Rhead**2.0d0 &
            - hawk    / Rhead**4.0d0
 !c!-------------------------------------------------------------------