[2018-2019 ACM-ICPC, Asia Dhaka Regional Contest] H Tile Game（模拟，循环节）
题面：
题意：
给定一个数字迷盘，每一个# 字符代表一种不同的颜色。
我们可以对迷盘进行上下左右四种操作，分别表示将迷盘中的数字按方向平行移动到对应方向。
我们当所有数字都在左下角，我们称为是一个稳定的状态。
现在给你一个稳定的迷盘，你可以做任意方向操作任意次，问你能得到多少种迷盘？
当有数字在不同的位置时，我们称为该迷盘不同。
思路：
我们设一组“上右下左”是一个正循环，一组“右上左下”是一个负循环。
我们可以知道一个稳定的状态先正循环，再来一次负循环之后，会回到原状态。
那么我们想得到更多的不同状态，就到一直正循环（或者一直负循环）移动。
并且所有的稳定状态的形状都是相同的。
通过分析发现，不同的数字之间构成一个循环圈，且会存在多少个循环圈的情况，
设第(mathit i)个圈的长度为(C_i),那么这些圈能构成的所有状态就是(LCM(C_i))，道理和多个循环节求公共循环节一样。
那么我们模拟正循环一下，通过数字的坐标变换看一下圈的信息，然后求出答案即可。
因为涉及到取模，而普通取lcm的算法不能进行取模运算。所以我们用唯一分解定理将每一个数分成为不同质数的幂次积形式，然后对每一个质因子幂次取最大值即可。（lcm的本质意义）
代码：
#include <iostream>
#include <cstdio>
#include <algorithm>
#include <bits/stdc++.h>
#define ALL(x) (x).begin(), (x).end()
#define sz(a) int(a.size())
#define rep(i,x,n) for(int i=x;i<n;i++)
#define repd(i,x,n) for(int i=x;i<=n;i++)
#define pii pair<int,int>
#define pll pair<long long ,long long>
#define gbtb ios::sync_with_stdio(false),cin.tie(0),cout.tie(0)
#define MS0(X) memset((X), 0, sizeof((X)))
#define MSC0(X) memset((X), ' ', sizeof((X)))
#define pb push_back
#define mp make_pair
#define fi first
#define se second
#define eps 1e-6
#define chu(x) if(DEBUG_Switch) cout<<"["<<#x<<" "<<(x)<<"]"<<endl
#define du3(a,b,c) scanf("%d %d %d",&(a),&(b),&(c))
#define du2(a,b) scanf("%d %d",&(a),&(b))
#define du1(a) scanf("%d",&(a));
using namespace std;
typedef long long ll;
ll gcd(ll a, ll b) {return b ? gcd(b, a % b) : a;}
ll lcm(ll a, ll b) {return a / gcd(a, b) * b;}
ll powmod(ll a, ll b, ll MOD) { if (a == 0ll) {return 0ll;} a %= MOD; ll ans = 1; while (b) {if (b & 1) {ans = ans * a % MOD;} a = a * a % MOD; b >>= 1;} return ans;}
ll poww(ll a, ll b) { if (a == 0ll) {return 0ll;} ll ans = 1; while (b) {if (b & 1) {ans = ans * a ;} a = a * a ; b >>= 1;} return ans;}
void Pv(const vector<int> &V) {int Len = sz(V); for (int i = 0; i < Len; ++i) {printf("%d", V[i] ); if (i != Len - 1) {printf(" ");} else {printf("
");}}}
void Pvl(const vector<ll> &V) {int Len = sz(V); for (int i = 0; i < Len; ++i) {printf("%lld", V[i] ); if (i != Len - 1) {printf(" ");} else {printf("
");}}}
inline long long readll() {long long tmp = 0, fh = 1; char c = getchar(); while (c < '0' || c > '9') {if (c == '-') fh = -1; c = getchar();} while (c >= '0' && c <= '9') tmp = tmp * 10 + c - 48, c = getchar(); return tmp * fh;}
inline int readint() {int tmp = 0, fh = 1; char c = getchar(); while (c < '0' || c > '9') {if (c == '-') fh = -1; c = getchar();} while (c >= '0' && c <= '9') tmp = tmp * 10 + c - 48, c = getchar(); return tmp * fh;}
void pvarr_int(int *arr, int n, int strat = 1) {if (strat == 0) {n--;} repd(i, strat, n) {printf("%d%c", arr[i], i == n ? '
' : ' ');}}
void pvarr_LL(ll *arr, int n, int strat = 1) {if (strat == 0) {n--;} repd(i, strat, n) {printf("%lld%c", arr[i], i == n ? '
' : ' ');}}
const int maxn = 40010;
const int inf = 0x3f3f3f3f;
/*** TEMPLATE CODE * * STARTS HERE ***/
#define DEBUG_Switch 0
int n, m;
int minfac[maxn];
std::vector<int> prime;
void init_prime()
{
for (int i = 2; i < maxn; ++i)
{
if (!minfac[i])
{
minfac[i] = i;
prime.push_back(i);
}
for (auto u : prime)
{
if (1ll * i * u >= maxn)
{
break;
}
minfac[i * u] = u;
if (minfac[i] % u == 0)
{
break;
}
}
}
/*
O(log(cnt))唯一分解 cnt
while (cnt > 1)
{
int tmp = minfac[cnt];
int ccnt = 0;
while (cnt % tmp == 0){
++ ccnt;
cnt /= tmp;
}
//tmp^ccnt;
}
*/
}
char s[202][202];
int a[202][202];
int b[202][202];
void up()
{
repd(j, 1, m)
{
int num = 0;
for (int i = 1; i <= n; ++i)
{
if (a[i][j] == 0)
{
num++;
} else
{
break;
}
}
repd(i, 1, n)
{
if (a[i][j] != 0)
{
a[i - num][j] = a[i][j];
if (num)
a[i][j] = 0;
}
}
}
}
void down()
{
repd(j, 1, m)
{
int num = 0;
for (int i = n; i >= 1; --i)
{
if (a[i][j] == 0)
{
num++;
} else
{
break;
}
}
for (int i = n; i >= 1; --i)
{
if (a[i][j] != 0)
{
a[i + num][j] = a[i][j];
if (num)
a[i][j] = 0;
}
}
}
}
void left()
{
repd(i, 1, n)
{
int num = 0;
for (int j = 1; j <= m; ++j)
{
if (a[i][j] == 0)
{
num++;
} else
{
break;
}
}
for (int j = 1; j <= m; ++j)
{
if (a[i][j] != 0)
{
a[i][j - num] = a[i][j];
if (num)
a[i][j] = 0;
}
}
}
}
void right()
{
repd(i, 1, n)
{
int num = 0;
for (int j = m; j >= 1; --j)
{
if (a[i][j] == 0)
{
num++;
} else
{
break;
}
}
for (int j = m; j >= 1; --j)
{
if (a[i][j] != 0)
{
a[i][j + num] = a[i][j];
if (num)
a[i][j] = 0;
}
}
}
}
int max_pow[maxn];
int vis[maxn];
pii pos[maxn];
const ll mod = 78294349ll;
void solve()
{
MS0(vis);
MS0(max_pow);
int id = 0;
repd(i, 1, n)
{
repd(j, 1, m)
{
if (s[i][j] == '.')
{
a[i][j] = 0;
} else
{
a[i][j] = ++id;
}
b[i][j] = a[i][j];
}
}
up();
right();
down();
left();
repd(i, 1, n)
{
repd(j, 1, m)
{
if (b[i][j] > 0)
{
pos[b[i][j]] = mp(i, j);
}
}
}
repd(i, 1, id)
{
if (vis[i]) {
continue;
}
pii temp = pos[i];
int now = a[temp.fi][temp.se];
int num = 1;
while (now != i)
{
num++;
temp = pos[now];
now = a[temp.fi][temp.se];
}
while (num > 1)
{
int cnt = 0;
int fac = minfac[num];
while (num % fac == 0)
{
num /= fac;
cnt++;
}
max_pow[fac] = max(cnt, max_pow[fac]);
}
}
ll ans = 1ll;
repd(i, 2, maxn - 1)
{
if (max_pow[i] > 0)
{
ans = ans * powmod(i, max_pow[i], mod) % mod;
}
}
printf("%lld
", ans );
}
int main()
{
#if DEBUG_Switch
freopen("C:\code\input.txt", "r", stdin);
#endif
//freopen("C:\code\output.txt","w",stdout);
int t;
init_prime();
t = readint();
for (int icase = 1; icase <= t; ++icase)
{
n = readint();
m = readint();
repd(i, 1, n) {
scanf("%s", s[i] + 1);
}
printf("Case %d: ", icase );
solve();
}
return 0;
}