source/wham/src-M/include_unres/COMMON.WEIGHTS

   1       double precision ww,ww0,ww_low,ww_up,ww_orig,x_orig,
   2      &  epp_low,epp_up,rpp_low,rpp_up,elpp6_low,elpp6_up,elpp3_low,
   3      &  elpp3_up,b_low,b_up,epscp_low,epscp_up,rscp_low,rscp_up,
   4      &  x_up,x_low,xm,xm1,xm2,epss_low,epss_up,epsp_low,epsp_up
   5       integer imask,mask_elec,mask_fourier,mod_fourier,mask_scp,indz,iw,
   6      &  nsingle_sc,npair_sc,ityp_ssc,ityp_psc
   7       logical mod_other_params,mod_elec,mod_scp,mod_side
   8       common /chujec/ ww(max_ene),ww0(max_ene),ww_low(max_ene),
   9      &  ww_up(max_ene),ww_orig(max_ene),x_orig(max_paropt),
  10      &  epp_low(2,2),epp_up(2,2),rpp_low(2,2),rpp_up(2,2),
  11      &  elpp6_low(2,2),elpp6_up(2,2),elpp3_low(2,2),elpp3_up(2,2),
  12      &  b_low(13,3),b_up(13,3),x_up(max_paropt),x_low(max_paropt),
  13      &  epscp_low(0:ntyp,2),epscp_up(0:ntyp,2),rscp_low(0:ntyp,2),
  14      &  rscp_up(0:ntyp,2),epss_low(ntyp),epss_up(ntyp),epsp_low(nntyp),
  15      &  epsp_up(nntyp),
  16      &  xm(max_paropt,0:maxprot),xm1(max_paropt,0:maxprot),
  17      &  xm2(max_paropt,0:maxprot),
  18      &  imask(max_ene),nsingle_sc,npair_sc,ityp_ssc(ntyp),
  19      &  ityp_psc(2,nntyp),mask_elec(2,2,4),
  20      &  mask_fourier(13,3),
  21      &  mask_scp(0:ntyp,2,2),mod_other_params,mod_fourier(0:3),
  22      &  mod_elec,mod_scp,mod_side,indz(maxbatch+1,maxprot),iw(max_ene)