An energy-based ghost-force-free multivariate coupling scheme for bond-based peridynamics and classical continuum mechanics. (December 2020)