arcos = 0.5D0*(PI-DSIGN(1.0D0,X)*PI)
[unres.git] / source / wham / src-M / COMMON.ENEPS
1       double precision eneps_temp(2,nntyp)
2       integer n_ene
3       common /weightder/ eneps_temp,n_ene