Problem: Ostap is preparing to play chess again and this time he is about to prepare. Thus, he was closely monitoring one recent chess tournament. There were m players participating and each pair of players played exactly one game. The victory gives 2 points, draw — 1 points, lose — 0 points.

Ostap is lazy, so he never tries to remember the outcome of each game. Instead, he computes the total number of points earned by each of the players (the sum of his points in all games which he took part in), sort these value in non-ascending order and then remembers first n integers in this list.

Now the Great Strategist Ostap wonders whether he remembers everything correct. He considers that he is correct if there exists at least one tournament results table such that it will produce the given integers. That means, if we count the sum of points for each player, sort them and take first n elements, the result will coincide with what Ostap remembers. Can you check if such table exists?

Input

The first line of the input contains two integers m and n (1 ≤ n ≤ m ≤ 3000) — the number of participants of the tournament and the number of top results Ostap remembers.

The second line contains n integers, provided in non-ascending order — the number of points earned by top participants as Ostap remembers them. It's guaranteed that this integers are non-negative and do not exceed 2·m.

Output

If there is no tournament such that Ostap can obtain the given set of integers using the procedure described in the statement, then print "no" in the only line of the output. Otherwise, the first line of the output should contain the word "yes". Next m lines should provide the description of any valid tournament. Each of these lines must contain m characters 'X', 'W', 'D' and 'L'. Character 'X' should always be located on the main diagonal (and only there), that is on the i-th position of the i-th string. Character 'W' on the j-th position of the i-th string means that the i-th player won the game against the j-th. In the same way character 'L' means loose and 'D' means draw.

The table you print must be consistent and the points earned by best n participants should match the memory of Ostap. If there are many possible answers, print any of them.

Examples

Input

5 5
8 6 4 2 0


Output

yes
XWWWW
LXWWW
LLXWW
LLLXW
LLLLX


Input

5 1
9


Output

no

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
int n, m;
int t[3010][3010];
int aibval[2 * 3010], aibcnt[2 * 3010], v[3010], pos[3010];
bool good[2 * 3010], done[2 * 3010];
int bad_count;
char s[3010][3010];
int LSB(int i) { return i & -i; }
void update(int aib[], int i, int val) {
  i += 1;
  for (; i <= 2 * n; i += LSB(i)) {
    aib[i] += val;
  }
}
int query(int aib[], int i) {
  int s = 0;
  i += 1;
  for (; i > 0; i -= LSB(i)) {
    s += aib[i];
  }
  return s;
}
void apply(int i, bool what) {
  if (what == false && good[i] == true) {
    good[i] = false;
    ++bad_count;
  }
  if (what == true && good[i] == false) {
    good[i] = true;
    --bad_count;
  }
}
void recheck(int i) {
  int val = query(aibval, i);
  int cnt = query(aibcnt, i);
  if (val >= cnt * (cnt - 1)) {
    apply(i, true);
  } else {
    apply(i, false);
  }
}
void move_it(int a, int b, int delta) {
  t[a][b] += delta;
  int old_pos = pos[b];
  int new_pos = old_pos + delta;
  pos[b] = new_pos;
  update(aibval, old_pos, -old_pos);
  update(aibval, new_pos, new_pos);
  update(aibcnt, old_pos, -1);
  update(aibcnt, new_pos, 1);
  int start_check = max(0, min(old_pos, new_pos) - 1);
  int end_check = min(2 * n, max(old_pos, new_pos) + 1);
  for (int i = start_check; i <= end_check; ++i) {
    recheck(i);
  }
}
void remove(int a) {
  update(aibval, pos[a], -pos[a]);
  update(aibcnt, pos[a], -1);
  for (int i = pos[a]; i <= 2 * n; ++i) {
    recheck(i);
  }
}
int main() {
  cin >> n >> m;
  for (int i = 1; i <= m; ++i) {
    cin >> v[i];
  }
  int sum = n * (n - 1);
  for (int i = 1; i <= m; ++i) {
    sum -= v[i];
    if (sum < (n - i) * (n - i - 1)) {
      cout << "no\n";
      return 0;
    }
  }
  for (int i = m + 1; i <= n; ++i) {
    v[i] = min(sum - (n - i) * (n - i - 1), v[i - 1]);
    sum -= v[i];
  }
  if (sum != 0) {
    cout << "no\n";
    return 0;
  }
  for (int i = 1; i <= n; ++i) {
    pos[i] = v[i];
    update(aibval, v[i], v[i]);
    update(aibcnt, v[i], 1);
  }
  for (int j = 0; j <= 2 * n; ++j) {
    good[j] = true;
  }
  bool all_good = false;
  for (int i = 1; i <= n; ++i) {
    vector<int> others;
    for (int j = 1; j <= n; ++j) {
      if (!done[j]) {
        others.push_back(j);
      }
    }
    auto cmp = [](int a, int b) { return pos[a] < pos[b]; };
    sort(others.begin(), others.end(), cmp);
    auto current = others.back();
    others.pop_back();
    remove(current);
    vector<int> twos;
    int temp = 2 * (n - i) - pos[current];
    done[current] = true;
    while (!others.empty() && temp) {
      auto c = others.back();
      others.pop_back();
      if (temp >= 2 && pos[c] >= 2) {
        temp -= 2;
        move_it(current, c, -2);
        twos.push_back(c);
      } else {
        temp -= 1;
        move_it(current, c, -1);
      }
    }
    while (bad_count) {
      auto c = twos.back();
      twos.pop_back();
      auto c2 = others.back();
      others.pop_back();
      move_it(current, c, 1);
      move_it(current, c2, -1);
    }
    for (int j = 1; j <= n; ++j) {
      if (done[j]) continue;
      if (t[current][j] == 0) {
        t[current][j] = 2;
        t[j][current] = -2;
      } else if (t[current][j] == -1 || t[current][j] == 1) {
        t[current][j] = 1;
        t[j][current] = 1;
      } else if (t[current][j] == -2) {
        t[j][current] = 2;
      }
    }
  }
  cout << "yes\n";
  for (int i = 1; i <= n; ++i) {
    for (int j = 1; j <= n; ++j) {
      if (i == j) {
        s[i][j] = 'X';
      } else if (t[i][j] == -2) {
        s[i][j] = 'L';
      } else if (t[i][j] == -1 || t[i][j] == 1) {
        s[i][j] = 'D';
      } else {
        s[i][j] = 'W';
      }
    }
  }
  for (int i = 1; i <= n; ++i) {
    cout << s[i] + 1 << "\n";
  }
}