Problem: Zeyad wants to commit n crimes in Egypt and not be punished at the end. There are several types of crimes. For example, bribery is a crime but is not considered such when repeated twice. Therefore, bribery is not considered a crime when repeated an even number of times. Speeding is a crime, but is not considered such when repeated a number of times which is a multiple of five.

More specifically, c conditions on crime repetitions are known. Each condition describes the crime type ti and its multiplicity mi. If the number of times Zeyad committed the crime ti is a multiple of mi, Zeyad will not be punished for crime ti. Some crimes may be listed more than once. In this case fulfilling at least one condition for this crime is enough to not be punished for it. Of course, if for certain crime the number of times Zeyad committed it is zero, he is innocent with respect to this crime.

Now Zeyad is interested in a number of ways he can commit exactly n crimes without any punishment.

The order of commiting the crimes matters. More formally, two ways, sequences w1 and w2, of committing n crimes are equal if w1i = w2i, for all 1 ≤ i ≤ n.

Input

The first line contains two integers n and c (0 ≤ n ≤ 1018, 0 ≤ c ≤ 1000) — the number of crimes Zeyad would like to commit and the number of conditions he is aware of.

Then the definitions for c conditions follow. There are 26 types of crimes. Each crime definition consists of crime type — a capital Latin letter — and its multiplicity. 

The multiplicity of each crime is a positive integer number and the product of all multiplicities does not exceed 123. Some conditions may be repeated in the input more than once.

Crime of multiplicity 1 is not yielding any punishment regardless of the number of times it was committed. The strictness of the law is compensated by the fact that it's non-mandatory.

Obviously, if some crime is not listed in the set of conditions, then Zeyad will not consider it, as committing it would unavoidably lead to the punishment.

Please, do not use the %lld specificator to read or write 64-bit integers in С++. It is preferred to use the cin stream (you may also use the %I64d specificator).

Output

Output the number of different ways Zeyad can commit exactly n crimes with no punishment modulo 12345.

Examples

Input

5 2
A 1
B 2


Output

16


Input

6 3
A 1
B 2
C 3


Output

113


Input

8 3
A 2
A 3
B 2


Output

128

Note

In the first test case, the 16 ways are: AAAAA, AAABB, AABAB, AABBA, ABAAB, ABABA, ABBAA, BAAAB, BAABA, BABAA, BBAAA, ABBBB, BABBB, BBABB, BBBAB, BBBBA.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
struct node {
  long long v[30];
  bool operator<(const node& rhs) const {
    for (int i = 1; i <= 26; i++) {
      if (v[i] == rhs.v[i]) continue;
      return v[i] < rhs.v[i];
    }
    return 0;
  }
} prepare;
struct edge {
  int r, c;
  long long jz[150][150];
  edge operator*(const edge& rhs) const {
    edge ans;
    ans.r = r, ans.c = rhs.c;
    for (register int i = 0; i <= ans.r; i++)
      for (register int j = 0; j <= ans.c; j++) ans.jz[i][j] = 0;
    for (register int i = 1; i <= r; i++)
      for (register int j = 1; j <= rhs.c; j++)
        for (register int k = 1; k <= c; k++)
          ans.jz[i][j] =
              (ans.jz[i][j] + jz[i][k] * rhs.jz[k][j] % 12345) % 12345;
    return ans;
  }
} A;
vector<int> G[1005];
map<node, int> m;
int c, maxn[1005], cnt;
long long n, ans;
void dfs(int Index, node x) {
  if (Index == 27) {
    m[x] = ++cnt;
    return;
  }
  if (!maxn[Index]) dfs(Index + 1, x);
  for (int i = 0; i < maxn[Index]; i++) {
    x.v[Index] = i;
    dfs(Index + 1, x);
  }
}
void Solve(int Index, node x) {
  if (Index == 27) {
    ans = (ans + A.jz[1][m[x]]) % 12345;
    return;
  }
  if (!maxn[Index]) Solve(Index + 1, x);
  for (int i = 0; i < maxn[Index]; i++) {
    bool flag = 0;
    for (int j = 0; j < G[Index].size(); j++) {
      if (i % G[Index][j] == 0) {
        flag = 1;
        break;
      }
    }
    if (flag) {
      x.v[Index] = i;
      Solve(Index + 1, x);
    }
  }
}
inline edge qkpow(edge x, long long y) {
  edge ans;
  ans.r = ans.c = x.r;
  for (register int i = 1; i <= ans.r; i++)
    for (register int j = 1; j <= ans.c; j++)
      if (i != j)
        ans.jz[i][j] = 0;
      else
        ans.jz[i][j] = 1;
  while (y) {
    if (y & 1) ans = ans * x;
    x = x * x;
    y >>= 1;
  }
  return ans;
}
int main() {
  scanf("%lld %d", &n, &c);
  if (!n) {
    printf("1\n");
    return 0;
  }
  if (!c) {
    printf("0\n");
    return 0;
  }
  bool vis[150] = {};
  for (int i = 1; i <= c; i++) {
    char a;
    int b;
    scanf("%s %d", &a, &b);
    if (!b) vis[a - 'A' + 1] = 1;
    if (!maxn[a - 'A' + 1]) {
      maxn[a - 'A' + 1] = b;
    } else {
      maxn[a - 'A' + 1] *= b;
    }
    G[a - 'A' + 1].push_back(b);
  }
  for (int i = 1; i <= 26; i++)
    if (vis[i]) maxn[i] = 0;
  dfs(1, prepare);
  for (map<node, int>::iterator i = m.begin(); i != m.end(); i++) {
    int Second = i->second;
    node First = i->first;
    for (int j = 1; j <= 26; j++) {
      if (maxn[j]) {
        node tmp = First;
        tmp.v[j] = (tmp.v[j] + 1) % maxn[j];
        A.jz[Second][m[tmp]]++;
      }
    }
  }
  A.r = A.c = 123;
  A = qkpow(A, n);
  Solve(1, prepare);
  printf("%lld\n", ans);
  return 0;
}