{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE StrictData #-}
module Dodge.Data.PathGraph where
import Geometry.Data
import Control.Lens
import Data.Graph.Inductive
data PathGraph = PathGraph
    { _pgGraph      :: Gr Point2 Float
    , _pgNodeMap    :: NodeMap Point2
    }

makeLenses ''PathGraph