A Constitutive Model with a Historiotropic Yield Surface for Sands