X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2FCOMMON.FFIELD;h=44aa937b3fdfa67637b055534e579b6e6180c0fb;hb=d24fd92f8762d3b48a94c699ef90e0ab37d3c204;hp=a63fe780664ecfae02aded6013745dd896583f1a;hpb=c7a96454a5265471d175bbe066071ac41c8b55c3;p=unres.git diff --git a/source/unres/src_MD-M/COMMON.FFIELD b/source/unres/src_MD-M/COMMON.FFIELD index a63fe78..44aa937 100644 --- a/source/unres/src_MD-M/COMMON.FFIELD +++ b/source/unres/src_MD-M/COMMON.FFIELD @@ -3,10 +3,14 @@ C The following COMMON block selects the type of the force field used in C calculations and defines weights of various energy terms. C 12/1/95 wcorr added C----------------------------------------------------------------------- - integer n_ene_comp,rescale_mode + integer n_ene_comp,rescale_mode,ipot + double precision wsc,wscp,welec,wbond,wstrain,wtor,wtor_d,wang, + & wscloc,wcorr,wcorr4,wcorr5,wcorr6,wsccor,wel_loc,wturn3,wturn4, + & wturn6,wvdwpp,weights,wliptran,wsaxs,temp0, + & scal14,cutoff_corr,delt_corr,r0_corr common /ffield/ wsc,wscp,welec,wbond,wstrain,wtor,wtor_d,wang, & wscloc,wcorr,wcorr4,wcorr5,wcorr6,wsccor,wel_loc,wturn3,wturn4, - & wturn6,wvdwpp,weights(n_ene),wliptran,temp0, + & wturn6,wvdwpp,weights(n_ene),wliptran,wsaxs,temp0, & scal14,cutoff_corr,delt_corr,r0_corr,ipot,n_ene_comp, & rescale_mode common /potentials/ potname(5)