Problem: The new camp by widely-known over the country Spring Programming Camp is going to start soon. Hence, all the team of friendly curators and teachers started composing the camp's schedule. After some continuous discussion, they came up with a schedule s, which can be represented as a binary string, in which the i-th symbol is '1' if students will write the contest in the i-th day and '0' if they will have a day off.

At the last moment Gleb said that the camp will be the most productive if it runs with the schedule t (which can be described in the same format as schedule s). Since the number of days in the current may be different from number of days in schedule t, Gleb required that the camp's schedule must be altered so that the number of occurrences of t in it as a substring is maximum possible. At the same time, the number of contest days and days off shouldn't change, only their order may change.

Could you rearrange the schedule in the best possible way?

Input

The first line contains string s (1 ⩽ |s| ⩽ 500 000), denoting the current project of the camp's schedule.

The second line contains string t (1 ⩽ |t| ⩽ 500 000), denoting the optimal schedule according to Gleb.

Strings s and t contain characters '0' and '1' only.

Output

In the only line print the schedule having the largest number of substrings equal to t. Printed schedule should consist of characters '0' and '1' only and the number of zeros should be equal to the number of zeros in s and the number of ones should be equal to the number of ones in s.

In case there multiple optimal schedules, print any of them.

Examples

Input


101101
110


Output


110110

Input


10010110
100011


Output


01100011


Input


10
11100


Output


01

Note

In the first example there are two occurrences, one starting from first position and one starting from fourth position.

In the second example there is only one occurrence, which starts from third position. Note, that the answer is not unique. For example, if we move the first day (which is a day off) to the last position, the number of occurrences of t wouldn't change.

In the third example it's impossible to make even a single occurrence.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
typedef set<int, bool (*)(int, int)> sic;
typedef set<pair<int, int>, bool (*)(pair<int, int>, pair<int, int>)> spic;
typedef set<long long int, bool (*)(long long int, long long int)> slc;
typedef set<pair<long long int, long long int>,
            bool (*)(pair<long long int, long long int>,
                     pair<long long int, long long int>)>
    splc;
pair<int, int> operator+(const pair<int, int>& x, const pair<int, int>& y) {
  return {x.first + y.first, x.second + y.second};
}
pair<long long int, long long int> operator+(
    const pair<long long int, long long int>& x,
    const pair<long long int, long long int>& y) {
  return {x.first + y.first, x.second + y.second};
}
long long int gcd(long long int a, long long int b) {
  return a >= b ? b ? gcd(b, a % b) : a : gcd(b, a);
}
long long int lcm(long long int a, long long int b) {
  return a / gcd(a, b) * b;
}
long long int exp(long long int a, long long int b) {
  long long int r = 1;
  while (b)
    r = (1000000007LL +
         ((long long int)(r) * (long long int)(b & 1 ? a : 1)) % 1000000007LL) %
        1000000007LL,
    a = (1000000007LL +
         ((long long int)(a) * (long long int)(a)) % 1000000007LL) %
        1000000007LL,
    b >>= 1;
  return r;
}
long long int fac[500000];
long long int ifac[500000];
void mkfac() {
  fac[0] = ifac[0] = 1;
  for (int i = (int)(!1); i <= (int)(500000 - 1 - 1); i++)
    fac[i] =
        (1000000007LL +
         ((long long int)(fac[i - 1]) * (long long int)(i)) % 1000000007LL) %
        1000000007LL,
    ifac[i] = exp((fac[i]), 1000000007LL - 2);
}
string out;
long long int T;
unordered_set<int> adj[500000];
int A[500000];
int N, M, K;
int u, v;
string R, S, U;
void kmp_lps(int* A, const string& S) {
  int N = S.size();
  memset(A, 0, N * sizeof(*A));
  for (int i = 1; i < N; i++) {
    int k = i - 1;
    do {
      if (S[A[k]] == S[i]) A[i] = A[k] + 1;
      k = A[k] - 1;
    } while (k >= 0 && !A[i]);
  }
}
void process() {
  cin >> R >> S;
  N = S.size();
  kmp_lps(A, S);
  int n[2] = {0, 0};
  for (auto e : R) n[e - '0']++;
  for (auto e : S) n[e - '0']--;
  if (n[0] < 0 || n[1] < 0) {
    out += R + "\n";
    return;
  }
  U = S;
  bool gd = 1;
  while (gd)
    for (int i = (int)(A[N - 1]); i <= (int)(N - 1); i++)
      if (n[S[i] - '0'])
        n[S[i] - '0']--, U += S[i];
      else {
        gd = 0;
        break;
      }
  while (n[0]) U += "0", n[0]--;
  while (n[1]) U += "1", n[1]--;
  out += U;
  out += "\n";
}
int main() {
  ios_base::sync_with_stdio(false);
  cin.tie(NULL);
  T = 1;
  for (int t = (int)(!1); t <= (int)(T - 1); t++) process();
  cout << out;
  return 0;
}