Continued the haskell Set Module