buildSafeBoardMap :: Activity -> BoardMap
buildSafeBoardMap activity =
    let heroes = activity^.activityGame.gameHeroes
        buildSafeHeroBoardMap hero =
          pathDijkstra (dijkstra (adjacentSafe activity start) manhattan start)
          where
            start = hero^.heroPos
        makeSafeHeroBoardMap hero@(Hero {_heroId = hId}) = (hId, buildSafeHeroBoardMap hero)
    in M.fromList $ parMap rpar makeSafeHeroBoardMap heroes
buildSafeBoardMap :: Activity -> BoardMap
buildSafeBoardMap activity =
    let heroes = activity^.activityGame.gameHeroes
        buildSafeHeroBoardMap hero =
          pathDijkstra (dijkstra (adjacentSafe activity start) manhattan start)
          where
            start = hero^.heroPos
        makeSafeHeroBoardMap hero@(Hero {_heroId = hId}) = (hId, buildSafeHeroBoardMap hero)
    in M.fromList $ parMap rpar makeSafeHeroBoardMap heroes
buildSafeBoardMap activity =
    let heroes = activity^.activityGame.gameHeroes
        buildSafeHeroBoardMap hero =
          pathDijkstra (dijkstra (adjacentSafe activity start) manhattan start)
          where
            start = hero^.heroPos
        makeSafeHeroBoardMap hero@(Hero {_heroId = hId}) = (hId, buildSafeHeroBoardMap hero)
    in M.fromList $ parMap rpar makeSafeHeroBoardMap heroes