A computational constitutive model for rock in hydrocode