X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?p=unres.git;a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2Flagrangian_lesyng.F;fp=source%2Funres%2Fsrc_MD-M%2Flagrangian_lesyng.F;h=de3858a336501be55d1a846fb0f2d5ecbfc0608d;hp=33980918f2ae2dca842dacf9f0659b9cad4d1a3b;hb=9453fc761eb545fcb727824c94d012dbf3931951;hpb=6f521277aa2a382d409f5189957283b0998b0d07

diff --git a/source/unres/src_MD-M/lagrangian_lesyng.F b/source/unres/src_MD-M/lagrangian_lesyng.F
index 3398091..de3858a 100644
--- a/source/unres/src_MD-M/lagrangian_lesyng.F
+++ b/source/unres/src_MD-M/lagrangian_lesyng.F
@@ -182,6 +182,7 @@ c sites (dimen1)
       endif
 #endif
 c      write (iout,*) "dimen",dimen," dimen1",dimen1," dimen3",dimen3
+       write (iout,*) "The number of degrees of freedom ",dimen3
 c  Zeroing out A and fricmat
       do i=1,dimen
         do j=1,dimen