1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
|
#include<iostream>
#include<cstdio>
#include<vector>
#include<cstring>
using namespace std;
long long read()
{
long long x=0,f=1; char c=getchar();
while(!isdigit(c)){if(c=='-') f=-1;c=getchar();}
while(isdigit(c)){x=x*10+c-'0';c=getchar();}
return x*f;
}
const int N=2*100+10;
const int inf=0x3f3f3f3f;
struct edge
{
int t,w;
edge (int x=0,int y=0)
{
t=x,w=y;
}
};
vector <edge> e[2][N];
edge e2[N];
int n,m,r,id[N],cnt,t_now;
bool vis[N],gone[N],IsNew[N];
int mstack[N],top;
int dfs(int now)
{
int t_ans=0;
mstack[++top]=now;
vis[now]=gone[now]=true;
if(vis[e2[now].t]==true)
{
cnt++;
while(mstack[top+1]!=e2[now].t)
IsNew[mstack[top]]=true,
id[mstack[top--]]=cnt;
t_ans+=e2[now].w;
}
else if(gone[e2[now].t]==false)
{
t_ans=dfs(e2[now].t);
if(id[now]==cnt)
t_ans+=e2[now].w;
}
vis[now]=false;
return t_ans;
}
int GetID(int x)
{
if(id[x]==0) return x;
return id[x]=GetID(id[x]);
}
int ZhuLiu(int S)
{
int ans=0;
while(1)
{
for(int i=1;i<=n;i++)
e2[GetID(i)].w=inf;
for(int i=1;i<=cnt;i++)
for(int j=0;j<int(e[t_now][i].size());j++)
if(e[t_now][i][j].t!=S and e[t_now][i][j].w<e2[e[t_now][i][j].t].w)
e2[e[t_now][i][j].t].t=i,
e2[e[t_now][i][j].t].w=e[t_now][i][j].w;
for(int i=1;i<=n;i++)
if(i!=S and e2[GetID(i)].w==inf)
return -1;
memset(gone,0,sizeof gone);
memset(vis,0,sizeof vis);
memset(IsNew,0,sizeof IsNew);
int t_ans=0;
for(int i=1;i<=n;i++)
if(gone[GetID(i)]==false and i!=S)
top=0,
t_ans+=dfs(GetID(i)),gone[cnt]=true;
ans+=t_ans;
if(t_ans==0)
{
memset(vis,0,sizeof vis);
bool OK=false;
for(int i=1;i<=n;i++)
if(i!=S and vis[GetID(i)]==false)
OK=max(OK,e2[GetID(i)].t==S),
ans+=e2[GetID(i)].w,vis[GetID(i)]=true;
if(OK==false) ans=-1;
break;
}
int mnext=(t_now+1)%2;
for(int i=1;i<=cnt;i++)
e[mnext][i].clear();
for(int i=1;i<=cnt;i++)
for(int j=0;j<int(e[t_now][i].size());j++)
if(GetID(i)!=GetID(e[t_now][i][j].t))
{
if(IsNew[e[t_now][i][j].t]==true)
e[mnext][GetID(i)].push_back(edge(GetID(e[t_now][i][j].t),e[t_now][i][j].w - e2[e[t_now][i][j].t].w));
else
e[mnext][GetID(i)].push_back(edge(GetID(e[t_now][i][j].t),e[t_now][i][j].w));
}
t_now=(t_now+1)%2;
}
return ans;
}
int main()
{
freopen("4716.in","r",stdin);
freopen("4716.out","w",stdout);
n=read(),m=read(),r=read();
for(int i=1;i<=m;i++)
{
int s=read(),t=read(),w=read();
if(s==t) continue;
e[t_now][s].push_back(edge(t,w));
}
cnt=n;
int ans=ZhuLiu(r);
printf("%d",ans);
return 0;
}
|
