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=5303919700c65ffc77d1e57d865fdc3262d17130;hp=ba87bd2655ec38ea3bca3f44ec4e55a6917aa188;hpb=7006db11d703450fb82ce20cfc53f74614334362;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