A function to delete a fork from a trajectory

At least one `const`, maybe two?