Update 22-recursion.hs