#include <bits/stdc++.h>
#include <ext/pb_ds/assoc_container.hpp> // Common file
#include <ext/pb_ds/tree_policy.hpp> // Including tree_order_statistics_node_update

using namespace std;
using namespace __gnu_pbds;

typedef tree<int, null_type, less<int>, rb_tree_tag, tree_order_statistics_node_update>
ordered_set;	

struct splitmix64_hash {
	static uint64_t splitmix64(uint64_t x) {
		// http://xorshift.di.unimi.it/splitmix64.c
		x += 0x9e3779b97f4a7c15;
		x = (x ^ (x >> 30)) * 0xbf58476d1ce4e5b9;
		x = (x ^ (x >> 27)) * 0x94d049bb133111eb;
		return x ^ (x >> 31);
	}
 
	size_t operator()(uint64_t x) const {
		static const uint64_t FIXED_RANDOM = std::chrono::steady_clock::now().time_since_epoch().count();
		return splitmix64(x + FIXED_RANDOM);
	}
};
 
template <typename K, typename V, typename Hash = splitmix64_hash>
using hash_map = __gnu_pbds::gp_hash_table<K, V, Hash>;
 
template <typename K, typename Hash = splitmix64_hash>
using hash_set = hash_map<K, __gnu_pbds::null_type, Hash>;

template<class A,class B>auto&operator<<(ostream&o,pair<A,B>p){return o<<'('<<p.first<<", "<<p.second<<')';}
template<class T>auto operator<<(ostream&o,T x)->decltype(x.end(),o){o<<'{';int i=0;for(auto e:x)o<<", "+2*!i++<<e;return o<<'}';}
#ifdef DEBUG
#define debug(x...) cerr<<"["#x"]: ",[](auto...a){((cerr<<a<<"; "),...);}(x),cerr<<'\n'
#else
#define debug(...) {}
#endif

#define FOR(i,a,b) for(int i = (a); i <= (b); ++i)
#define FORD(i,a,b) for(int i = (a); i >= (b); --i)
#define RI(i,n) FOR(i,1,(n))
#define REP(i,n) FOR(i,0,(n)-1)
#define mini(a,b) a=min(a,b)
#define maxi(a,b) a=max(a,b)
#define pb push_back
#define st first
#define nd second
#define sz(w) (int) w.size()
typedef vector<int> vi;
typedef long long ll;
typedef long double ld;
typedef pair<int, int> pii;
typedef pair<ll, ll> pll;
typedef pair<pii, int> para;
const ll inf = 1e18 + 7;
const ll maxN = 100 + 5;
const ll MOD = 1e9 + 7;

string s[maxN];
int n;
ll ans = 0;

bool inRange(int x, int y) {
	return x >= 0 && x < n && y >= 0 && y < n;
}


bool inRange(pii p) {
	return inRange(p.st, p.nd);
}


vector<pii> neigh = {{-1, 0}, {0, 1}, {1, 0}, {0, -1}};
vector<pii> knight = {{-2, 1}, {-2, -1}, {2, 1}, {2, -1}, {1, -2}, {1, 2}, {-1, 2}, {-1, -2}};

pii add(pii p1, pii p2) {
	return {p1.st + p2.st, p1.nd + p2.nd};
}

vector<pii> getNeighbors(pii p) {
	vector<pii> ans;
	for (auto nn: neigh) {
		pii nw = add(nn, p);
		if (inRange(nw)) {
			ans.pb(nw);
		}
	}
	return ans;
}

int getFreq(char c) {
	int cnt = 0;
	REP(i, n) {
		REP(j, n) {
			cnt += s[i][j] == c;
		}
	}
	return cnt;
}

bool isBird(char c) {
	return c == 'D' || c == 'v';
}

bool isAnimal(char c) {
	return c == 'D' || c == 'v' || c == '!';
}

void emptyFields() {
	ans += getFreq(' ');
}

void housesAndGrills() {
	int houses = getFreq('^'), grills = getFreq('G');
	ans += 3 * min(houses, grills);
}

void grillDrake() {
	REP(i, n) {
		REP(j, n) {
			if (s[i][j] != 'G') continue;
			bool ok = false;
			pii p = {i, j};
			for (auto nw: getNeighbors(p)) {
				if (s[nw.st][nw.nd] == 'D') {
					ok = true;
				}
			}
			if (ok) ans += 50;
		}
	}
}

void drakeGrill() {
	REP(i, n) {
		REP(j, n) {
			if (s[i][j] != 'D') continue;
			bool ok = false;
			pii p = {i, j};
			for (auto nw: getNeighbors(p)) {
				if (s[nw.st][nw.nd] == 'G') {
					ok = true;
				}
			}
			if (ok) ans += 500;
		}
	}
}


