#include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #define endl codeforces #define ALL(v) std::begin(v), std::end(v) #define ALLR(v) std::rbegin(v), std::rend(v) using ll = std::int64_t; using ull = std::uint64_t; using pii = std::pair; using tii = std::tuple; using pll = std::pair; using tll = std::tuple; using size_type = ssize_t; template using vec = std::vector; template using vvec = vec>; template const T& var_min(const T &t) { return t; } template const T& var_max(const T &t) { return t; } template const T& var_min(const T &t, const Tail&... tail) { return std::min(t, var_min(tail...)); } template const T& var_max(const T &t, const Tail&... tail) { return std::max(t, var_max(tail...)); } template void chmin(T &t, const Tail&... tail) { t = var_min(t, tail...); } template void chmax(T &t, const Tail&... tail) { t = var_max(t, tail...); } template struct multi_dim_array { using type = std::array::type, Head>; }; template struct multi_dim_array { using type = std::array; }; template using mdarray = typename multi_dim_array::type; template void fill_seq(T &t, F f, Args... args) { if constexpr (std::is_invocable::value) { t = f(args...); } else { for (size_type i = 0; i < t.size(); i++) fill_seq(t[i], f, args..., i); } } template vec make_v(size_type sz) { return vec(sz); } template auto make_v(size_type hs, Tail&&... ts) { auto v = std::move(make_v(std::forward(ts)...)); return vec(hs, v); } namespace init__ { struct InitIO { InitIO() { std::cin.tie(nullptr); std::ios_base::sync_with_stdio(false); std::cout << std::fixed << std::setprecision(30); } } init_io; } template T ceil_pow2(T bound) { T ret = 1; while (ret < bound) ret *= 2; return ret; } template T ceil_div(T a, T b) { return a / b + !!(a % b); } namespace graph { using Node = ll; using Weight = ll; using Edge = std::pair; template struct Graph : public vvec { using vvec::vvec; void add_edge(Node f, Node t, Weight w = 1) { (*this)[f].emplace_back(t, w); if (!Directed) (*this)[t].emplace_back(f, w); } Graph build_inv() const { Graph ret(this->size()); for (Node i = 0; i < this->size(); i++) { for (const Edge &e : (*this)[i]) { Node j; Weight w; std::tie(j, w) = e; if (!Directed && j < i) continue; ret.add_edge(j, i, w); } } return ret; } }; template class dst_iterator { Iterator ite; public: dst_iterator(Iterator ite) : ite(ite) { } bool operator ==(const dst_iterator &oth) const { return ite == oth.ite; } bool operator !=(const dst_iterator &oth) const { return !(*this == oth); } bool operator <(const dst_iterator &oth) const { return ite < oth.ite; } bool operator >(const dst_iterator &oth) const { return ite > oth.ite; } bool operator <=(const dst_iterator &oth) const { return ite <= oth.ite; } bool operator >=(const dst_iterator &oth) const { return ite >= oth.ite; } const Node& operator *() { return ite->first; } const Node& operator *() const { return ite->first; } dst_iterator operator ++() { ++ite; return ite; } }; class dst_iteration { using ite_type = vec::const_iterator; const vec &edges; public: dst_iteration(const vec &edges) : edges(edges) { } auto begin() const { return dst_iterator(edges.cbegin()); } auto end() const { return dst_iterator(edges.cend()); } }; class dst_reverse_iteration { using ite_type = vec::const_reverse_iterator; const vec &edges; public: dst_reverse_iteration(const vec &edges) : edges(edges) { } auto begin() const { return dst_iterator(edges.crbegin()); } auto end() const { return dst_iterator(edges.crend()); } }; dst_iteration dst(const vec &edges) { return dst_iteration(edges); } dst_reverse_iteration rdst(const vec &edges) { return dst_reverse_iteration(edges); } } struct Solver { ll n, q, c; graph::Graph tree; vec xv, dv; vvec dp, dists; std::priority_queue, std::greater> pq; const ll inf = 5e15; Solver(ll n, ll q, ll c) : n(n), q(q), c(c), tree(n), xv(q), dv(n, inf), dp(std::move(make_v(q, n))), dists(n) { for (ll i = 1; i < n; i++) { ll u, v, l; std::cin >> u >> v >> l; tree.add_edge(u - 1, v - 1, l); } for (ll &e : xv) { std::cin >> e; e--; } fill_seq(dp, [&](ll i, ll j) { return (i == 0 && j == xv[0]) ? 0 : inf; }); } void dfs(ll cur, ll pre, ll d, vec &dist) { dist[cur] = d; for (auto [ nxt, cost ] : tree[cur]) { if (nxt == pre) continue; dfs(nxt, cur, d + cost, dist); } } void make_dist(ll root) { if (!dists[root].empty()) return; dists[root].resize(n); dfs(root, -1, 0, dists[root]); } void update(const ll idx) { const ll src = xv[idx], dst = xv[idx + 1]; make_dist(src); make_dist(dst); const auto &d_src = dists[src]; const auto &d_dst = dists[dst]; for (ll i = 0; i < n; i++) { ll d = dp[idx][i] + std::min(d_src[i], c); dv[i] = d; pq.emplace(d, i); } while (pq.size()) { auto [ d, cur ] = pq.top(); pq.pop(); if (dv[cur] < d) continue; for (auto [ nxt, cost ] : tree[cur]) { ll nd = d + cost; if (dv[nxt] <= nd) continue; dv[nxt] = nd; pq.emplace(nd, nxt); } } // don't jump auto tmp = d_src[dst]; for (ll i = 0; i < n; i++) { chmin(dp[idx + 1][i], dp[idx][i] + tmp); } // jump for (ll i = 0; i < n; i++) { chmin(dp[idx + 1][i], dv[i] + d_dst[i]); } } ll solve() { for (ll i = 0; i + 1 < q; i++) update(i); return *std::min_element(ALL(dp[q - 1])); } }; int main() { ll n, q, c; std::cin >> n >> q >> c; Solver solver(n, q, c); std::cout << solver.solve() << "\n"; return 0; }