From ad97b6ddae20dafcc38f54c627bfd8516005a30c Mon Sep 17 00:00:00 2001
From: sholland1 <holland_s91@yahoo.com>
Date: Fri, 30 Mar 2018 23:20:52 -0500
Subject: [PATCH] Add Serialize instance for Crop layer

---
 src/Grenade/Layers/Crop.hs | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/src/Grenade/Layers/Crop.hs b/src/Grenade/Layers/Crop.hs
index 4b8b759..11d0c73 100644
--- a/src/Grenade/Layers/Crop.hs
+++ b/src/Grenade/Layers/Crop.hs
@@ -18,6 +18,7 @@ module Grenade.Layers.Crop (
 
 import           Data.Maybe
 import           Data.Proxy
+import           Data.Serialize
 import           Data.Singletons.TypeLits
 import           GHC.TypeLits
 
@@ -42,6 +43,10 @@ instance UpdateLayer (Crop l t r b) where
   runUpdate _ x _ = x
   createRandom = return Crop
 
+instance Serialize (Crop l t r b) where
+  put _ = return ()
+  get = return Crop
+
 -- | A two dimentional image can be cropped.
 instance ( KnownNat cropLeft
          , KnownNat cropTop