a haskell parsec package practice