working cluster for nano parameters
[unres.git] / source / cluster / wham / src-M / COMMON.FFIELD
index fa85436..141e0c4 100644 (file)
@@ -4,11 +4,13 @@ C calculations and defines weights of various energy terms.
 C 12/1/95 wcorr added
 C-----------------------------------------------------------------------
       double precision wsc,wscp,welec,wstrain,wtor,wtor_d,wang,wscloc,
+     &  wtube,
      &   wcorr,wcorr4,wcorr5,wcorr6,wsccor,wel_loc,wturn3,wturn4,wturn6,
      &    wvdwpp,wbond,weights,scal14,scalscp,cutoff_corr,delt_corr,
      &    r0_corr,wliptran
       integer ipot,n_ene_comp,rescale_mode
       common /ffield/ wsc,wscp,welec,wstrain,wtor,wtor_d,wang,wscloc,
+     &  wtube,
      &   wcorr,wcorr4,wcorr5,wcorr6,wsccor,wel_loc,wturn3,wturn4,wturn6,
      &    wvdwpp,wbond,wliptran,weights(max_ene),scalscp,
      &    scal14,cutoff_corr,delt_corr,r0_corr,ipot,n_ene_comp,