Implement succubus copulation