An accurate model to predict sulfur concentration at anhydrite saturation in silicate melts