Silver Cow Party （Dijkstra）

One cow from each of N farms (1 ≤ N ≤ 1000) conveniently numbered 1..N is going to attend the big cow party to be held at farm #X (1 ≤ X ≤ N). A total of M (1 ≤ M≤ 100,000) unidirectional (one-way roads connects pairs of farms; road i requires Ti (1 ≤ Ti ≤ 100) units of time to traverse.

Each cow must walk to the party and, when the party is over, return to her farm. Each cow is lazy and thus picks an optimal route with the shortest time. A cow's return route might be different from her original route to the party since roads are one-way.

Of all the cows, what is the longest amount of time a cow must spend walking to the party and back?

Input

Line 1: Three space-separated integers, respectively: N, M, and X 
Lines 2.. M+1: Line i+1 describes road i with three space-separated integers: Ai,Bi, and Ti. The described road runs from farm Ai to farm Bi, requiring Ti time units to traverse.

Output

Line 1: One integer: the maximum of time any one cow must walk.

Sample Input

4 8 2
1 2 4
1 3 2
1 4 7
2 1 1
2 3 5
3 1 2
3 4 4
4 2 3

Sample Output

10

Hint

Cow 4 proceeds directly to the party (3 units) and returns via farms 1 and 3 (7 units), for a total of 10 time units.

#include<stdio.h>
const int INF=99999999;
int dis[1003];
int dis2[1003];
int book[1003];
int cost[1003][1003];
int mp[1002][1002];
int n,m,x;
int a,b,t;
int mmin;
int cmp(int a, int b){
    return a>b?a:b;
}
void Dijkstra(){
    for(int i=1;i<=n;i++){
        book[i]=0;
        dis[i]=mp[x][i];
    }
    book[x]=1;

    for(int i=1;i<=n-1;i++){
        int temp;
        mmin=INF;
        for(int j=1;j<=n;j++){
            if(book[j]==0&&dis[j]<mmin){
                temp=j;
                mmin=dis[j];
            }
        }
        book[temp]=1;
        for(int k=1;k<=n;k++){
            if(mp[temp][k]<INF){
                if(dis[k]>dis[temp]+mp[temp][k])
                    dis[k]=dis[temp]+mp[temp][k];
            }
        }
    }
}
int main()
{

   while(scanf("%d%d%d",&n,&m,&x)!=EOF){
    for(int i=1;i<=n;i++)
        for(int j=1;j<=n;j++){
            if(i==j)
                mp[i][j]=0;
            else
                mp[i][j]=INF;
        }
    for(int i=1;i<=m;i++){
        scanf("%d%d%d",&a,&b,&t);
        if(mp[a][b]>t)
            mp[a][b]=t;
    }
    Dijkstra();
    for(int i=1;i<=n;i++)
        dis2[i]=dis[i];
    
    for(int i=1;i<=n;i++)   //矩阵置换是沿对角线进行置换
        for(int j=i+1;j<=n;j++){
            int temp;
            temp=mp[j][i];
            mp[j][i]=mp[i][j];
            mp[i][j]=temp;
        }
   
    Dijkstra();
    int ans=-1;
    for(int i=1;i<=n;i++){
        if(i!=x)
        ans=cmp(ans,dis[i]+dis2[i]);
    }
    printf("%d\n",ans);
   }
    return 0;
}