Adam's changes from nostromo to wham with homology
[unres.git] / source / wham / src / COMMON.CONTROL
index ed0f98b..209c22a 100644 (file)
@@ -1,6 +1,6 @@
       integer iscode,indpdb,outpdb,outmol2,icomparfunc,pdbint,
      & ensembles,constr_dist,constr_homology,homol_nset,
-     & iset
+     & iset,ihset
       real*8 waga_homology
       real*8 waga_dist, waga_angle, waga_theta, waga_d, dist_cut
       logical refstr,pdbref,punch_dist,print_rms,caonly,verbose,
@@ -11,5 +11,5 @@
      & merge_helices,bxfile,cxfile,histfile,entfile,zscfile,rmsrgymap,
      & ensembles,with_dihed_constr,check_conf,histout,constr_dist,
      & constr_homology,out1file,homol_nset
-      common /homol/  waga_homology(MaxProcs/20),
-     & waga_dist,waga_angle,waga_theta,waga_d,dist_cut,iset
+      common /homol/  waga_homology(maxR),
+     & waga_dist,waga_angle,waga_theta,waga_d,dist_cut,iset,ihset