#include <bits/stdc++.h>
using namespace std;

template<class T>
bool chmax(T& a, const T& b) {
    if (a < b) { a = b; return true; }
    return false;
}
template<class T>
bool chmin(T& a, const T& b) {
    if (b < a) { a = b; return true; }
    return false;
}

// std::vector Declaration
template<typename T>
vector<T> make_v(size_t a) { return vector<T>(a); }
template<typename T, typename... Ts>
auto make_v(size_t a, Ts... ts) {
    return vector<decltype(make_v<T>(ts...))>(a, make_v<T>(ts...));
}

// std::vector Declaration and Initialization
template<typename T>
vector<T> make_vector(size_t a, T x) { return vector<T>(a, x); }
template<typename T, typename U, typename... Ts>
auto make_vector(size_t a, U b, Ts... ts) {
    return vector<decltype(make_vector<T>(b,ts...))>(a, make_vector<T>(b, ts...));
}

// std::vector Input
template<typename T>
istream& operator>>(istream& is, vector<T>& v) {
    for (auto &e : v) is >> e;
    return is;
}

// std::vector Debug
template<typename T>
ostream& operator<<(ostream& os, const vector<T>& v) {
    os << "[";
    bool a = 1;
    for (auto e : v) {
        os << (a ? "" : " ");
        os << e;
        a = 0;
    }
    os << "]";
    return os;
}

// std::array Debug
template<typename T, size_t n>
ostream& operator<<(ostream& os, const array<T, n>& v) {
    os << "[";
    bool a = 1;
    for (auto e : v) {
        os << (a ? "" : " ");
        os << e;
        a = 0;
    }
    os << "]";
    return os;
}

// std::deque Debug
template<typename T>
ostream& operator<<(ostream& os, const deque<T>& d) {
    os << "[";
    bool a = 1;
    for (auto e : d) {
        os << (a ? "" : " ");
        os << e;
        a = 0;
    }
    os << "]";
    return os;
}

// std::pair Debug
template<typename T, typename U>
ostream& operator<<(ostream& os, const pair<T, U>& p) {
    os << "(" << p.first << " " << p.second << ")";
    return os;
}

// std::set Debug
template<typename T>
ostream& operator<<(ostream& os, const set<T>& st) {
    os << "{";
    bool a = 1;
    for (auto e : st) {
        os << (a ? "" : " ");
        os << e;
        a = 0;
    }
    os << "}";
    return os;
}

// std::multiset Debug
template<typename T>
ostream& operator<<(ostream& os, const multiset<T>& st) {
    os << "{";
    bool a = 1;
    for (auto e : st) {
        os << (a ? "" : " ");
        os << e;
        a = 0;
    }
    os << "}";
    return os;
}

// std::map Debug
template<typename T, typename U>
ostream& operator<<(ostream& os, const map<T, U>& mp) {
    os << "{";
    bool a = 1;
    for (auto e : mp) {
        os << (a ? "" : " ");
        os << e.first << ":" << e.second;
        a = 0;
    }
    os << "}";
    return os;
}

// std::tuple Debug
template<int N, class Tuple>
void out(ostream& os, const Tuple& t){}
template<int N, class Tuple, class H, class ...Ts>
void out(ostream& os, const Tuple& t) {
    if (N) os << " ";
    os << get<N>(t);
    out<N+1,Tuple,Ts...>(os, t);
}
template<class ...Ts>
ostream& operator<<(ostream& os, const tuple<Ts...>& t) {
    os << "(";
    out<0,tuple<Ts...>,Ts...>(os, t);
    os << ")";
    return os;
}

// Debug
#define DUMP(x) cerr<<#x<<" = "<<(x)<<endl

// Weighted edge
template<typename T>
struct edge {
    int src, to;
    T cost;

    edge() {}
    edge(int to, T cost) : src(-1), to(to), cost(cost) {}
    edge(int src, int to, T cost) : src(src), to(to), cost(cost) {}

    friend ostream& operator<<(ostream& os, const edge& e) {
        return os << "(" << e.src << "->" << e.to << ":" << e.cost << ")";
    }
};

using LL = int64_t;

