From: Adam Sieradzan <adasko@piasek4.chem.univ.gda.pl>
Date: Wed, 25 Feb 2015 09:36:46 +0000 (+0100)
Subject: Finding undefined tua...
X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=commitdiff_plain;h=c9d46c21e93e023fa32fd3b5274e3ee503323e8b;hp=326f57dfc782f6cf4ee12c32c867d9ec1680585f;p=unres.git

Finding undefined tua...
---

diff --git a/source/unres/src_MD/checkder_p.F b/source/unres/src_MD/checkder_p.F
index ff70fa1..fda3a7b 100644
--- a/source/unres/src_MD/checkder_p.F
+++ b/source/unres/src_MD/checkder_p.F
@@ -534,6 +534,7 @@ c-------------------------------------------------------------------------
          tauangle(1,i+1)=beta(i-1+nres,i-1,i,i+1)
          omicron(1,i)=alpha(i-2,i-1,i-1+nres)
          omicron(2,i)=alpha(i-1+nres,i-1,i)
+C        print *,i,omicron(1,i),omicron(2,i)
         endif
         if (itype(i).ne.10) then
          tauangle(2,i+1)=beta(i-2,i-1,i,i+nres)