Update 017.hs