Earthquake Risk Model of Switzerland