[BZOJ3669]NOI2014魔法森林|LCT|最小生成树

  这题证明我有多弱。。noip之前写了一发挂了由于noip不考这个我就没去调了，省选之前写了一发在火车上调了2h未果又弃了，第三次写不记得调了多久才过，最后发现后两次犯的一样的傻逼错误，以一个变量为参数调用两次同样void忘记这个变量在第一次调用时就变了。。不能再蠢。。
把边按a升序排序，不断加边，LCT维护b的 MST，不断更新答案就行了。。

#include<cstdio>
#include<iostream>
#include<algorithm>
#define N 150005
#define M 100005
#define inf 0x3fffffff
#define lc c[x][0]
#define rc c[x][1]
using namespace std;
struct edge{
    int s,e,a,b;
}ed[M];
int n,m,i,s,e,f1,f2,ans,fa[N],pre[N],c[N][2],mx[N],q[N],rev[N];
bool cmp(edge a,edge b)
{
    if (a.a!=b.a) return a.a<b.a;else return a.b<b.b;
}
int getfa(int x){return x==fa[x]?x:fa[x]=getfa(fa[x]);}
void mark(int x)
{
    if (!x) return;
    swap(lc,rc);rev[x]^=1;
}
void down(int x)
{
    if (!x||!rev[x]) return;
    mark(lc);mark(rc);rev[x]=0;
}
void update(int x)
{
    mx[x]=x;
    if (lc&&q[mx[lc]]>q[mx[x]]) mx[x]=mx[lc];
    if (rc&&q[mx[rc]]>q[mx[x]]) mx[x]=mx[rc];
}
bool isroot(int x)
{
    if (!pre[x]||(c[pre[x]][0]!=x&&c[pre[x]][1]!=x))return true;
    return false;
}
void rot(int x,int kind)
{
    int y=pre[x],z=pre[y];
    if (z&&!isroot(y)) c[z][c[z][1]==y]=x;
    c[y][!kind]=c[x][kind];pre[c[x][kind]]=y;
    c[x][kind]=y;pre[y]=x;
    pre[x]=z;
    update(y);update(x);if (z) update(z);
}
void splay(int x)
{
    int y,z,kind;
    while (!isroot(x))
        if (isroot(pre[x])) down(pre[x]),down(x),rot(x,c[pre[x]][0]==x);
        else
        {
            y=pre[x];z=pre[y];kind=(c[z][0]==y);
            down(z);down(y);down(x);
            if (c[y][kind]==x) rot(x,!kind);else rot(y,kind);
            rot(x,kind);
        }
}
void access(int x)
{
    int u=0;
    while (x)
    {
        splay(x);down(x);
        c[x][1]=u;update(x);
        u=x;x=pre[x];
    }
}
void makeroot(int x)
{
    access(x);splay(x);mark(x);
}
void link(int x,int y)
{
    makeroot(x);pre[x]=y;
}
void cut(int x,int y)
{
    makeroot(x);access(y);splay(y);
    c[y][0]=pre[x]=0;update(y);
}
int main()
{
    freopen("3669.in","r",stdin);
    scanf("%d%d",&n,&m);
    for (i=1;i<=m;i++) scanf("%d%d%d%d",&ed[i].s,&ed[i].e,&ed[i].a,&ed[i].b);
    for (i=1;i<=n;i++) fa[i]=i,pre[i]=0,c[i][0]=c[i][1]=0,mx[i]=i,q[i]=0,rev[i]=0;
    sort(ed+1,ed+m+1,cmp);
    ans=inf;
    for (i=1;i<=m;i++)
    {
        pre[i+n]=c[i+n][0]=c[i+n][1]=rev[i+n]=0;mx[i+n]=i+n;q[i+n]=ed[i].b;
        s=ed[i].s;e=ed[i].e;f1=getfa(s);f2=getfa(e);
        if (s==e) continue;
        if (f1!=f2)
        {
            fa[f1]=f2;
            link(i+n,s);link(i+n,e);
        }
        else
        {
            makeroot(s);access(e);splay(e);
            if (q[mx[e]]>ed[i].b) 
            {
                int t=mx[e];
                cut(ed[t-n].s,t);cut(ed[t-n].e,t);
                link(i+n,s);link(i+n,e);
            }
        }
        if (getfa(1)==getfa(n))
        {
            makeroot(1);access(n);splay(n);
            ans=min(ans,ed[i].a+q[mx[n]]);
        }
    }
    if (ans<inf) printf("%d\n",ans); else printf("-1\n");
}