X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fcontrol.F90;fp=source%2Funres%2Fcontrol.F90;h=b46dd40cfa44de1b60317a9b96b3b6dcd6779710;hb=19eb6797997afd83690e2dc4314882fe511fd44f;hp=a1e49d3d5e85d9201b88b1956ca31d6215d2aab5;hpb=3ce440c28eb689f7b4f041a0bb0d92321499808a;p=unres4.git

diff --git a/source/unres/control.F90 b/source/unres/control.F90
index a1e49d3..b46dd40 100644
--- a/source/unres/control.F90
+++ b/source/unres/control.F90
@@ -148,6 +148,7 @@
 !
 ! The following is just to define auxiliary variables used in angle conversion
 !
+!      ifirstrun=0
       pi=4.0D0*datan(1.0D0)
       dwapi=2.0D0*pi
       dwapi3=dwapi/3.0D0