From 741e26dabbccb5821c79736590ad03286fe04f84 Mon Sep 17 00:00:00 2001 From: Determinant Date: Wed, 31 May 2017 21:23:39 -0400 Subject: one prob left for v9 --- 80-89/83.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to '80-89/83.hs') diff --git a/80-89/83.hs b/80-89/83.hs index f9d9038..0b3517c 100644 --- a/80-89/83.hs +++ b/80-89/83.hs @@ -4,8 +4,7 @@ import Data.List (foldl') import Data.Maybe (fromJust) import Control.Monad (foldM, mapM) -data Graph a = Graph [a] [(a, a)] - deriving (Show, Eq) +data Graph a = Graph [a] [(a, a)] deriving (Show, Eq) k4 = Graph ['a', 'b', 'c', 'd'] [('a', 'b'), ('b', 'c'), ('c', 'd'), -- cgit v1.2.3