Problem:
Problem E: こたつがめを燃やさないで

Problem

こたつがめは甲羅がこたつの亀です。

こたつがめはぽきた(起床する事)途端、格子状の区画に区切られているステージに閉じ込められました。このステージには、ただ一つの出口があります。
区画は道、塀または爆弾のいずれかであり、こたつがめは上下左右に移動することで、道または爆弾の区画に侵入することができます。
斜めには移動できません。また、塀の区画は通ることができません。ステージの外にも道の区画が無限に広がっていますが亀の天敵であるワニがいる為、通る事はできません。

こたつがめはさっさと帰宅してねね(睡眠する事)を行いたいので、このステージの出口に向かおうと思いました。

こたつの赤外線を自在に操る事ができるこたつがめは、自身の周囲8区画を同時に道に変える能力を持っています。
しかし、その8区画と自身がいるいずれかの区画が爆弾の区画の場合、誘爆してこたつがめは炎上し、ねねどころか有名SNS「カメったー」すら出来なくなってしまうので能力を発動する事ができません。

例を図示します。イラストが配置されていない区画とこたつがめがいる区画は道の区画です。
こたつがめの周囲8区画とはオレンジ色の区画を指します。左の図ではこたつがめの周囲8区画、および自身がいる区画に爆弾の区画は含まれていない為、能力を発動できます。
しかし、右の図では周囲8区画、および自身がいる区画のいずれかに爆弾の区画が含まれている為、能力を発動する事ができません。

移動するコストは1区画の移動ごとに$A$、能力を発動するコストは1回あたり$B$です。道に変えた塀あたりのコストではない事に注意してください。開始地点とステージの出口は道です。
開始地点からステージの出口に着くまでの移動するコストと能力を発動するコストの合計の最小値を出力してください。ただし、ステージの出口に到達できない場合は代わりに"INF"と出力してください。

Input

入力は以下の形式で与えられる。

$H$ $W$ $A$ $B$
$c_{1,1} \cdots c_{1,W}$
$\vdots$
$c_{H,1} \cdots c_{H,W}$

入力は$H+1$行からなる。

$1$行目には上下の長さを表す整数$H$、左右の長さを表す整数$W$、移動するコストを表す整数$A$、能力を発動するコストを表す整数$B$がそれぞれ空白区切りで与えられる。

$2$行目からの$H$行には、こたつがめが閉じ込められたステージの各区画における状態$c_{i,j}$が与えられる。

$c_{i,j}$はそれぞれ's','g','.','#','*'のいずれかからなり、区画$(i,j)$が下記のような状態であることを表す。

's' : その区画が開始地点であることを表す。

'g' : その区画がステージの出口であることを表す。

'.' : その区画が道であることを表す。

'#' : その区画が塀であることを表す。

'*' : その区画が爆弾であることを表す。

Constraints

入力は以下の条件を満たす。

$1 \le H,W,A,B \le 1000$

$3 \le H+W$

$c_{i,j} \in${'s','g','.','#','*'}

's','g'はそれぞれ1回ずつ出現する

Output

開始地点からステージの出口に着くまでの移動するコストと能力を発動するコストの合計の最小値を出力してください。ただし、ステージの出口に到達できない場合は代わりに"INF"と出力してください。

Sample input 1

4 4 1 1
g#..
#...
.*..
...s

Sample output 1

7

Sample input 2

4 4 1 1
g#..
#*..
....
...s

Sample output 2

INF

Sample input 3

2 4 1 1
###g
s###

Sample output 3

6

Sample input 4

3 3 1 10
g..
##.
s..

Sample output 4

6

Sample input 5

3 3 10 1
g..
##.
s..

Sample output 5

21

Solution in C (judge verdict: Accepted)

// AOJ 3055 Don't Burn Kotatsu Turtle
// 2019.4.7 bal4u

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

