let get_dist_alg n = match n with
       | 0 -> PathFinding.dist_simple
       | _ -> PathFinding.dist_euclid