APIO2012 Dispatching 左偏树

在一个忍者的帮派里，一些忍者们被选中派遣给顾客，然后依据自己的工作获取报偿。在这个帮派里，有一名忍者被称之为 Master。除了 Master以外，每名忍者都有且仅有一个上级。为保密，同时增强忍者们的领导力，所有与他们工作相关的指令总是由上级发送给他的直接下属，而不允许通过其他的方式发送。现在你要招募一批忍者，并把它们派遣给顾客。你需要为每个被派遣的忍者 支付一定的薪水，同时使得支付的薪水总额不超过你的预算。另外，为了发送指令，你需要选择一名忍者作为管理者，要求这个管理者可以向所有被派遣的忍者 发送指令，在发送指令时，任何忍者（不管是否被派遣）都可以作为消息的传递 人。管理者自己可以被派遣，也可以不被派遣。当然，如果管理者没有被排遣，就不需要支付管理者的薪水。你的目标是在预算内使顾客的满意度最大。这里定义顾客的满意度为派遣的忍者总数乘以管理者的领导力水平，其中每个忍者的领导力水平也是一定的。写一个程序，给定每一个忍者 i的上级 Bi，薪水Ci，领导力L i，以及支付给忍者们的薪水总预算 M，输出在预算内满足上述要求时顾客满意度的最大值。

1 ≤N ≤ 100,000 忍者的个数；
1 ≤M ≤ 1,000,000,000 薪水总预算；

0 ≤B i < i 忍者的上级的编号；
1 ≤Ci ≤ M 忍者的薪水；
1 ≤Li ≤ 1,000,000,000 忍者的领导力水平。

Input
从标准输入读入数据。

第一行包含两个整数 N和 M，其中 N表示忍者的个数，M表示薪水的总预 算。

接下来 N行描述忍者们的上级、薪水以及领导力。其中的第 i 行包含三个整 B i , C i , L i分别表示第i个忍者的上级，薪水以及领导力。Master满足B i = 0， 并且每一个忍者的老板的编号一定小于自己的编号 B i < i。

Output
输出一个数，表示在预算内顾客的满意度的最大值。

Sample Input
5 4
0 3 3
1 3 5
2 2 2
1 2 4
2 3 1
Sample Output
6

一颗N叉树，每个节点有参数y和花费x，每颗子树上，在预算m以内选取尽可能多个的子孙节点num个，使得y*num最大。左偏树的基础运用。
首先显然要每个节点都遍历一遍，那么就从叶节点开始建每个节点的子树的大根堆。为什么用大根堆而不是小根堆？因为运用贪心策略，建立大根堆后不断剔除最大值，保证保留下来的是花费最少的因此也是个数最多的。计算完所有子树后，将所有子树的大根堆和父节点合并，这样一来保留了子树的计算结果，继续向上层计算。用队列储存子树合并完了的父节点，合并后的父节点再进队。
而实现可合并的大根堆的数据结构就是左偏树，要注意左偏树虽然是树状结构，但是跟原题中的树没有关系，左偏树表达的是该子树上的点的大小关系，只是个集合，根节点和原先的根节点不一样，要合并则要找原题中的树，该树表达的才是节点之间的从属关系，不要混淆。

#include <iostream>
#include <string.h>
#include <queue>
#include <stdio.h>
using namespace std;
typedef long long ll;
const int maxn=100005;
int n,m;
ll ans;
ll sum[maxn],num[maxn],fa[maxn],rt[maxn],cnt[maxn];

struct node{
    ll val,lc,rc,dis,par,ld;
}t[maxn];

void init(){
    for(int i=1;i<=n;i++){
        t[i].lc=t[i].rc=t[i].dis=0;
        t[i].par=i;
    }
}

int fid(int x){
    if(t[x].par==x) return x;
    else return t[x].par=fid(t[x].par);
}

int same(int x,int y){
    return fid(x)==fid(y);
}

int mer(int x,int y){
    if(x==0) return y;
    if(y==0) return x;
    if(t[x].val<t[y].val) swap(x,y);
    t[x].rc=mer(t[x].rc,y);
    t[t[x].rc].par=x;
    if(t[t[x].lc].dis<t[t[x].rc].dis)
        swap(t[x].lc,t[x].rc);
    if(t[x].rc==0)
        t[x].dis=0;
    else
        t[x].dis=t[t[x].rc].dis+1;
    return x;
}

int pop(int x){
    int l=t[x].lc,r=t[x].rc;
    t[x].lc=t[x].rc=t[x].dis=0;
    t[l].par=l;t[r].par=r;
    return mer(l,r);
}

int main()
{
    int a,b,c,root,tmp,nt,pt;
    //freopen("r.txt","r",stdin);
    scanf("%d%d",&n,&m);
    init();
    memset(cnt,0,sizeof(fa));
    memset(sum,0,sizeof(sum));
    for(int i=1;i<=n;i++){
        scanf("%d%d%d",&a,&b,&c);
        cnt[a]++;
        fa[i]=a;
        t[i].par=a;
        t[i].val=b;
        t[i].ld=c;
        num[i]=1;
        sum[i]=b;
        rt[i]=i;
        if(a==0) root=i;
    }
    ans=0;
    queue<int> q;
    for(int i=1;i<=n;i++){
        if(cnt[i]==0){
            q.push(i);
            sum[i]=t[i].val;
            ans=max(t[i].ld,ans);
        }
    }
    while(!q.empty()){
        nt=q.front();
        q.pop();
        pt=fa[nt];
        cnt[pt]--;
        rt[pt]=mer(rt[nt],rt[pt]);
        sum[pt]+=sum[nt];
        num[pt]+=num[nt];
        if(cnt[pt]==0){
            while(sum[pt]>m){
                num[pt]--;
                sum[pt]-=t[rt[pt]].val;
                rt[pt]=pop(rt[pt]);
            }
            ans=max(ans,t[pt].ld*num[pt]);
            if(fa[pt]!=0) q.push(pt);
        }
    }
    cout<<ans<<endl;
    return 0;
}