void chupacabra() {
	REP(i, n) {
		REP(j, n) {
			if (s[i][j] != '!') continue;
			pii p = {i, j};
			for (auto nn: knight) {
				pii nw = add(nn, p);
				if (inRange(nw)) {
					if (isBird(s[nw.st][nw.nd])) {
						ans += 200;
					}
				}
			}
		}
	}
}

void animals1() {
	REP(i, n) {
		REP(j, n) {
			if (!isAnimal(s[i][j])) continue;
			pii p = {i, j};
			for (auto nw: getNeighbors(p)) {
				if (s[nw.st][nw.nd] == ' ') {
					ans += 15;
				}
			}
		}
	}
}

void animals2() {
	int c = 0, b = 0, d = 0;
	REP(i, n) {
		REP(j, n) {
			if (s[i][j] == 'v') b++;
			if (s[i][j] == '!') c++;
			if (s[i][j] == 'D') d++;
		}
	}
	ans += b * c * d;
}

void houseViewUp() {
	REP(i, n) {
		REP(j, n) {
			if (s[i][j] != '^') continue;
			FORD(k, i - 1, 0) {
				if (s[k][j] == ' ') ans += 10;
				else break;
			}
		}
	}
}

void houseViewDown() {
	REP(i, n) {
		REP(j, n) {
			if (s[i][j] != '^') continue;
			FOR(k, i + 1, n - 1) {
				if (s[k][j] == ' ') ans += 5;
				else break;
			}
		}
	}
}

void minimumFreq() {
	vector<int> a = {
		getFreq('*'), getFreq('^'), getFreq('!'), getFreq('/'),
		getFreq('\\'), getFreq('v'), getFreq('D'), getFreq('G')
	};
	int minim = n * n * n;
	for (auto x: a) {
		if (x != 0) minim = min(minim, x);
	}
	for (auto x: a) {
		if (x == minim) ans += x * 10;
	}
}

void peaks() {
	vector<pii> tmp;
	REP(i, n) {
		REP(j, n - 1) {
			if (s[i][j] == '/' && s[i][j + 1] == '\\') {
				tmp.pb({i, j});
			}
		}
	}
	for (auto x: tmp) {
		int maxDist = 0;
		for (auto y: tmp) {
			maxDist = max(maxDist, abs(y.st - x.st) + abs(y.nd - x.nd));
		}
		ans += maxDist * 50;
	}
}

void suns() {
	vector<vi> taken(n, vi(n));
	REP(i, n) {
		REP(j, n) {
			if (s[i][j] != '*') continue;
			
			// left
			FORD(k, j - 1, 0) {
				if (s[i][k] != ' ') {
					taken[i][k] = true;
					break;
				}
			}
			
			// right
			FOR(k, j + 1, n - 1) {
				if (s[i][k] != ' ') {
					taken[i][k] = true;
					break;
				}
			}
			
			// up
			FORD(k, i - 1, 0) {
				if (s[k][j] != ' ') {
					taken[k][j] = true;
					break;
				}
			}
			
			// down
			FOR(k, i + 1, n - 1) {
				if (s[k][j] != ' ') {
					taken[k][j] = true;
					break;
				}
			}
			pii p = {i, j};
			// left up
			FOR(diff, 1, n) {
				pii nw = add(p, {diff, diff});
				// pii nw2 = add(p, {diff, -diff});
				// pii nw3 = add(p, {-diff, diff});
				// pii nw4 = add(p, {-diff, -diff});
				if (!inRange(nw)) break;
				if (s[nw.st][nw.nd] != ' ') {
					taken[nw.st][nw.nd] = true;
					break;
				}
			}
		
			FOR(diff, 1, n) {
				pii nw = add(p, {-diff, diff});
				if (!inRange(nw)) break;
				if (s[nw.st][nw.nd] != ' ') {
					taken[nw.st][nw.nd] = true;
					break;
				}
			}
			
			FOR(diff, 1, n) {
				pii nw = add(p, {-diff, -diff});
				if (!inRange(nw)) break;
				if (s[nw.st][nw.nd] != ' ') {
					taken[nw.st][nw.nd] = true;
					break;
				}
			}
			
			FOR(diff, 1, n) {
				pii nw = add(p, {diff, -diff});
				if (!inRange(nw)) break;
				if (s[nw.st][nw.nd] != ' ') {
					taken[nw.st][nw.nd] = true;
					break;
				}
			}
		}
	}
	REP(i, n) {
		REP(j, n) {
			if (taken[i][j] && s[i][j] != '*') ans += 100;
		}
	}
}

