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=56e9223770e1d8673c64e0ba48e3ad6c6a8b7445;hp=ba87bd2655ec38ea3bca3f44ec4e55a6917aa188;hpb=0ff0f56e5628a7493beb4a8e6facea26f5b852b2;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