Skip to content
Snippets Groups Projects
Commit 96ea9a75 authored by Hans-Peter Deifel's avatar Hans-Peter Deifel
Browse files

Add Compare.Types module

parent 153cab14
Branches
No related tags found
No related merge requests found
...@@ -25,6 +25,7 @@ library ...@@ -25,6 +25,7 @@ library
, Search.Types , Search.Types
, Search.EpsilonElimination , Search.EpsilonElimination
, Protocol , Protocol
, Compare.Types
, Compare.Matching , Compare.Matching
hs-source-dirs: src hs-source-dirs: src
build-depends: base >=4.9 && <4.10 build-depends: base >=4.9 && <4.10
...@@ -37,6 +38,7 @@ library ...@@ -37,6 +38,7 @@ library
, bytestring >= 0.10 && <0.11 , bytestring >= 0.10 && <0.11
, mtl >= 2.2 && <2.3 , mtl >= 2.2 && <2.3
, process >= 1.4 && <1.5 , process >= 1.4 && <1.5
, fgl >= 5.5 && < 5.6
default-language: Haskell2010 default-language: Haskell2010
ghc-options: -Wall -fdefer-typed-holes -fno-warn-name-shadowing ghc-options: -Wall -fdefer-typed-holes -fno-warn-name-shadowing
......
module Compare.Types
( Graph(..)
) where
import qualified Data.Graph.Inductive as G
-- | Pointed graph
data Graph node edge = Graph
{ graph :: G.Gr node edge
, point :: G.Node
}
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment