X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fcluster%2Fwham%2Fsrc-M%2Fmain_clust.F;fp=source%2Fcluster%2Fwham%2Fsrc-M%2Fmain_clust.F;h=b230c017064125ddbbaec27a7a3f41c8a795832f;hb=ce23246258bf50c33a76d6b2685ff2a3f76f896d;hp=892a6c729a115533ffc931a656d971ecd7157760;hpb=d49e46757e9d141bbeff7e406cbc839fe6ab3952;p=unres.git

diff --git a/source/cluster/wham/src-M/main_clust.F b/source/cluster/wham/src-M/main_clust.F
index 892a6c7..b230c01 100644
--- a/source/cluster/wham/src-M/main_clust.F
+++ b/source/cluster/wham/src-M/main_clust.F
@@ -63,6 +63,7 @@ C
       call openunits
       call parmread
       call read_control
+      write(iout,*) "afert readcontrol"
       call molread
 c      if (refstr) call read_ref_structure(*30)
       do i=1,nres