//// 高速入力
#if 1
#define gc() getchar_unlocked()
#define pc(x) putchar_unlocked(x)
#else
#define gc() getchar()
#define pc(x) putchar(x)
#endif
int in()    // 非負整数の入力
{
	int n = 0, c = gc();
	//	while (isspace(c)) c = gc();
	do n = 10 * n + (c & 0xf), c = gc(); while (c >= '0');
	return n;
}

void ins(char *s)  // 文字列の入力　スペース以下の文字で入力終了
{
	do *s = gc();
	while (*s++ > ' ');
	*(s - 1) = 0;
}


//// 優先度付きキュー（ダイクストラ法用）
#define MAX 500000
typedef struct { long long t; short r, c; } QUE;
QUE que[MAX]; int qsize;

#define PARENT(i) ((i)>>1)
#define LEFT(i)   ((i)<<1)
#define RIGHT(i)  (((i)<<1)+1)

void min_heapify(int i)
{
	int l, r, min;
	QUE qt;

	l = LEFT(i), r = RIGHT(i);
	if (l < qsize && que[l].t < que[i].t) min = l; else min = i;
	if (r < qsize && que[r].t < que[min].t) min = r;
	if (min != i) {
		qt = que[i]; que[i] = que[min]; que[min] = qt;
		min_heapify(min);
	}
}

void deq()
{
	que[0] = que[--qsize];
	min_heapify(0);
}

void enq(int r, int c, long long t)
{
	int i, min;
	QUE qt;

	i = qsize++;
	que[i].t = t, que[i].r = r, que[i].c = c;
	while (i > 0 && que[min = PARENT(i)].t > que[i].t) {
		qt = que[i]; que[i] = que[min]; que[min] = qt;
		i = min;
	}
}


//// 本問題関連
#define MAXV 1005
char vis[MAXV][MAXV];
char map[MAXV][MAXV]; int H, W;
char bomb[MAXV][MAXV];
int A, B;
int mv[8][2] = { {-1,0},{0,1},{1,0},{0,-1},{-1,-1},{-1,1},{1,1},{1,-1} };
int tt[8][2];

long long dijkstra(int sr, int sc, int gr, int gc)
{
	int i, k, r, c, f, g, rr, cc;
	long long t;

	enq(sr, sc, 0);
	while (qsize) {
		r = que[0].r, c = que[0].c, t = que[0].t, deq();
		if (r == gr && c == gc) return t;
		if (vis[r][c]) continue;
		vis[r][c] = 1;

		f = bomb[r][c], k = (2-f) << 2;
		for (i = 0; i < k; i++) {
			rr = r + mv[i][0], cc = c + mv[i][1];
			if (rr < 1 || rr > H || cc < 1 || cc > W) continue;
			g = (map[rr][cc] == '#');
			if (f && g) continue;
			if ((i < 4 || g) && !vis[rr][cc]) enq(rr, cc, t + tt[i][g]);
		}
	}
	return -1LL;
}


int main()
{
	int i, r, c, sr, sc, tr, tc;
	long long ans;

	H = in(), W = in(), A = in(), B = in();
	for (r = 1; r <= H; r++) {
		ins(map[r]+1);
		for (c = 1; c <= W; c++) {
			if (map[r][c] == '*') {
				bomb[r][c] = 1;
				for (i = 0; i < 8; i++)
					bomb[r + mv[i][0]][c + mv[i][1]] = 1;
			}
			else if (map[r][c] == 's') sr = r, sc = c;
			else if (map[r][c] == 'g') tr = r, tc = c;
		}
	}
	for (i = 0; i < 4; i++) tt[i][0] = A, tt[i][1] = A + B;
	A <<= 1;
	for (; i < 8; i++) tt[i][0] = A, tt[i][1] = A + B;

	ans = dijkstra(sr, sc, tr, tc);
	if (ans >= 0) printf("%lld\n", ans);
	else puts("INF");
	return 0;
}