wham correction

diff --git a/source/wham/src-HCD-5D/include_unres/COMMON.SETUP b/source/wham/src-HCD-5D/include_unres/COMMON.SETUP
index 5039116..1edc7c3 100644 (file)
--- a/source/wham/src-HCD-5D/include_unres/COMMON.SETUP
+++ b/source/wham/src-HCD-5D/include_unres/COMMON.SETUP
@@ -1,14 +1,14 @@
       integer king,idint,idreal,idchar,is_done
       parameter (king=0,idint=1105,idreal=1729,idchar=1597,is_done=1)
       integer me,cg_rank,fg_rank,fg_rank1,nodes,Nprocs,nfgtasks,kolor,
-     & koniec(0:maxprocs-1),WhatsUp,ifinish(maxprocs-1),CG_COMM,FG_COMM,
+     & koniec(0:maxprocs-1),ifinish(maxprocs-1),CG_COMM,FG_COMM,
      & FG_COMM1,CONT_FROM_COMM,CONT_TO_COMM,lentyp(0:maxprocs-1),
      & kolor1,key1,nfgtasks1,MyRank,
      & max_gs_size
       logical yourjob, finished, cgdone
       common/setup/me,MyRank,cg_rank,fg_rank,fg_rank1,nodes,Nprocs,
      & nfgtasks,nfgtasks1,
-     & max_gs_size,kolor,koniec,WhatsUp,ifinish,CG_COMM,FG_COMM,
+     & max_gs_size,kolor,koniec,ifinish,CG_COMM,FG_COMM,
      & FG_COMM1,CONT_FROM_COMM,CONT_TO_COMM,lentyp
       integer MPI_UYZ,MPI_UYZGRAD,MPI_MU,MPI_MAT1,MPI_MAT2,
      & MPI_THET,MPI_GAM,