> module Puncs
>        (puncs)
>        where

> puncs :: [Char]
> puncs = [','
>         ,'.'
>         ,':'
>         ,';'
>         ,'?'
>         ,'!'
>         ,')']