@@ -22,6 +22,7 @@ import Data.List (find, nub)
22import Data.Maybe (fromMaybe, mapMaybe)
22import Data.Maybe (fromMaybe, mapMaybe)
24#if __GLASGOW_HASKELL__ < 710
24#if __GLASGOW_HASKELL__ < 710
25+import Data.Monoid (mempty)
25import Control.Applicative (Applicative(..), (<$>), (<*>))
26import Control.Applicative (Applicative(..), (<$>), (<*>))
27import Control.Monad
28import Control.Monad