Merge pull request #13 from matthewleon/lazy

newtype derive Lazy instance

Author: garyb

src/Data/Identity.purs

@@ -5,6 +5,7 @@ import Prelude
 import Control.Alt (class Alt)
 import Control.Comonad (class Comonad)
 import Control.Extend (class Extend)
+import Control.Lazy (class Lazy)
 
 import Data.Foldable (class Foldable)
 import Data.Functor.Invariant (class Invariant, imapF)
@@ -40,6 +41,8 @@ derive newtype instance commutativeRingIdentity :: CommutativeRing a => Commutat
 
 derive newtype instance fieldIdentity :: Field a => Field (Identity a)
 
+derive newtype instance lazyIdentity :: Lazy a => Lazy (Identity a)
+
 instance showIdentity :: Show a => Show (Identity a) where
   show (Identity x) = "(Identity " <> show x <> ")"