diff --git a/src/ZcashHaskell/Types.hs b/src/ZcashHaskell/Types.hs
index 7a16ff7..7d72f94 100644
--- a/src/ZcashHaskell/Types.hs
+++ b/src/ZcashHaskell/Types.hs
@@ -44,7 +44,7 @@ import Haskoin.Address (Address)
 -- | A seed for generating private keys
 newtype Seed =
   Seed C.ByteString
-  deriving stock (Prelude.Show, GHC.Generic)
+  deriving stock (Eq, Prelude.Show, GHC.Generic)
   deriving anyclass (SOP.Generic, SOP.HasDatatypeInfo)
   deriving anyclass (Data.Structured.Show)
   deriving (BorshSize, ToBorsh, FromBorsh) via AsStruct Seed
@@ -55,7 +55,7 @@ instance ToBytes Seed where
 -- | A mnemonic phrase used to derive seeds
 newtype Phrase =
   Phrase BS.ByteString
-  deriving stock (Prelude.Show, GHC.Generic)
+  deriving stock (Eq, Prelude.Show, GHC.Generic)
   deriving anyclass (SOP.Generic, SOP.HasDatatypeInfo)
   deriving anyclass (Data.Structured.Show)
   deriving (BorshSize, ToBorsh, FromBorsh) via AsStruct Phrase