Create hanoid.hs