bzoj 2286(洛谷 2495) [Sdoi2011]消耗战——虚树

题目：https://www.lydsy.com/JudgeOnline/problem.php?id=2286

　　　https://www.luogu.org/problemnew/show/P2495

学习（抄）了 hzwer 的代码，觉得写得很好。http://hzwer.com/6188.html

有一个 “如果排序后第 i 个关键点和第 i-1 个关键点的 lca 是第 i-1 个关键点，就舍弃第 i 个关键点” 的操作，觉得很好。

把 hd[ ] 数组清空写在了 dfs 里，觉得很好。

自己一开始写了一个倍增找链上边权最小值，用来给虚树的边赋值，参考之后发现只要记录一个 “到根的路径上的最小边权” 就行了。

#include<cstdio>
#include<cstring>
#include<algorithm>
#define ll long long
using namespace std;
int rdn()
{
  int ret=;bool fx=;char ch=getchar();
  while(ch>''||ch<''){if(ch=='-')fx=;ch=getchar();}
  while(ch>=''&&ch<='')ret=ret*+ch-'',ch=getchar();
  return fx?ret:-ret;
}
ll Mx(ll a,ll b){return a>b?a:b;}
ll Mn(ll a,ll b){return a<b?a:b;}

const int N=,K=;const ll INF=3e10+;//for dp
int n,hd[N],xnt,to[N<<],nxt[N<<],w[N<<];
int dep[N],pre[N][K],bin[K],dfn[N],tim; ll mn[N];
bool cmp(int a,int b){return dfn[a]<dfn[b];}
void add(int x,int y,int z){to[++xnt]=y;nxt[xnt]=hd[x];hd[x]=xnt;w[xnt]=z;}
void dfs(int cr,int fa)
{
  dfn[cr]=++tim; dep[cr]=dep[fa]+;
  pre[cr][]=fa;
  for(int t=;bin[t]<=dep[cr];t++)
    pre[cr][t]=pre[pre[cr][t-]][t-];
  for(int i=hd[cr],v;i;i=nxt[i])
    if((v=to[i])!=fa)
      {
    mn[v]=Mn(mn[cr],w[i]);
    dfs(v,cr);
      }
}
int get_lca(int x,int y)
{
  if(dep[x]<dep[y])swap(x,y);
  int d=dep[x]-dep[y];
  for(int t=;bin[t]<=d;t++)
    if(d&bin[t])x=pre[x][t];

  if(x==y)return x;
  for(int t=;t>=;t--)
    if(pre[x][t]!=pre[y][t])
      x=pre[x][t],y=pre[y][t];
  return pre[x][];
}
namespace Tr{
  int hd[N],xnt,to[N],nxt[N];
  int p[N],tot,sta[N],top; ll dp[N];
  void add(int x,int y){to[++xnt]=y;nxt[xnt]=hd[x];hd[x]=xnt;}
  void get_tr()
  {
    xnt=;
    sort(p+,p+tot+,cmp);
    int lm=tot; p[tot=]=p[];
    for(int i=;i<=lm;i++)
      if(get_lca(p[i],p[tot])!=p[tot])p[++tot]=p[i];
    sta[top=]=;
    for(int i=;i<=tot;i++)
      {
    int u=p[i], lca=get_lca(u,sta[top]);
    while(top&&dfn[lca]<dfn[sta[top]])
      {
        if(dfn[sta[top-]]<dfn[lca])
          add(lca,sta[top]);
        else add(sta[top-],sta[top]);
        top--;
      }
    if(sta[top]!=lca)sta[++top]=lca;
        sta[++top]=u;
      }
    for(int i=;i<top;i++)add(sta[i],sta[i+]);
  }
  void dfs(int cr)
  {
    if(!hd[cr]){dp[cr]=mn[cr];return;}
    dp[cr]=;
    for(int i=hd[cr],v;i;i=nxt[i])
      {
    dfs(v=to[i]); dp[cr]+=dp[v];
      }
    hd[cr]=;//////
    dp[cr]=Mn(dp[cr],mn[cr]);
  }
  void solve()
  {
    int k=rdn(); tot=;
    for(int i=,d;i<=k;i++)
      d=rdn(),p[++tot]=d;
    get_tr(); dfs(); printf("%lld\n",dp[]);
  }
}
int main()
{
  bin[]=;for(int i=;i<=;i++)bin[i]=bin[i-]<<;
  n=rdn();
  for(int i=,u,v,z;i<n;i++)
    u=rdn(),v=rdn(),z=rdn(),add(u,v,z),add(v,u,z);
  mn[]=INF; dfs(,);
  int Q=rdn(); while(Q--)Tr::solve();
  return ;
}