From c9d46c21e93e023fa32fd3b5274e3ee503323e8b Mon Sep 17 00:00:00 2001 From: Adam Sieradzan Date: Wed, 25 Feb 2015 10:36:46 +0100 Subject: [PATCH] Finding undefined tua... --- source/unres/src_MD/checkder_p.F | 1 + 1 file changed, 1 insertion(+) 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) -- 1.7.9.5