#include <iostream> #include <cstdio> #include <cstring> #include <cmath> #include <set> #include <vector> #include <map> #include <queue> #include <set> #include <algorithm> #include <limits> using namespace std; typedef long long LL; const int MAXN=1e+4; const int MAXM=1e+5; const int INF = numeric_limits<int>::max(); const LL LL_INF= numeric_limits<LL>::max(); struct Edge { int from,to,ci,next; Edge(){} Edge(int _from,int _to,int _ci,int _next):from(_from),to(_to),ci(_ci),next(_next){} }e[MAXM],cp[MAXM]; int head[MAXN],tot; int dis[MAXN]; int top,sta[MAXN],cur[MAXN],tcur[MAXN]; inline void init(){ memset(head,-1,sizeof(head)); tot=0; } inline void AddEdge(int u,int v,int ci0,int ci1=0){ e[tot]=Edge(u,v,ci0,head[u]); head[u]=tot++; e[tot]=Edge(v,u,ci1,head[v]); head[v]=tot++; } inline bool bfs(int st,int et){ memset(dis,0,sizeof(dis)); dis[st]=1; queue <int> q; q.push(st); while(!q.empty()){ int now=q.front(); q.pop(); for(int i=head[now];i!=-1;i=e[i].next){ int next=e[i].to; if(e[i].ci&&!dis[next]){ dis[next]=dis[now]+1; if(next==et)return true; q.push(next); } } } return false; } LL Dinic(int st,int et){ LL ans=0; while(bfs(st,et)){ top=0; memcpy(cur,head,sizeof(head)); int u=st,i; while(1){ if(u==et){ int pos,minn=INF; for(i=0;i<top;i++) { if(minn>e[sta[i]].ci){ minn=e[sta[i]].ci; pos=i; } } for(i=0;i<top;i++){ e[sta[i]].ci-=minn; e[sta[i]^1].ci+=minn; } top=pos; u=e[sta[top]].from; ans+=minn; } for(i=cur[u];i!=-1;cur[u]=i=e[i].next) if(e[i].ci&&dis[u]+1==dis[e[i].to])break; if(cur[u]!=-1){ sta[top++]=cur[u]; u=e[cur[u]].to; } else { if(top==0)break; dis[u]=0; u=e[sta[--top]].from; } } } return ans; } int vis[MAXN]; void bfs1(){ memset(vis,0,sizeof(vis)); queue <int> q; q.push(1); vis[1]=1; while(!q.empty()){ int now=q.front(); q.pop(); for(int i=head[now];~i;i=e[i].next){ if(vis[e[i].to]||e[i].ci==0)continue; vis[e[i].to]=1; q.push(e[i].to); } } } int main() { int t,n,m; scanf("%d",&t); while(t--){ scanf("%d%d",&n,&m); init(); for(int i=0,x,y,v;i<m;i++){ scanf("%d%d%d",&x,&y,&v); AddEdge(x,y,v); } LL ans=Dinic(1,n); bfs1(); int ttot=tot; memcpy(cp,e,sizeof(e)); memcpy(tcur,head,sizeof(cur)); int st1=n+1; int ma1=0,ma2=0; for(int i=2;i<n;i++){ if(vis[i]){ AddEdge(i,st1,INF); int t=Dinic(1,st1); if(t>ma1)ma1=t; memcpy(e,cp,sizeof(e)); memcpy(head,tcur,sizeof(tcur)); tot=ttot; } else { AddEdge(st1,i,INF); int t=Dinic(st1,n); if(t>ma2)ma2=t; memcpy(e,cp,sizeof(e)); memcpy(head,tcur,sizeof(tcur)); tot=ttot; } } printf("%I64d\n",ans+min(ma1,ma2)); } scanf(" "); return 0; }
|