A model potential for chemisorption: H2+W(001)