unres_package_Oct_2016 from emilial

[unres4.git] / source / unres / REMD.f90

diff --git a/source/unres/REMD.f90 b/source/unres/REMD.f90
index e1cf84c..edbcc8e 100644 (file)
--- a/source/unres/REMD.f90
+++ b/source/unres/REMD.f90
@@ -25,7 +25,7 @@
       use comm_cipiszcze
       use energy_data
       use geometry_data, only: nres
-      use control_data 
+      use control_data    !el, only: mucadyn,lmuca
 #ifdef MPI
        include 'mpif.h'
       real(kind=8) :: time00
@@ -387,7 +387,7 @@
           enddo
         enddo
       endif
-      deallocate(Gcopy)
+!      deallocate(Gcopy)
       return
       end subroutine setup_MD_matrices
 !-----------------------------------------------------------------------------