#include using namespace std; using int64 = long long; const int64 INF = 1LL << 60; template< typename T > struct edge { int src, to; T cost; edge(int to, T cost) : src(-1), to(to), cost(cost) {} edge(int src, int to, T cost) : src(src), to(to), cost(cost) {} edge &operator=(const int &x) { to = x; return *this; } operator int() const { return to; } }; template< typename T > using Edges = vector< edge< T > >; template< typename T > using WeightedGraph = vector< Edges< T > >; using UnWeightedGraph = vector< vector< int > >; template< typename T > using Matrix = vector< vector< T > >; template< typename T > vector< T > dijkstra(WeightedGraph< T > &g, int s) { const auto INF = numeric_limits< T >::max(); vector< T > dist(g.size(), INF); using Pi = pair< T, int >; priority_queue< Pi, vector< Pi >, greater< Pi > > que; dist[s] = 0; que.emplace(dist[s], s); while(!que.empty()) { T cost; int idx; tie(cost, idx) = que.top(); que.pop(); if(dist[idx] < cost) continue; for(auto &e : g[idx]) { auto next_cost = cost + e.cost; if(dist[e.to] <= next_cost) continue; dist[e.to] = next_cost; que.emplace(dist[e.to], e.to); } } return dist; } int main() { int N, M, L; vector< int64 > v[2000]; cin >> N >> M >> L; --L; WeightedGraph< int64 > g(N); vector< pair< int, int > > ex; for(int i = 0; i < N; i++) { int p; cin >> p; if(p > 0) ex.emplace_back(i, p); } for(int i = 0; i < M; i++) { int a, b, c; cin >> a >> b >> c; --a, --b; g[a].emplace_back(b, c); g[b].emplace_back(a, c); } for(int k = 0; k < N; k++) { v[k] = dijkstra(g, k); } int64 ret = INF; for(int i = 0; i < N; i++) { int64 cost = 0, pv = 0; bool exist = false; for(auto e : ex) { if(e.first == L) exist = true; cost += v[i][e.first] * 2 * e.second; } if(exist) { cost -= v[i][L]; } else { for(auto e : ex) { pv = max(pv, v[i][e.first] - v[L][e.first]); } } ret = min(ret, cost - pv); } cout << ret << endl; }