洛谷 1312 Mayan游戏——暴搜+剪枝

题目：https://www.luogu.org/problemnew/show/P1312

自己写了很久。又T又WA的。

发现对题理解有误。改完后应该只有T了，但还是T的。

自己写了许多剪枝，很鸡肋。

然后去看Zinn的题解。

重要剪枝：交换的话只从左向右即可！！！向左的只能是空格。两个颜色相同的话就不要换了！（虽然可能需要故意浪费步数？）

然后就变得非常快。但WA了1个点。去掉自以为等价的那个地方就能了，而且好像还变快了？不知为何。该处见注释。

#include<iostream>
#include<cstdio>
#include<cstring>
#include<algorithm>
using namespace std;
const int N=,K=;
int n,sta[N][],a[N][N][N],cnt,ct[K],sum,mx;
int xx[]={-,,,},yy[]={,-,,};
bool vis[N][N],eflag;
void dfs(int cr,int x,int y,int fx)
{
  cnt++;vis[x][y]=;
  int tx=x+xx[fx],ty=y+yy[fx];
  if(!vis[tx][ty]&&a[cr][tx][ty]==a[cr][x][y])
    dfs(cr,tx,ty,fx);
}
void cz(int cr,int x,int y)
{

  if(x>&&a[cr][x-][y]==a[cr][x][y]&&a[cr][x-][y]==a[cr][x][y])
    dfs(cr,x,y,);
  if(y>&&a[cr][x][y-]==a[cr][x][y]&&a[cr][x][y-]==a[cr][x][y])
    dfs(cr,x,y,);
  //上面两个去掉会错？//去掉上面还会变慢？
  if(x<&&a[cr][x+][y]==a[cr][x][y]&&a[cr][x+][y]==a[cr][x][y])
    dfs(cr,x,y,);
  if(y<&&a[cr][x][y+]==a[cr][x][y]&&a[cr][x][y+]==a[cr][x][y])
    dfs(cr,x,y,);
}
void xc(int cr)
{
  int tmp[N][N]={};
  for(int i=;i<=;i++)
    {
      int p0=;
      for(int j=;j<=;j++)
    {
      while(p0<&&vis[i][p0])p0++;
      if(vis[i][p0]||!a[cr][i][p0])break;
      tmp[i][j]=a[cr][i][p0];p0++;
    }
    }
  memcpy(a[cr],tmp,sizeof tmp);
}
void clear(int cr)
{
  while()
    {
      memset(vis,,sizeof vis); cnt=;
      for(int i=;i<=;i++)
    for(int j=;j<=&&a[cr][i][j];j++)
      if(!vis[i][j])cz(cr,i,j);
      if(!cnt)break; xc(cr); sum-=cnt;
    }
}
void calc(int cr,int x,int y,int op)
{
  memcpy(a[cr],a[cr-],sizeof a[cr-]);
  if(a[cr][x+op][y])
    {
      if(a[cr][x][y]==a[cr][x+op][y])return;
      swap(a[cr][x][y],a[cr][x+op][y]);
      clear(cr);  return;
    }
  else
    {
      for(int i=;i<=;i++)
    if(!a[cr][x+op][i])
      {a[cr][x+op][i]=a[cr][x][y];break;}
      for(int i=y;i<=;i++)a[cr][x][i]=a[cr][x][i+];
      clear(cr);  return;
    }
}
bool pan(int cr)
{
  memset(ct,,sizeof ct);
  for(int i=;i<=;i++)
    for(int j=;j<=&&a[cr][i][j];j++)
      ct[a[cr][i][j]]++;
  for(int i=;i<=mx;i++)if(ct[i]==||ct[i]==)return false;
  return true;
}
void solve(int cr)
{
  if(cr>n)
    {
      eflag=!sum; return;
    }
  int ysum=sum;
  for(int i=;i<=;i++)
    for(int j=;j<=&&a[cr-][i][j];j++)
      {
    if(i<&&a[cr-][i][j]!=a[cr-][i+][j])
      {
        calc(cr,i,j,);
        if(pan(cr))
          {
        sta[cr][]=i;sta[cr][]=j;sta[cr][]=;
        solve(cr+); if(eflag)return;
          }
        sum=ysum;
      }
    if(i>&&!a[cr-][i-][j])
      {
        calc(cr,i,j,-);
        if(pan(cr))
          {
        sta[cr][]=i;sta[cr][]=j;sta[cr][]=-;
        solve(cr+); if(eflag)return;
          }
        sum=ysum;
      }
      }
}
int main()
{
  scanf("%d",&n);
  for(int i=;i<=;i++)
    for(int j=;j<=;j++)//
      {
    scanf("%d",&a[][i][j]);
    if(!a[][i][j])break;
    ct[a[][i][j]]++; sum++; mx=max(mx,a[][i][j]);
      }
  if(!pan()){puts("-1");return ;}

  solve();
  if(eflag)
    {
      for(int i=;i<=n;i++)
    printf("%d %d %d\n",sta[i][],sta[i][],sta[i][]);
    }
  else puts("-1");
  return ;
}