Adam's unres update

[unres.git] / source / unres / src-HCD-5D / checkder_p.F

diff --git a/source/unres/src-HCD-5D/checkder_p.F b/source/unres/src-HCD-5D/checkder_p.F
index e1448db..d0032da 100644 (file)
--- a/source/unres/src-HCD-5D/checkder_p.F
+++ b/source/unres/src-HCD-5D/checkder_p.F
@@ -364,6 +364,7 @@ c-------------------------------------------------------------------------
       double precision dnorm1,dnorm2,be
       double precision time00
       double precision dist,alpha,beta
+      double precision time01
       if (lprn) write (iout,'(/a)') 'Recalculated internal coordinates'
 #ifdef TIMING
       time01=MPI_Wtime()