triss; AFM; Lorentz restrains included -debug might be on

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

diff --git a/source/unres/REMD.f90 b/source/unres/REMD.f90
index 1deb000..fe970be 100644 (file)
--- a/source/unres/REMD.f90
+++ b/source/unres/REMD.f90
@@ -290,7 +290,7 @@
 !#endif
 !      include 'COMMON.IOUNITS'
 !      include 'COMMON.TIME1'
-      logical :: lprn = .true.
+      logical :: lprn = .false.
       logical :: osob
 #ifndef FIVEDIAG
       real(kind=8),dimension(2*nres,2*nres) :: Bmat,matmult