let astar cave src dst dist =
       pathfindingloop cave src dst astar' astar'' dist