次小生成树

#include<bits/stdc++.h>
using namespace std;
#define int long long
#define max(a,b) a>b?a:b
const int N=100010;
int n,m,sum,tot,head[N],f[N][20],dep[N];
int ans=1e18,fa[N],colcnt,mx[N][20],se[N][20];
struct edge{int to,next,w;}e[N<<1];
struct EDGE{int u,v,w,flag;}ee[N<<1];
int read()
{
	int x=0,f=1;
	char ch=getchar();
	while(ch<'0'||ch>'9'){if(ch=='-')f=-1;ch=getchar();}
	while(ch>='0'&&ch<='9'){x=x*10+ch-'0';ch=getchar();}
	return x*f;
}
void add_edge(int u,int v,int w)
{
	e[++tot].to=v;
	e[tot].w=w;
	e[tot].next=head[u];
	head[u]=tot;
}
bool cmp(EDGE aa,EDGE bb){return aa.w<bb.w;}
int find(int x)
{
	if(fa[x]==x) return x;
	return fa[x]=find(fa[x]);
}
void dfs_init(int u)
{
	for(int i=head[u];i;i=e[i].next)
	{
		int v=e[i].to;
		if(v==f[u][0]) continue;
		dep[v]=dep[u]+1;
		mx[v][0]=e[i].w;
		f[v][0]=u;
		dfs_init(v);
	}
}
int LCA2(int u,int v)
{
	int flag;
	if(dep[u]<dep[v]) swap(u,v);
	for(int i=0;i<=18;i++)
	{
		if((1<<i)>dep[u])
		{
			flag=i-1;
			break;
		}
	}
	for(int i=flag;i>=0;i--) if(dep[u]>=dep[v]+(1<<i)) u=f[u][i];
	if(u==v) return u;
	for(int i=18;i>=0;i--)
	{
		if(f[u][i]!=f[v][i])
		{
			u=f[u][i];
			v=f[v][i];
		}
	}
	return f[u][0];
}
int search(int u,int v,int w)
{
	int lca=LCA2(u,v),flag,lmax,rmax;
	lmax=rmax=0;
	for(int i=0;i<=18;i++)
	{
		if((1<<i)>dep[u])
		{
			flag=i-1;
			break;
		}
	}
	for(int i=flag;i>=0;i--)
	{
		if(dep[u]>dep[lca]+(1<<i))
		{
			if(mx[u][i]!=w) lmax=max(lmax,mx[u][i]);
			else lmax=max(lmax,se[u][i]);
			u=f[u][i];
		}
	}
	for(int i=0;i<=18;i++)
	{
		if((1<<i)>dep[v])
		{
			flag=i-1;
			break;
		}
	}
	for(int i=flag;i>=0;i--)
	{
		if(dep[v]>=dep[lca]+(1<<i))
		{
			if(mx[v][i]!=w) rmax=max(rmax,mx[v][i]);
			else rmax=max(rmax,se[v][i]);
		}
		v=f[v][i];
	}
	return max(lmax,rmax);
}
void LCA1()
{
	for(int i=1;i<=18;i++)
	for(int j=1;j<=n;j++)
	{
		f[j][i]=f[f[j][i-1]][i-1];
		mx[j][i]=max(mx[j][i-1],mx[f[j][i-1]][i-1]);
		se[j][i]=max(se[j][i-1],se[f[j][i-1]][i-1]);
		if(mx[j][i-1]<mx[f[j][i-1]][i-1]&&se[j][i]<mx[j][i-1])
			se[j][i]=mx[j][i-1];
			
		else if(mx[j][i-1]>mx[f[j][i-1]][i-1]
		      &&se[j][i]<mx[f[j][i-1]][i-1])
			se[j][i]=mx[f[j][i-1]][i-1];
	}
}
signed main()
{
	n=read(),m=read();
	for(int i=1;i<=n;i++) fa[i]=i;
	for(int i=1;i<=m;i++)
	{
		ee[i].u=read();
		ee[i].v=read();
		ee[i].w=read();
		ee[i].flag=0;
	}
	sort(ee+1,ee+m+1,cmp);
	for(int i=1;i<=m;i++)
	{
		int uu=find(ee[i].u);
		int vv=find(ee[i].v);
		if(uu==vv) continue;
		colcnt++;
		sum+=ee[i].w;
		ee[i].flag=1;
		fa[vv]=uu;
		add_edge(ee[i].u,ee[i].v,ee[i].w);
		add_edge(ee[i].v,ee[i].u,ee[i].w);
		if(colcnt==n-1) break;
	}
	dfs_init(1);
	LCA1();
	for(int i=1;i<=m;i++)
	{
		if(ee[i].flag) continue;
		int tmp=search(ee[i].u,ee[i].v,ee[i].w);
		if(tmp!=ee[i].w&&ans>sum-tmp+ee[i].w)
			ans=sum-tmp+ee[i].w;
	}
	printf("%lld",ans);
	return 0;
}