#include <bits/stdc++.h>
using namespace std;

typedef pair<int, int> P;
int N, M, L, T[2000];
vector<P> edges[2000];

vector<int64_t> dijkstra(int s){
    vector<int64_t> dist(N);
    for(int i=0; i<N; i++) dist[i] = (i==s ? 0 : 1e18);
    priority_queue<P, vector<P>, greater<P>> que;
    que.push({0, s});
    while(que.size()){
        auto p = que.top(); que.pop();
        int d = p.first, i = p.second;
        if(dist[i] < d) continue;
        for(auto& e : edges[i]){
            int j = e.first, d2 = e.second + d;
            if(dist[j] > d2){
                dist[j] = d2;
                que.push({d2, j});
            }
        }
    }
    return dist;
}

int main(){
    cin >> N >> M >> L;
    L--;
    for(int i=0; i<N; i++) cin >> T[i];
    for(int i=0; i<M; i++){
        int a, b, c;
        cin >> a >> b >> c;
        edges[a-1].push_back({b-1, c});
        edges[b-1].push_back({a-1, c});
    }

    auto distL = dijkstra(L);
    int64_t ans = 1e18;

    for(int s=0; s<N; s++){
        auto dist = dijkstra(s);
        
        int64_t result = 0, save = 0;
        for(int i=0; i<N; i++) result += dist[i] * 2 * T[i];
        for(int i=0; i<N; i++) if(T[i] > 0) save = max(save, dist[i] - distL[i]);
        ans = min(ans, result - save);
    }
    cout << ans << endl;
    return 0;
}