module Dodge.Path.Translate where

import Dodge.Data.PathGraph

fromEdgeTuple :: (Int, Int, PathEdge) -> PathEdgeNodes
{-# INLINE fromEdgeTuple #-}
fromEdgeTuple (a, b, pe) = PathEdgeNodes a b pe