From 5ea47130598a5c9ad27716a03de61cd1b87dd692 Mon Sep 17 00:00:00 2001 From: Adam Sieradzan Date: Mon, 25 May 2015 12:43:12 +0200 Subject: [PATCH] debug part 6 --- source/wham/src-M/energy_p_new.F | 1 + 1 file changed, 1 insertion(+) diff --git a/source/wham/src-M/energy_p_new.F b/source/wham/src-M/energy_p_new.F index bedf32e..264cdfc 100644 --- a/source/wham/src-M/energy_p_new.F +++ b/source/wham/src-M/energy_p_new.F @@ -929,6 +929,7 @@ C Calculate the radial part of the gradient C Calculate angular part of the gradient. call sc_grad endif + write(iout,*) "partial sum", evdw, evdw_t ENDIF ! dyn_ss enddo ! j enddo ! iint -- 1.7.9.5