From: Adam Sieradzan Date: Tue, 16 May 2017 08:53:52 +0000 (+0200) Subject: print off X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?p=unres.git;a=commitdiff_plain;h=2155d857532cb508950e657cf12424f4a0da1b1f print off --- diff --git a/source/unres/src_MD-M/energy_p_new_barrier.F b/source/unres/src_MD-M/energy_p_new_barrier.F index 443471d..2eac6d3 100644 --- a/source/unres/src_MD-M/energy_p_new_barrier.F +++ b/source/unres/src_MD-M/energy_p_new_barrier.F @@ -6397,7 +6397,7 @@ C c time11=dexp(-2*time) c time12=1.0d0 etheta=0.0D0 - write (*,'(a,i2)') 'EBEND ICG=',icg +C write (*,'(a,i2)') 'EBEND ICG=',icg do i=ithet_start,ithet_end if (i.le.2) cycle if ((itype(i-1).eq.ntyp1).or.itype(i-2).eq.ntyp1