X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD%2Finitialize_p.F;h=369e6bcc2d97e6ea13af46349982b42b39381d99;hb=c7a96454a5265471d175bbe066071ac41c8b55c3;hp=2d08087e8e169e0c94cf70b85b9db473489d45eb;hpb=01c3eb1a73e84ef1e5a40828c38bcb3e2aaedb21;p=unres.git diff --git a/source/unres/src_MD/initialize_p.F b/source/unres/src_MD/initialize_p.F index 2d08087..369e6bc 100644 --- a/source/unres/src_MD/initialize_p.F +++ b/source/unres/src_MD/initialize_p.F @@ -562,6 +562,7 @@ C Partition local interactions call int_bounds(nres-2,ithet_start,ithet_end) ithet_start=ithet_start+2 ithet_end=ithet_end+2 + write (iout,*) "ithet_start",ithet_start," ithet_end",ithet_end call int_bounds(nct-nnt-2,iturn3_start,iturn3_end) iturn3_start=iturn3_start+nnt iphi_start=iturn3_start+2