getEndNode :: Id -> GS Node
getEndNode i = getEdgeByIdUnsafe i >>= getEndNodeE
getEndNode :: Id -> GS Node
getEndNode i = getEdgeByIdUnsafe i >>= getEndNodeE
getEndNode i = getEdgeByIdUnsafe i >>= getEndNodeE