Skip to content

Instantly share code, notes, and snippets.

{-# LANGUAGE RankNTypes #-}
import Control.Comonad.Cofree
import Control.Lens hiding ((:<))
import qualified Data.Map as Map
import Data.Map (Map)
import Prelude hiding (lookup)
import Data.Maybe (isJust)
import Test.QuickCheck