天天看点

[HNOI2015]开店【动态点分治/点分树】

题目链接

  Q次强制在线查询,求N个点的固定树型结构的某点u到其余范围在[L, R]区间内的点的距离之和。

  又是一道动态点分治的码量题,逐渐写出手感。

  首先,由于这道题没有修改操作(可以省掉好多码量了呢),我们可以用前缀和、差分这样的方法来进行求解。所以,我们先看怎样求一点到树上各点的距离,这在[ZJOI2015]幻想乡战略游戏【动态点分治/点分树】中有了初略的涉及,这里再细致的再讲一遍。

  我们现在想知道点分树中u点到其余各点的距离和(先不管这个区间

[HNOI2015]开店【动态点分治/点分树】

的问题),于是,我们可以从点分树上不断的向父亲结点

[HNOI2015]开店【动态点分治/点分树】

跑,那么,答案就可以这样更新

[HNOI2015]开店【动态点分治/点分树】

,其中

[HNOI2015]开店【动态点分治/点分树】

指的是u的子树到u点的距离和,

[HNOI2015]开店【动态点分治/点分树】

指的是u的子树的结点到u的父亲的距离和,这两个用以差分使用(冗斥思想)。

[HNOI2015]开店【动态点分治/点分树】

指的是u内的点的个数。

  于是,我们已经会

[HNOI2015]开店【动态点分治/点分树】

求点分树上的某个点的到其余各点的距离和了。现在,要查询区间

[HNOI2015]开店【动态点分治/点分树】

的问题了。那么,我们可以动态开点,因为点分树的所有子树的子结点之和是

[HNOI2015]开店【动态点分治/点分树】

级别的,所以我们开够这样的空间,然后动态分配就可以给每个点分树恰好的空间了。然后利用差分来解决这个问题,所以我们首先要做的就是用vector存下所有的子结点,然后按照年龄排序一下。然后利用前缀和的思想,我们就可以存储子树内的信息了。

