First Principles Calculation on Adsorption of S on Fe(100)