input.txt ch07-toupper-imp.hs