Haskell implementation of AMP