begin implementatie abc in haskell