Add Serialize instance for Crop layer
commitad97b6ddae20dafcc38f54c627bfd8516005a30c
authorsholland1 <holland_s91@yahoo.com>
dateFri 30 Mar 2018, 23:20 (9 years ago)
parentb1a6e16
src/Grenade/Layers/Crop.hs+5
@@ -18,6 +18,7 @@ module Grenade.Layers.Crop (
1818
1919import Data.Maybe
2020import Data.Proxy
21+import Data.Serialize
2122import Data.Singletons.TypeLits
2223import GHC.TypeLits
2324
@@ -42,6 +43,10 @@ instance UpdateLayer (Crop l t r b) where
4243 runUpdate _ x _ = x
4344 createRandom = return Crop
4445
46+instance Serialize (Crop l t r b) where
47+ put _ = return ()
48+ get = return Crop
49+
4550-- | A two dimentional image can be cropped.
4651instance ( KnownNat cropLeft
4752 , KnownNat cropTop