haskell ten and seven