#define fs first
#define sc second

const int64_t MOD = 1e9+7;

using State = string::const_iterator;
class ParseError {};
class InfiniteLoop {};

int dy[] = {-1, 0, 1, 0},
    dx[] = {0, 1, 0, -1};

int y, x, dir = 0, total = 0;

vector<string> board;

bool Condition(State& state) {
    int flip = 0;
    if (*state == '~') {
        ++state;
        flip = 1;
    }
    if (*state == 'N') {
        ++state;
        return (dir == 0 ^ flip);
    }
    if (*state == 'E') {
        ++state;
        return (dir == 1 ^ flip);
    }
    if (*state == 'S') {
        ++state;
        return (dir == 2 ^ flip);
    }
    if (*state == 'W') {
        ++state;
        return (dir == 3 ^ flip);
    }
    if (*state == 'C') {
        ++state;
        return (board[y+dy[dir]][x+dx[dir]] == '#' ^ flip);
    }
    if (*state == 'T') {
        ++state;
        return (1 ^ flip);
    }
    throw ParseError();
}

bool ActionStatement(State& state, bool exec) {
    if (*state == '^') {
        ++state;
        if (exec) {
            ++total;
            if (board[y+dy[dir]][x+dx[dir]] != '#') {
                y += dy[dir];
                x += dx[dir];
            }
        }
        return (board[y][x] == 'g');
    }
    if (*state == 'v') {
        ++state;
        if (exec) {
            ++total;
            if (board[y-dy[dir]][x-dx[dir]] != '#') {
                y -= dy[dir];
                x -= dx[dir];
            }
        }
        return (board[y][x] == 'g');
    }
    if (*state == '<') {
        ++state;
        if (exec) {
            ++total;
            dir = (dir + 3) % 4;
        }
        return false;
    }
    if (*state == '>') {
        ++state;
        if (exec) {
            ++total;
            dir = (dir + 1) % 4;
        }
        return false;
    }
    throw ParseError();
}


bool Program(State& state, bool exec);

bool IfStatement(State& state, bool exec) {
    if (*state != '[') {
        throw ParseError();
    }
    ++state;
    bool condition = Condition(state);
    if (Program(state, exec and condition)) {
        return true;
    }
    if (*state != ']') {
        throw ParseError();
    }
    ++state;
    return false;
}

bool WhileStatement(State& state, bool exec) {
    if (*state != '{') {
        throw ParseError();
    }
    ++state;

    map<tuple<int,int,int>,bool> used;
    while (exec) {
        if (used[make_tuple(y,x,dir)]) {
            throw InfiniteLoop();
        }
        used[make_tuple(y,x,dir)] = true;
        State tmp = state;
        bool condition = Condition(tmp);
        if (!condition) {
            break;
        }
        if (Program(tmp, true)) {
            return true;
        }
    }
    Condition(state);
    Program(state, false);

    if (*state != '}') {
        throw ParseError();
    }
    ++state;
    return false;
}

bool Program(State& state, bool exec) {
    while (true) {
        if (*state == '[') {
            if (IfStatement(state, exec)) {
                return true;
            }
            continue;
        }
        else if (*state == '{') {
            if (WhileStatement(state, exec)) {
                return true;
            }
            continue;
        }
        else if (*state == '^' or *state == 'v' or
                 *state == '<' or *state == '>') {
            if (ActionStatement(state, exec)) {
                return true;
            }
            continue;
        }
        break;
    }
    return false;
}


int main()
{
    cin.tie(0);
    ios::sync_with_stdio(false);
    cout << fixed << setprecision(10);


    int H, W; cin >> H >> W;
    board.resize(H);
    for (int i = 0; i < H; ++i) {
        cin >> board[i];
        for (int j = 0; j < W; ++j) {
            if (board[i][j] == 's') {
                y = i, x = j;
            }
        }
    }

    string s; cin >> s;
    State begin = s.begin();

    try {
        bool goal = Program(begin, true);
        cout << (goal ? total : -1) << endl;
    }
    catch (const InfiniteLoop& e) {
        cout << -1 << endl;
    }

    return 0;
}



Measured memory_bytes: 3340