- real*8 odl(max_template,maxdim),sigma_odl(max_template,maxdim),
+ real*8 odl(max_template,maxdim_cont),
+ & sigma_odl(max_template,maxdim_cont),
& dih(max_template,maxres),sigma_dih(max_template,maxres),
- & sigma_odlir(max_template,maxdim)
+ & sigma_odlir(max_template,maxdim_cont)
c
c Specification of new variables used in subroutine e_modeller
c modified by FP (Nov.,2014)
& sigma_d(max_template,maxres)
c
- integer ires_homo(maxdim),jres_homo(maxdim)
+ integer ires_homo(maxdim_cont),jres_homo(maxdim_cont)
double precision
& Ucdfrag,Ucdpair,dUdconst(3,0:MAXRES),Uconst,