A new yield function for geomaterials