popr. tab w sum_gradient

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

diff --git a/source/unres/energy.f90 b/source/unres/energy.f90
index e25c098..6bb718a 100644 (file)
--- a/source/unres/energy.f90
+++ b/source/unres/energy.f90
@@ -9051,12 +9051,12 @@
 #endif
 #ifdef MPI
       include 'mpif.h'
-!el#endif
+#endif
       real(kind=8),dimension(3,nres) :: gradbufc,gradbufx,gradbufc_sum,&
                    gloc_scbuf !(3,maxres)
 
       real(kind=8),dimension(4*nres) :: glocbuf !(4*maxres)
-#endif
+!#endif
 !el local variables
       integer :: i,j,k,ierror,ierr
       real(kind=8) :: gvdwc_norm,gvdwc_scp_norm,gelc_norm,gvdwpp_norm,&