[bzoj4625][BeiJing2016]水晶

来自FallDream的博客，未经允许，请勿转载，谢谢。

---

不用惊慌，今天的题都不是小强出的。——融入了无数心血的作品，现在却不得不亲手毁掉，难以体会他的心情啊

。——那也是没有办法的事情，能量共振不消除的话……望着已经被装上炸*药的水晶，02放下了望远镜，看向了手

中的共振分析报告。还是会有一些水晶，幸存下来的……也许吧。地图由密铺的六边形单元组成，每个单元与其他

六个单元相邻。为了方便起见，我们用坐标(x,y,z)描述一个单元的位置，表示从原点开始按如图所示的x,y,z方向

各走若干步之后到达的地方。有可能有两个坐标描述同一个单元，比如(1,1,1)和(0,0,0)描述的都是原点

显然(x,y,z)单元和(x+1, y,z)，(x-1,y,z)，(x,y+1,z)，(x,y-1,z)，(x, y, z+1)，(x,y, z-1)相邻。有N块水晶

位于地图的单元内，第i块水晶位于坐标(xi, yi, zi)所表示的单元中，并拥有ci的价值。每个单元内部可能会有

多块水晶。地图中，有一些单元安装有能量源。如下图，任何满足x+y+z是3的整数倍的坐标所描述的单元内都安装

有能量源。

有能量源的单元中的水晶价值将会额外增加10%.如果三块水晶所在的单元满足特定排列，那么它们将会引发共振。

共振分两种，a共振和b共振。a共振：如果三块水晶所在的单元两两相邻地排成一个三角形，那么会引起a共振。

图中每一个三角形表示这三个单元各有一块水晶将会发生一个a共振。b共振：如果三块水晶所在的单元依次相邻地

排成一条长度为2的直线段，且正中间的单元恰好有能量源，那么会引起b共振。

图中粉红色线段表示这三个单元各有一块水晶将会发生一个b共振，黑色线段表示即使这三个单元有水晶也不会发

生b共振。现在你要炸掉一部分水晶，使得任何共振都不会发生的前提下，剩余水晶的价值总和最大。

n<=50000

考虑染成三种颜色，发现构成一个三分图，然后最小割就可以了。

#include<iostream>
#include<cstdio>
#include<cstring>
#include<map>
#define num(x,y) ((x+2000)*4000+y+2000)
#define S 0
#define T 100001
#define INF 2000000000
using namespace std;
inline int read()
{
    int x =  , f = ; char ch = getchar();
    while(ch < '' || ch > ''){ if(ch == '-') f = -;  ch = getchar();}
    while(ch >= '' && ch <= ''){x = x *  + ch - '';ch = getchar();}
    return x * f;
}
bool mark[T+];map<int,int> mp;
int cnt=,q[T+],top,n,d[T+],c[T+],head[T+],ans=;
struct crystal{int x,y,z,c;}s[T+];
struct edge{int to,next,w;}e[T*+];
inline void ins(int f,int t,int w)
{
    if(!t) return;
    e[++cnt]=(edge){t,head[f],w};head[f]=cnt;
    e[++cnt]=(edge){f,head[t],};head[t]=cnt;
}

bool Ins(crystal a,int id)
{
    int ha=num(a.x,a.y);
    if(mp[ha]) return s[mp[ha]].c+=a.c,;
    else return *(mp[ha]=id);
}

int dfs(int x,int f)
{
    if(x==T) return f;int used=;
    for(int&i=c[x];i;i=e[i].next)
        if(e[i].w&&d[e[i].to]==d[x]+)
        {
            int w=dfs(e[i].to,min(e[i].w,f-used));
            used+=w;e[i].w-=w;e[i^].w+=w;
            if(used==f) return used;
        }
    return d[x]=-,used;
}        

bool bfs()
{
    memset(d,,sizeof(d));int i,j;
    for(d[q[top=i=]=S]=;i<=top;++i)
        for(int j=c[q[i]]=head[q[i]];j;j=e[j].next)
            if(e[j].w&&!d[e[j].to])
                d[q[++top]=e[j].to]=d[q[i]]+;
    return d[T];
}

int main()
{
    n=read();
    for(int i=;i<=n;++i)
    {
        s[i].x=read(),s[i].y=read(),s[i].z=read();s[i].c=read()*;
        s[i].x-=s[i].z;s[i].y-=s[i].z;s[i].z=;
        if((s[i].x+s[i].y)%==) s[i].c+=s[i].c/;
        if(Ins(s[i],i)) mark[i]=;ans+=s[i].c;
    }
    for(int i=;i<=n;++i) if(!mark[i])
    {
        ins(i,i+n,s[i].c);
        if((s[i].x+s[i].y+)%==) ins(S,i,INF);
        if((s[i].x+s[i].y+)%!=)
        {
            ins(i+n,mp[num(s[i].x,s[i].y+)],INF);
            ins(i+n,mp[num(s[i].x+,s[i].y)],INF);
            ins(i+n,mp[num(s[i].x-,s[i].y-)],INF);
        }
        else ins(i+n,T,INF);
    }
    while(bfs()) ans-=dfs(S,INF);
    printf("%.1lf",(double)ans/);
    return ;
}