X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fcluster%2Fwham%2Fsrc-M%2Fwork_partition.F;h=f29b01f2c4b35673960e93d976e64024353de6e0;hb=eee3a1e3f0ccd607d4ca71f73afaea1fb952a05c;hp=ba87bd2655ec38ea3bca3f44ec4e55a6917aa188;hpb=1c3ad78852a0a2ad058457910934eb8ca35174a8;p=unres.git

diff --git a/source/cluster/wham/src-M/work_partition.F b/source/cluster/wham/src-M/work_partition.F
index ba87bd2..f29b01f 100644
--- a/source/cluster/wham/src-M/work_partition.F
+++ b/source/cluster/wham/src-M/work_partition.F
@@ -80,7 +80,7 @@ C     &        "Processor",i," indstart",indstart(i),
 C     &        " indend",indend(i)," count",scount(i)
 C         enddo
       endif 
-      write(iout,*) "just before leave"
+c      write(iout,*) "just before leave"
       return
       end
 #endif