{-# htermination enumFrom :: Char -> [Char] #-}