#include <iostream>
#include <cstdio>
#include <cmath>
#include <string>
#include <cstring>
#include <algorithm>
#include <limits>
#include <vector>
#include <stack>
#include <queue>
#include <set>
#include <map>
#include <bitset>
//#include <unordered_map>
//#include <unordered_set>
#define lowbit(x) ( x&(-x) )
#define pi 3.141592653589793
#define e 2.718281828459045
#define INF 0x3f3f3f3f
#define Big_INF 0x3f3f3f3f3f3f3f3f
#define eps 1e-6
#define HalF (l + r)>>1
#define lsn rt<<1
#define rsn rt<<1|1
#define Lson lsn, l, mid
#define Rson rsn, mid+1, r
#define QL Lson, ql, qr
#define QR Rson, ql, qr
#define myself rt, l, r
#define MP(a, b) make_pair(a, b)
using namespace std;
typedef unsigned long long ull;
typedef unsigned int uit;
typedef long long ll;
const int maxN = 1.5e5 + 7;
int N, Q, A, LOG_2[maxN << 1], year[maxN];
struct Graph
{
    int head[maxN], cnt;
    struct Eddge
    {
        int nex, to; ll val;
        Eddge(int a=-1, int b=0, ll c=0):nex(a), to(b), val(c) {}
    } edge[maxN << 1];
    inline void addEddge(int u, int v, ll w)
    {
        edge[cnt] = Eddge(head[u], v, w);
        head[u] = cnt++;
    };
    inline void _add(int u, int v, ll w) { addEddge(u, v, w); addEddge(v, u, w); }
    inline void clear()
    {
        cnt = 0;
        for(int i=1; i<=N; i++) head[i] = -1;
    }
} Old;
struct Grand_Father
{
    int deep[maxN], euler[maxN << 1], Esiz, rid[maxN]; ll dis[maxN] = {0};
    void dfs(int u, int fa)
    {
        deep[u] = deep[fa] + 1; rid[u] = Esiz + 1;
        for(int i=Old.head[u], v; ~i; i=Old.edge[i].nex)
        {
            v = Old.edge[i].to;
            if(v == fa) continue;
            dis[v] = dis[u] + Old.edge[i].val;
            euler[++Esiz] = u;
            dfs(v, u);
        }
        euler[++Esiz] = u;
    }
    int mn[maxN << 1][20];
    inline void RMQ_Init()
    {
        for(int i=1; i<=Esiz; i++) mn[i][0] = euler[i];
        for(int j=1; (1 << j) <= Esiz; j++)
        {
            for(int i=1; i + (1 << j) - 1 <= Esiz; i++)
            {
                if(deep[mn[i][j - 1]] < deep[mn[i + (1 << (j - 1))][j - 1]]) mn[i][j] = mn[i][j - 1];
                else mn[i][j] = mn[i + (1 << (j - 1))][j - 1];
            }
        }
    }
    inline int Rmq(int l, int r)
    {
        int det = r - l + 1, kk = LOG_2[det];
        if(deep[mn[l][kk]] <= deep[mn[r - (1 << kk) + 1][kk]]) return mn[l][kk];
        else return mn[r - (1 << kk) + 1][kk];
    }
    inline int _LCA(int u, int v)
    {
        int l = rid[u], r = rid[v];
        if(l > r) swap(l, r);
        return Rmq(l, r);
    }
    inline ll _Dis(int u, int v)
    {
        int lca = _LCA(u, v);
        return dis[u] + dis[v] - 2 * dis[lca];
    }
} A_lca;
int root, all, son[maxN], siz[maxN], maxx, father[maxN];
bool vis[maxN];
void findroot(int u, int fa)
{
    siz[u] = 1; son[u] = 0;
    for(int i=Old.head[u], v; ~i; i=Old.edge[i].nex)
    {
        v = Old.edge[i].to;
        if(vis[v] || v == fa) continue;
        findroot(v, u);
        siz[u] += siz[v];
        son[u] = max(son[u], siz[v]);
    }
    son[u] = max(son[u], all - siz[u]);
    if(son[u] < maxx) { maxx = son[u]; root = u; }
}
ll tmp_ans[maxN * 30], *id_ans = tmp_ans, tmp_ansf[maxN * 30], *id_ansf = tmp_ansf, tmp_sum[maxN * 30], *id_sum = tmp_sum;
struct node
{
    ll *ans, *ansf, *sum;
    vector<pair<int, int>> vt;  //how old is it & its id
} t[maxN];
void Get_Dis(int u, int fa)
{
    t[root].vt.push_back(MP(year[u], u));
    for(int i=Old.head[u], v; ~i; i=Old.edge[i].nex)
    {
        v = Old.edge[i].to;
        if(vis[v] || v == fa) continue;
        Get_Dis(v, u);
    }
}
void Divide(int u)
{
    vis[u] = true;
    int totsiz = all;
    t[u].ans = id_ans; t[u].ansf = id_ansf; t[u].sum = id_sum;
    id_ans += all + 1; id_ansf += all + 1; id_sum += all + 1;
    Get_Dis(u, 0);
    sort(t[u].vt.begin(), t[u].vt.end());
    int len = (int)t[u].vt.size(); ll dis;
    for(int i=0, v, tv; i<len; i++)
    {
        v = t[u].vt[i].second;
        tv = t[u].vt[i].first;
        dis = A_lca._Dis(v, u);
        t[u].ans[i] = dis;
        t[u].sum[i] = 1;
        if(father[u])
        {
            dis = A_lca._Dis(v, father[u]);
            t[u].ansf[i] = dis;
        }
    }
    for(int i=1; i<all; i++)
    {
        t[u].ans[i] += t[u].ans[i - 1];
        t[u].ansf[i] += t[u].ansf[i - 1];
        t[u].sum[i] += t[u].sum[i - 1];
    }
    for(int i=Old.head[u], v; ~i; i=Old.edge[i].nex)
    {
        v = Old.edge[i].to;
        if(vis[v]) continue;
        all = siz[v] > siz[u] ? totsiz - siz[u] : siz[v];
        maxx = INF; root = 0;
        findroot(v, 0);
        father[root] = u;
        Divide(root);
    }
}
inline ll query(int u, int ql, int qr)
{
    int L, R, pL, pR, p = father[u], cop_u = u;
    L = (int)(lower_bound(t[u].vt.begin(), t[u].vt.end(), MP(ql, 0)) - t[u].vt.begin() - 1);
    R = (int)(upper_bound(t[u].vt.begin(), t[u].vt.end(), MP(qr, INF)) - t[u].vt.begin() - 1);
    ll ans = 0, dis;
    if(R >= 0) ans = t[u].ans[R];
    if(L >= 0) ans -= t[u].ans[L];
    while(p)
    {
        L = (int)(lower_bound(t[u].vt.begin(), t[u].vt.end(), MP(ql, 0)) - t[u].vt.begin() - 1);
        R = (int)(upper_bound(t[u].vt.begin(), t[u].vt.end(), MP(qr, INF)) - t[u].vt.begin() - 1);
        pL = (int)(lower_bound(t[p].vt.begin(), t[p].vt.end(), MP(ql, 0)) - t[p].vt.begin() - 1);
        pR = (int)(upper_bound(t[p].vt.begin(), t[p].vt.end(), MP(qr, INF)) - t[p].vt.begin() - 1);
        dis = A_lca._Dis(cop_u, p);
        if(R >= 0) ans += t[p].ans[pR] - t[u].ansf[R] + dis * (t[p].sum[pR] - t[u].sum[R]);
        else if(pR >= 0) ans += t[p].ans[pR] + dis * t[p].sum[pR];
        if(L >= 0) ans -= t[p].ans[pL] - t[u].ansf[L] + dis * (t[p].sum[pL] - t[u].sum[L]);
        else if(pL >= 0) ans -= t[p].ans[pL] + dis * t[p].sum[pL];
        u = p;
        p = father[u];
    }
    return ans;
}
inline void init()
{
    Old.clear();
    for(int i = 1, j = 2, k = 0; i <= (N << 1); i++)
    {
        if(i == j) { j <<= 1; k++; }
        LOG_2[i] = k;
    }
}
int main()
{
    scanf("%d%d%d", &N, &Q, &A);
    for(int i=1; i<=N; i++) scanf("%d", &year[i]);
    init();
    for(int i=1, u, v, w; i<N; i++)
    {
        scanf("%d%d%d", &u, &v, &w);
        Old._add(u, v, w);
    }
    A_lca.deep[0] = 0;
    A_lca.dfs(1, 0);
    A_lca.deep[0] = INF;
    A_lca.RMQ_Init();
    maxx = INF; root = 0; all = N;
    findroot(1, 0);
    Divide(root);
    ll ans = 0;
    int x; ll l, r;
    while(Q--)
    {
        scanf("%d%lld%lld", &x, &l, &r);
        l = (l + ans) % A; r = (r + ans) % A;
        if(l > r) swap(l, r);
        printf("%lld\n", ans = query(x, (int)l, (int)r));
    }
    return 0;
}