From 9878b60c2076362e2c2352551df0b8205cecaf9a Mon Sep 17 00:00:00 2001
From: Daniel Firth <daniel.firth@iohk.io>
Date: Sun, 8 Dec 2024 17:26:11 +0000
Subject: [PATCH] Remove unused function isInitialSnapshot

---
 hydra-tx/src/Hydra/Tx/Snapshot.hs | 7 -------
 1 file changed, 7 deletions(-)

diff --git a/hydra-tx/src/Hydra/Tx/Snapshot.hs b/hydra-tx/src/Hydra/Tx/Snapshot.hs
index 4f510eba96c..3b174956f94 100644
--- a/hydra-tx/src/Hydra/Tx/Snapshot.hs
+++ b/hydra-tx/src/Hydra/Tx/Snapshot.hs
@@ -184,13 +184,6 @@ getSnapshot = \case
       }
   ConfirmedSnapshot{snapshot} -> snapshot
 
--- | Tell whether a snapshot is the initial snapshot coming from the collect-com
--- transaction.
-isInitialSnapshot :: ConfirmedSnapshot tx -> Bool
-isInitialSnapshot = \case
-  InitialSnapshot{} -> True
-  ConfirmedSnapshot{} -> False
-
 instance (Arbitrary tx, Arbitrary (UTxOType tx), IsTx tx) => Arbitrary (ConfirmedSnapshot tx) where
   arbitrary = do
     ks <- arbitrary