X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?p=unres.git;a=blobdiff_plain;f=source%2Funres%2Fsrc_CSA_DiL%2FCOMMON.LOCMOVE;fp=source%2Funres%2Fsrc_CSA_DiL%2FCOMMON.LOCMOVE;h=0000000000000000000000000000000000000000;hp=211516dc16c6998375cf6bff980ceec9e3170aca;hb=2a226bfc86eabc6e4eae0c3ad1cbc3cb5417a05a;hpb=a0e685f844163003749ba91dfbf4644bcc8cfa30

diff --git a/source/unres/src_CSA_DiL/COMMON.LOCMOVE b/source/unres/src_CSA_DiL/COMMON.LOCMOVE
deleted file mode 100644
index 211516d..0000000
--- a/source/unres/src_CSA_DiL/COMMON.LOCMOVE
+++ /dev/null
@@ -1,19 +0,0 @@
-c     Variables (set in init routine) never modified by local_move
-      integer init_called
-      logical locmove_output
-      double precision min_theta, max_theta
-      double precision dmin2,dmax2
-      double precision flag,small,small2
-
-      common /loc_const/ init_called,locmove_output,min_theta,
-     +     max_theta,dmin2,dmax2,flag,small,small2
-
-c     Workspace for local_move
-      integer a_n,b_n,res_n
-      double precision a_ang,b_ang,res_ang
-      logical a_tab,b_tab,res_tab
-
-      common /loc_work/ res_ang(0:11),a_ang(0:7),b_ang(0:3),
-     +     res_n,res_tab(0:2,0:2,0:11),
-     +     a_n,a_tab(0:2,0:7),
-     +     b_n,b_tab(0:2,0:3)