module Fail where

f x = foldl (+) [1 .. x] 'a'