Update 10.hs