Fixed-Distance Hamiltonian Monte Carlo