diff --git a/src/Data/UniformPair.hs b/src/Data/UniformPair.hs
--- a/src/Data/UniformPair.hs
+++ b/src/Data/UniformPair.hs
@@ -1,4 +1,5 @@
-{-# LANGUAGE CPP, DeriveFunctor, DeriveFoldable, DeriveTraversable #-}
+{-# LANGUAGE CPP, DeriveDataTypeable, DeriveFunctor, DeriveFoldable,
+             DeriveTraversable #-}
 {-# OPTIONS_GHC -Wall #-}
 #if MIN_VERSION_base(4,9,0)
 #define LIFTED_FUNCTOR_CLASSES 1
@@ -34,6 +35,7 @@
   ( Pair(..), fstP,sndP, firstP, secondP, getP, onElemP, swapP, compareSwap
   ) where
 
+import Data.Data (Data, Typeable)
 import Data.Monoid (Monoid(..))
 import Data.Semigroup (Semigroup (..))
 import Data.Functor ((<$>))
@@ -48,7 +50,8 @@
 infix 1 :#
 
 -- | Uniform pairs
-data Pair a = a :# a deriving (Eq, Ord, Show, Functor, Foldable,Traversable)
+data Pair a = a :# a
+  deriving (Data, Eq, Ord, Show, Functor, Foldable, Traversable, Typeable)
 
 -- instance Traversable Pair where sequenceA (u :# v) = (:#) <$> u <*> v
 
diff --git a/uniform-pair.cabal b/uniform-pair.cabal
--- a/uniform-pair.cabal
+++ b/uniform-pair.cabal
@@ -1,5 +1,5 @@
 Name:                uniform-pair
-Version:             0.1.13
+Version:             0.1.14
 Cabal-Version:       >= 1.6
 Synopsis:            Uniform pairs with class instances
 Category:            Data