Problem: Welcome to another task about breaking the code lock! Explorers Whitfield and Martin came across an unusual safe, inside of which, according to rumors, there are untold riches, among which one can find the solution of the problem of discrete logarithm!

Of course, there is a code lock is installed on the safe. The lock has a screen that displays a string of n lowercase Latin letters. Initially, the screen displays string s. Whitfield and Martin found out that the safe will open when string t will be displayed on the screen.

The string on the screen can be changed using the operation «shift x». In order to apply this operation, explorers choose an integer x from 0 to n inclusive. After that, the current string p = αβ changes to βRα, where the length of β is x, and the length of α is n - x. In other words, the suffix of the length x of string p is reversed and moved to the beginning of the string. For example, after the operation «shift 4» the string «abcacb» will be changed with string «bcacab », since α = ab, β = cacb, βR = bcac.

Explorers are afraid that if they apply too many operations «shift», the lock will be locked forever. They ask you to find a way to get the string t on the screen, using no more than 6100 operations.

Input

The first line contains an integer n, the length of the strings s and t (1 ≤ n ≤ 2 000).

After that, there are two strings s and t, consisting of n lowercase Latin letters each.

Output

If it is impossible to get string t from string s using no more than 6100 operations «shift», print a single number  - 1.

Otherwise, in the first line output the number of operations k (0 ≤ k ≤ 6100). In the next line output k numbers xi corresponding to the operations «shift xi» (0 ≤ xi ≤ n) in the order in which they should be applied.

Examples

Input

6
abacbb
babcba


Output

4
6 3 2 3


Input

3
aba
bba


Output

-1

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const int inf = 1e9 + 7;
const long long linf = 1ll * inf * inf;
const int N = 2000 + 7;
const int M = 20;
const int multipleTest = 0;
int n;
int nxt(int x, int step = 1) { return (x + step) % n; }
int prv(int x) { return (x + n - 1) % n; }
struct node {
  int fir, sec;
  int len;
  bool flip;
  node(int _f, int _s, int _len, bool _flip) {
    fir = _f;
    sec = _s;
    len = _len;
    flip = _flip;
  }
  node rev() { return node(sec, fir, len, !flip); }
  bool isBefore(node b) {
    if (!b.flip) {
      return !flip && nxt(sec) == b.fir;
    } else {
      return flip && prv(sec) == b.fir;
    }
  }
};
string s, t;
vector<int> L[N];
int cnt[N];
vector<int> ans;
node merge(node a, node b) {
  assert(a.flip == b.flip);
  return node(a.fir, b.sec, a.len + b.len, a.flip);
}
vector<node> all;
void transform(int i, bool need_merge = false) {
  int x = 0;
  int m = (int)(all).size();
  for (int j = i; j < m; ++j) {
    x += all[j].len;
  }
  ans.push_back(x);
  vector<node> cur;
  for (int j = m - 1; j >= i; --j) cur.push_back(all[j].rev());
  if (i == 0) {
    all.clear();
    for (int j = (0), _b = ((int)(cur).size()); j < _b; ++j)
      all.push_back(cur[j]);
    return;
  }
  if (need_merge && cur.back().isBefore(all[0]))
    cur.back() = ::merge(cur.back(), all[0]);
  else
    cur.push_back(all[0]);
  cur.insert(cur.end(), all.begin() + 1, all.begin() + i);
  all.clear();
  for (int j = (0), _b = ((int)(cur).size()); j < _b; ++j)
    all.push_back(cur[j]);
}
void solve() {
  cin >> n >> s >> t;
  for (char c : s) cnt[c]++;
  for (char c : t) cnt[c]--;
  for (int x = 0; x < N; ++x)
    if (cnt[x]) {
      puts("-1");
      return;
    }
  for (int i = (0), _b = ((int)(t).size()); i < _b; ++i) {
    L[t[i]].push_back(i);
  }
  for (int x = (0), _b = (N); x < _b; ++x) reverse(L[x].begin(), L[x].end());
  for (int i = (0), _b = (n); i < _b; ++i) {
    int pos = L[s[i]].back();
    L[s[i]].pop_back();
    all.push_back(node(pos, pos, 1, false));
  }
  while (all.size() > 1) {
    int m = all.size();
    bool found = false;
    for (int i = 0; i + 1 < m; ++i) {
      if (all[i].isBefore(all[m - 1].rev())) {
        ::transform(i);
        ::transform(m - 1 - i, true);
        found = true;
        break;
      }
    }
    if (found) continue;
    for (int i = 0; i + 1 < m; ++i) {
      if (all[i].rev().isBefore(all[m - 1].rev())) {
        ::transform(i + 1);
        ::transform(m - 1, true);
        found = true;
        break;
      }
    }
  }
  if (all[0].flip) ::transform(0);
  for (int i = (0), _b = (all[0].fir); i < _b; ++i) ans.push_back(1);
  cout << ans.size() << '\n';
  for (int x : ans) {
    cout << x << ' ';
  }
}
int main() {
  int Test = 1;
  if (multipleTest) {
    cin >> Test;
  }
  for (int i = 0; i < Test; ++i) {
    solve();
  }
}