working martini

[unres4.git] / source / unres / data / control_data.F90

diff --git a/source/unres/data/control_data.F90 b/source/unres/data/control_data.F90
index 36afc1a..b1e824d 100644 (file)
--- a/source/unres/data/control_data.F90
+++ b/source/unres/data/control_data.F90
@@ -53,7 +53,7 @@
 ! common.spitele
 !      common /splitele/
       real(kind=8) :: r_cut,rlamb,r_cut_ele,rlamb_ele,r_cut_mart,rlamb_mart,&
-                      r_cut_ang
+                      r_cut_ang,graddelta
 !-----------------------------------------------------------------------------
 ! common.time1
 !     FOUND_NAN - set by calcf to stop sumsl via stopx