diff --git a/src/ZcashHaskell/Types.hs b/src/ZcashHaskell/Types.hs
index 7d72f94..2e6cd5c 100644
--- a/src/ZcashHaskell/Types.hs
+++ b/src/ZcashHaskell/Types.hs
@@ -55,7 +55,7 @@ instance ToBytes Seed where
 -- | A mnemonic phrase used to derive seeds
 newtype Phrase =
   Phrase BS.ByteString
-  deriving stock (Eq, Prelude.Show, GHC.Generic)
+  deriving stock (Eq, Prelude.Show, GHC.Generic, Read)
   deriving anyclass (SOP.Generic, SOP.HasDatatypeInfo)
   deriving anyclass (Data.Structured.Show)
   deriving (BorshSize, ToBorsh, FromBorsh) via AsStruct Phrase