void threeBlocks() {
	if (n <= 2) {
		// TODO check?
		return;
	}
	set<string> st;
	REP(i, n - 2) {
		REP(j, n - 2) {
			string tmp = "";
			FOR(k, 0, 2) {
				FOR(l, 0, 2) {
					tmp += s[i + k][j + l];
				}
			}
			// debug(tmp.c_str(), i, j);
			st.insert(tmp);
		}
	}
	ans += st.size();
}

void freedom() {
	queue<pii> Q;
	REP(i, n) {
		Q.push({0, i});
		Q.push({n - 1, i});
		Q.push({i, 0});
		Q.push({i, n - 1});
	}
	vector<vi> visited(n, vi(n));
	while (!Q.empty()) {
		pii p = Q.front(); Q.pop();
		if (visited[p.st][p.nd]) continue;
		visited[p.st][p.nd] = true;
		if (s[p.st][p.nd] != ' ') {
			// debug(p.st, p.nd);
			ans += 7;
			continue;
		}
		for (auto nw: getNeighbors(p)) {
			Q.push(nw);
		}
	}
}

vector<pii> BFS(int i, int j, vector<vi>& visited) {
	vector<pii> tmp;
	queue<pii> Q;
	Q.push({i, j});
	while (!Q.empty()) {
		pii p = Q.front(); Q.pop();
		if (visited[p.st][p.nd]) continue;
		visited[p.st][p.nd] = true;
		tmp.pb(p);
		for (auto nw: getNeighbors(p)) {
			if (isBird(s[nw.st][nw.nd])) {
				Q.push(nw);
			}
		}
	}
	return tmp;
}

vector<vector<pii>> getFlocks() {
	vector<vi> visited(n, vi(n));
	vector<vector<pii>> tmp;
	REP(i, n) {
		REP(j, n) {
			if (isBird(s[i][j]) && !visited[i][j]) {
				tmp.pb(BFS(i, j, visited));
			}
		}
	}
	// debug(tmp);
	return tmp;
}

void perimeter(vector<vector<pii>>& flocks) {
	for (auto flock: flocks) {
		for (auto p: flock) {
			for (auto nn: neigh) {
				pii nw = add(p, nn);
				if (!inRange(nw)) {
					ans += 60;
				} else {
					if (!isBird(s[nw.st][nw.nd])) {
						ans += 60;
					}
				}
			}
		}
	}
}

void biggestBird(vector<vector<pii>>& flocks) {
	for (auto flock: flocks) {
		int mx = 0;
		for (auto p: flock) {
			int ile = 0;
			REP(i, n) {
				if (!inRange(p.st, p.nd + i)) break;
				if (isBird(s[p.st][p.nd + i])) ile++;
			}
			mx = max(mx, ile);
		}
		ans += mx * 500;
	}
}


// sprawdz MODULO!
// empty cell “ ” (space), sun “*”, house “^”, chupacabra “!”, left slope “/”, right slope “\”, bird “v”, drake “D”, grill “G”
int main() {
    mt19937 rng(chrono::steady_clock::now().time_since_epoch().count());
	ios_base::sync_with_stdio(0);
	cin.tie(0); cout.tie(0);
	cin >> n;
	assert(n >= 2);
	string t;
	getline(cin, t);
	REP(i, n) {
		getline(cin, s[i]);
	}
	vector<vector<pii>> flocks = getFlocks();
	emptyFields(); // 9, 6
	debug(ans, "empty");
	housesAndGrills(); // 27, 0
	debug(ans, "housesAndGrills");
	grillDrake(); // 450, 0
	debug(ans, "grillDrake");
	drakeGrill(); // 4500, 0
	debug(ans, "drakeGrill");
	chupacabra(); // 0, 400
	debug(ans, "chupacabra");
	animals1(); // 0, 120
	debug(ans, "animals1");
	animals2(); // 729, 1
	debug(ans, "animals2");
	houseViewUp(); // 0, 0
	debug(ans, "upview");
	houseViewDown();
	debug(ans, "downview");
	minimumFreq(); // 720, 30
	debug(ans, "frq");
	peaks(); // , 0
	debug(ans, "peaks");
	suns(); // 900, 0
	debug(ans, "suns");
	threeBlocks(); // 7, 1
	debug(ans, "3x3");
	freedom(); // 210, 21
	debug(ans, "freedom");
	biggestBird(flocks); // 1000, 1000
	debug(ans, "biggest");
	perimeter(flocks); // 1200, 480
	debug(ans, "perim");
	
	cout << ans << endl;
	return 0;
}