#define _USE_MATH_DEFINES #pragma GCC target("avx2") #pragma GCC optimize("O3") #include #include #include #include #include #include using namespace std; #define LP(I,S,G) for (long long int I = (S); I < (G); ++I) #define IN(X) for (int in = 0; in < X.size(); in++)cin >> X[in] #define OUT(X) for (int in = 0; in < X.size(); in++)cout << X[in]<<" " #define SORT(X) sort((X).begin(), (X).end()) #define CSORT(X,Y) sort(X.begin(), X.end(),Y) #define COPY(X,Y) copy(X.begin(), X.end(), Y.begin()) #define ALL(X,Y) for (auto (X) :(Y)) #define FULL(a) (a).begin(),(a).end() #define BFS(Q,S) for(Q.push(S);Q.size()!=0;Q.pop()) typedef long long int ll; typedef unsigned long long int ull; long long int M = 998244353; chrono::system_clock::time_point starttime; using namespace std::chrono; #ifndef ONLINE_JUDGE #define DEBUG #endif inline float getTime() { #ifdef DEBUG return duration_cast(system_clock::now() - starttime).count() * 2.0; #else return duration_cast(system_clock::now() - starttime).count(); #endif } int dx[] = { -1,0,1,0 }, dy[] = { 0,1,0,-1 }; ll MAX(ll A, ll B) { return ((A) > (B) ? (A) : (B)); } ll MIN(ll A, ll B) { return ((A) < (B) ? (A) : (B)); } inline long long int xor128() { static long long int x = 123456789, y = 362436069, z = 521288629, w = 88675123; long long int t = (x ^ (x << 11)); x = y; y = z; z = w; return (w = (w ^ (w >> 19)) ^ (t ^ (t >> 8))); } inline int convert(int x, int y, int z = 50) { return x + y * z; } inline int get_dist(int fx, int fy, int tx, int ty) { return abs(fx - tx) + abs(fy - ty); } inline int get_dist(pair f,pair t) { return get_dist(f.first, f.second, t.first, t.second); } array, 50> set_bomb(array& a, array>>, 20>& bomb) { constexpr int n = 50, m = 20; array t, cnt; array, 50> plan = { -1 }; array, 20> priority; for (int i = 0; i < m; ++i) priority[i] = {-(int)bomb[i].second.size(),i }; SORT(priority); for (int y = 0; y < n; ++y) { for (int x = 0; x < n; ++x) { cnt[convert(x, y)] = 0; if (a[y][x] != '.') t[convert(x, y)] = 1; else t[convert(x, y)] = 0; } } int cost = 0; priority_queue>> pq; for (int i = 0; i < m; ++i)cerr << priority[i].first << " "; cerr << "\n"; for (int x = 0; x < n; ++x) { for (int y = 0; y < n; ++y) { int dist = INT_MAX; plan[y][x] = priority[0].second; for (int i = 0; i < m/10; ++i) { int now_dist = -1; for (auto &d : bomb[priority[i].second].second) { int nx = x + d.first, ny = y + d.second; if (nx < 0 || ny < 0 || nx >= n || ny >= n)continue; if (a[ny][nx] == '@')now_dist = max(now_dist, get_dist(x, y, nx, ny)); } if (dist == -1)dist = INT_MAX; if (dist > now_dist) { dist = now_dist; plan[y][x] = priority[i].second; } } if (dist == -1)dist = 100; pq.push({ dist,{x,y} }); cost += bomb[plan[y][x]].first; for (auto &d : bomb[plan[y][x]].second) { int nx = x + d.first, ny = y + d.second; if (nx < 0 || ny < 0 || nx >= n || ny >= n)continue; ++cnt[convert(nx, ny)]; } } } int bomb_cnt = n * n; while (pq.size() != 0) { int x = pq.top().second.first, y = pq.top().second.second; bool ok = 1; pq.pop(); for (auto &d : bomb[plan[y][x]].second) { int nx = x + d.first, ny = y + d.second; if (nx < 0 || ny < 0 || nx >= n || ny >= n)continue; ok &= ((cnt[convert(nx, ny)] > 1) || (t[convert(nx, ny)] == 0)); } if (ok) { for (auto &d : bomb[plan[y][x]].second) { int nx = x + d.first, ny = y + d.second; if (nx < 0 || ny < 0 || nx >= n || ny >= n)continue; --cnt[convert(nx, ny)]; } cost -= bomb[plan[y][x]].first; plan[y][x] = -1; --bomb_cnt; } } cerr << cost << "\n"; return plan; } vector> set_shopOrder(array& a) { constexpr int n = 50, m = 20; vector> point(1); int cnt = 1; point[0] = { 0,0 }; for (int y = 0; y < n; ++y) { for (int x = 0; x < n; ++x) { if (a[y][x] == '@')point.push_back({ x,y }), ++cnt; } } vector dist(cnt*cnt); vector> result(cnt); vector order(cnt); for (int u = 0; u < cnt; ++u) { order[u] = u; for (int v = 0; v < cnt; ++v) { dist[convert(u, v, cnt)] = abs(point[u].first - point[v].first) + abs(point[u].second - point[v].second); } } int score = 0; for (int i = 0; i < cnt-1; ++i)score += dist[convert(order[i], order[i + 1], cnt)]; double time = getTime(); while ((time=getTime()) <= 1500) { double temp = 2 + 8 * ((1500.0-time) / 1500.0); int a = xor128() % (cnt-1); int b = a + 1 + xor128() % (cnt-1 - a); int d = a + 1, c = b + 1; int cost; if (b == cnt-1) { cost = dist[convert(order[a], order[b], cnt)] - dist[convert(order[a], order[d], cnt)]; } else { cost = dist[convert(order[a], order[b], cnt)] + dist[convert(order[c], order[d], cnt)] - (dist[convert(order[a], order[d], cnt)] + dist[convert(order[b], order[c], cnt)]); } if (xor128() % 10000 < exp(-cost / temp) * 10000) { score += cost; while (d < b) { swap(order[d], order[b]); ++d, --b; } } } for (int i = 0; i < cnt; ++i) { result[i] = point[order[i]]; } score = 0; for (int i = 0; i < cnt-1; ++i)score += dist[convert(order[i], order[i + 1], cnt)]; return result; } int add_vertex(int v, vector& g, vector>& dp, vector>& vertex, bool is_last = 0) { for (int i = 0; i < dp.size(); ++i)dp[i].resize(dp[i].size() * 2, INT_MAX); dp.emplace_back(vector(dp[0].size(), INT_MAX)); g.emplace_back(v); if (is_last)dp[dp.size() - 1][(1 << (dp.size() - 1))] = 0; for (int x = (1 << (g.size() - 1)); x < (1 << g.size()); ++x) { for (int i = 0; i < dp.size(); ++i) { if ((x&(1 << i)) == 0)continue; int y = (x ^ (1 << i)); int cnt = 0; for (int k = 0; k < dp.size(); ++k) { cnt += ((y&(1 << k)) != 0); } for (int k = 0; k < dp.size(); ++k) { if ((y&(1 << k)) == 0)continue; if (dp[k][y] == INT_MAX)continue; dp[i][x] = min(dp[i][x], dp[k][y] + (int)pow(cnt+is_last, 2)*get_dist(vertex[g[i]], vertex[g[k]])); } } } if (!is_last)return dp[1][(1 << dp.size()) - 1]; else return dp[0][(1 << dp.size()) - 1]; } vector> restore_order(vector& g, vector>& dp, vector>& vertex, bool is_last = 0) { int now = (!is_last); int x = (1 << dp.size()) - 1; vector> order; while (x != 0) { int y = (x ^ (1 << now)); int cnt = 0; for (int k = 0; k < dp.size(); ++k) { cnt += ((y&(1 << k)) != 0); } order.emplace_back(vertex[g[now]]); for (int i = 0; i < dp.size(); ++i) { if ((y&(1 << i)) == 0)continue; if (dp[i][y] == LLONG_MAX)continue; if (dp[now][x] == dp[i][y] + (int)pow(cnt + is_last, 2)*get_dist(vertex[g[now]], vertex[g[i]])) { now = i; break; } } x = y; } return order; } void remove_vertex(vector& g, vector>& dp) { g.pop_back(); dp.pop_back(); for (int i = 0; i < dp.size(); ++i)dp[i].resize(dp[i].size() / 2); } vector> set_destroyOrder(vector>& shopOrder, array, 50>& bombPlan, array& a, array>>, 20>& bomb) { constexpr int n = 50, m = 20; int bomb_cnt = 0, shop_cnt = shopOrder.size(); array, 50> id; vector> vertex(shopOrder.begin(), shopOrder.end()); vector cost_shop(shop_cnt); vector> g(shop_cnt); vector>> dp(shop_cnt); for (int y = 0; y < n; ++y) { for (int x = 0; x < n; ++x) { if (bombPlan[y][x] != -1)vertex.push_back({ x,y }), ++bomb_cnt; id[y][x] = -1; } } vector> cost_bomb(bomb_cnt, vector(shop_cnt)); vector, vector>, greater>>> pq(bomb_cnt); vector start(bomb_cnt, 1); vector ok(bomb_cnt, 0); for (int i = 0; i < shop_cnt; ++i) { id[shopOrder[i].second][shopOrder[i].first] = i; if (i < shop_cnt-1) { cost_shop[i] = get_dist(shopOrder[i], shopOrder[i + 1]); dp[i] = vector>(2, vector(4, INT_MAX)); dp[i][0][1] = 0; dp[i][1][3] = cost_shop[i]; g[i].emplace_back(i + 1); g[i].emplace_back(i); } else { cost_shop[i] = 0; dp[i] = vector>(1, vector(2, INT_MAX)); dp[i][0][1] = 0; g[i].emplace_back(i); } } for (int i = 0; i < bomb_cnt; ++i) { int x = vertex[shop_cnt + i].first, y = vertex[shop_cnt + i].second; for (auto &d : bomb[bombPlan[y][x]].second) { int nx = x + d.first, ny = y + d.second; if (nx < 0 || ny < 0 || nx >= n || ny >= n)continue; if (a[ny][nx] == '@')start[i] = max(start[i], id[ny][nx]); } for (int k = start[i]; k < shop_cnt; ++k) { cost_bomb[i][k] = add_vertex(i + shop_cnt, g[k], dp[k], vertex, (k == shop_cnt-1)) - cost_shop[k]; remove_vertex(g[k], dp[k]); pq[i].push({ cost_bomb[i][k],k }); } } for (int now = 0; now < bomb_cnt; ++now) { int maxVal = INT_MIN, id = 0; for (int i = 0; i < bomb_cnt; ++i) { if (ok[i])continue; while (pq[i].top().first != cost_bomb[i][pq[i].top().second])pq[i].pop(); if (maxVal < pq[i].top().first) { maxVal = pq[i].top().first; id = i; } } int tar = pq[id].top().second; cost_shop[tar] = add_vertex(id + shop_cnt, g[tar], dp[tar], vertex, (tar == shop_cnt-1)); ok[id] = 1; for (int i = 0; i < bomb_cnt; ++i) { if (ok[i])continue; if (tar < start[i])continue; cost_bomb[i][tar] = add_vertex(i + shop_cnt, g[tar], dp[tar], vertex, (tar == shop_cnt-1)) - cost_shop[tar]; remove_vertex(g[tar], dp[tar]); pq[i].push({ cost_bomb[i][tar],tar }); } } vector> order; int cost = 0; for (int i = 0; i < shop_cnt; ++i) { cost += cost_shop[i]; if (i != 0 && g[i].size() == 2 - (i == shop_cnt - 1)) continue; vector> new_order = restore_order(g[i], dp[i], vertex, (i == shop_cnt - 1)); for (int k = 0; k < new_order.size() - (i != shop_cnt - 1); ++k) order.push_back({ new_order[k].first,new_order[k].second,(k == 0 && i != 0) }); } cerr << cost << "\n"; return order; } string dijkstra(int sx, int sy, int gx, int gy, array& a) { constexpr int n = 50, m = 20; string t = "LDRU"; vector> d(n, vector(n, INT_MAX)), from(n, vector(n, -1)); d[gy][gx] = 0; priority_queue>, vector>>, greater>>> pq; pq.push({ 0,{gx,gy} }); while (pq.size() != 0) { int c = pq.top().first, x = pq.top().second.first, y = pq.top().second.second; pq.pop(); if (d[y][x] != c)continue; if (x == sx && y == sy)break; for (int i = 0; i < 4; ++i) { int nx = x + dx[i], ny = y + dy[i]; if (nx < 0 || ny < 0 || nx >= n || ny >= n)continue; int nd = d[y][x] + 1 + (a[ny][nx] != '.'); if (d[ny][nx] > nd) { d[ny][nx] = nd; from[ny][nx] = (i + 2) % 4; pq.push({ nd,{nx,ny} }); } } } int x = sx, y = sy; string move = ""; while (x != gx || y != gy) { int i = from[y][x]; move += t[i]; x += dx[i], y += dy[i]; } return move; } vector>> set_move(array, 50>& bombPlan, vector>& order, array& a, array>>, 20>& bomb) { constexpr int n = 50, m = 20; vector>> result; for (int now = 0; now < order.size() - 1; ++now) { string move = dijkstra(order[now][0], order[now][1], order[now + 1][0], order[now + 1][1], a); for (auto act : move)result.push_back({ 1,{act,0} }); if (order[now + 1][2]) { for (int i = now + 2; i < order.size(); ++i) { if (order[i][2])break; int x = order[i][0], y = order[i][1]; result.push_back({ 2,{'.',bombPlan[y][x] + 1} }); } } else { int x = order[now + 1][0], y = order[now + 1][1]; result.push_back({ 3,{'.',bombPlan[y][x] + 1} }); for (auto &d : bomb[bombPlan[y][x]].second) { int nx = x + d.first, ny = y + d.second; if (nx < 0 || ny < 0 || nx >= n || ny >= n)continue; a[ny][nx] = '.'; } } } return result; } int main(int argc, char* argv[]) { starttime = chrono::system_clock::now(); ios::sync_with_stdio(false); std::cin.tie(nullptr); int n, m; cin >> n >> m; array a; array>>,20> bomb; IN(a); for (int i = 0; i < m; ++i) { int c, l; cin >> c >> l; bomb[i].first = c; for (int k = 0; k < l; ++k) { int x, y; cin >> x >> y; bomb[i].second.push_back({ y,x }); } sort(FULL(bomb[i].second)); } vector> shopOrder = set_shopOrder(a); array, 50> plan = set_bomb(a, bomb); vector> order = set_destroyOrder(shopOrder, plan, a, bomb); vector>> move = set_move(plan, order, a, bomb); cout << move.size() << "\n"; for (auto act : move) { cout << act.first << " "; if (act.first == 1)cout << act.second.first << "\n"; else cout << act.second.second << "\n"; } exit(0); }