@@ -13,27 +13,31 @@ module Data.Patch
1313 , module X
1414 ) where
1515
16+import Control.Applicative
17+import Data.Functor.Const (Const (..))
18+import Data.Functor.Identity
1619import Data.Map.Monoidal (MonoidalMap)
20+import Data.Proxy
1721#if !MIN_VERSION_base(4,9,0)
1822import Data.Semigroup (Semigroup (..), (<>))
1923#endif
24+import GHC.Generics
2025
2126import Data.Patch.Class as X
2227import Data.Patch.DMap as X hiding (getDeletions)
23−import Data.Patch.DMapWithMove as X (PatchDMapWithMove, const2PatchDMapWithMoveWith, mapPatchDMapWithMove,
24− patchDMapWithMoveToPatchMapWithMoveWith,
25− traversePatchDMapWithMoveWithKey, unPatchDMapWithMove,
26− unsafePatchDMapWithMove, weakenPatchDMapWithMoveWith)
28+import Data.Patch.DMapWithMove as X
29+ ( PatchDMapWithMove, const2PatchDMapWithMoveWith, mapPatchDMapWithMove
30+ , patchDMapWithMoveToPatchMapWithMoveWith
31+ , traversePatchDMapWithMoveWithKey, unPatchDMapWithMove
32+ , unsafePatchDMapWithMove, weakenPatchDMapWithMoveWith
33+ )
2734import Data.Patch.IntMap as X hiding (getDeletions)
2835import Data.Patch.Map as X
29−import Data.Patch.MapWithMove as X (PatchMapWithMove, patchMapWithMoveNewElements,
30− patchMapWithMoveNewElementsMap, unPatchMapWithMove,
31− unsafePatchMapWithMove)
32−import GHC.Generics
33−import Data.Functor.Identity
34−import Data.Functor.Const
35−import Data.Proxy
36−import Control.Applicative
36+import Data.Patch.MapWithMove as X
37+ ( PatchMapWithMove, patchMapWithMoveNewElements
38+ , patchMapWithMoveNewElementsMap, unPatchMapWithMove
39+ , unsafePatchMapWithMove
40+ )
3741
3842-- | A 'Group' is a 'Monoid' where every element has an inverse.
3943class (Semigroup q, Monoid q) => Group q where