diff --git a/src/ZcashHaskell/Types.hs b/src/ZcashHaskell/Types.hs
index f87444d..8b8a90b 100644
--- a/src/ZcashHaskell/Types.hs
+++ b/src/ZcashHaskell/Types.hs
@@ -723,7 +723,7 @@ instance FromJSON OrchardAction where
       pure $ OrchardAction n r c ephKey encText outText cval a
 
 data MerklePath = MerklePath
-  { mp_position :: !Int64
+  { mp_position :: !Int32
   , mp_path :: ![HexString]
   } deriving stock (Eq, Prelude.Show, GHC.Generic)
     deriving anyclass (SOP.Generic, SOP.HasDatatypeInfo)