Problem: You are given two strings s and t consisting of small Latin letters, string s can also contain '?' characters. 

Suitability of string s is calculated by following metric:

Any two letters can be swapped positions, these operations can be performed arbitrary number of times over any pair of positions. Among all resulting strings s, you choose the one with the largest number of non-intersecting occurrences of string t. Suitability is this number of occurrences.

You should replace all '?' characters with small Latin letters in such a way that the suitability of string s is maximal.

Input

The first line contains string s (1 ≤ |s| ≤ 106).

The second line contains string t (1 ≤ |t| ≤ 106).

Output

Print string s with '?' replaced with small Latin letters in such a way that suitability of that string is maximal.

If there are multiple strings with maximal suitability then print any of them.

Examples

Input

?aa?
ab


Output

baab


Input

??b?
za


Output

azbz


Input

abcd
abacaba


Output

abcd

Note

In the first example string "baab" can be transformed to "abab" with swaps, this one has suitability of 2. That means that string "baab" also has suitability of 2.

In the second example maximal suitability you can achieve is 1 and there are several dozens of such strings, "azbz" is just one of them.

In the third example there are no '?' characters and the suitability of the string is 0.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
using ll = long long;
using vi = vector<long long>;
using vl = vector<long long>;
using pii = pair<long long, long long>;
using pll = pair<long long, long long>;
const long long DX[9] = {0, 1, 0, -1, 1, 1, -1, -1, 0},
                DY[9] = {-1, 0, 1, 0, -1, 1, 1, -1, 0};
template <class T>
ostream &operator<<(ostream &os, const vector<T> &v) {
  for (auto i = begin(v); i != end(v); ++i)
    os << *i << (i == end(v) - 1 ? "" : " ");
  return os;
}
template <class T>
istream &operator>>(istream &is, vector<T> &v) {
  for (auto i = begin(v); i != end(v); ++i) is >> *i;
  return is;
}
template <class T>
istream &operator>>(istream &is, pair<T, T> &p) {
  is >> p.first >> p.second;
  return is;
}
template <class T>
bool chmax(T &a, const T &b) {
  if (a < b) {
    a = b;
    return 1;
  }
  return 0;
}
template <class T>
bool chmin(T &a, const T &b) {
  if (b < a) {
    a = b;
    return 1;
  }
  return 0;
}
struct before_main_function {
  before_main_function() {
    cin.tie(0);
    ios::sync_with_stdio(false);
    cout << setprecision(15) << fixed;
  }
} before_main_function;
signed main() {
  string s, t;
  cin >> s >> t;
  vector<long long> cnt_s(300, 0);
  vector<long long> cnt_t(300, 0);
  for (auto &x : s) cnt_s[x]++;
  for (auto &x : t) cnt_t[x]++;
  string change;
  long long mn = (1001001001001001001ll);
  for (long long i = 'a', ilen = (long long)('z' + 1); i < ilen; ++i) {
    if (cnt_t[i] != 0) {
      chmin(mn, cnt_s[i] / cnt_t[i]);
    }
  }
  for (long long i = 'a', ilen = (long long)('z' + 1); i < ilen; ++i) {
    cnt_s[i] -= cnt_t[i] * mn;
  }
  while (1) {
    for (long long i = 'a', ilen = (long long)('z' + 1); i < ilen; ++i) {
      if (cnt_s[i] < cnt_t[i]) {
        long long num = (cnt_t[i] - cnt_s[i]);
        cnt_s['?'] -= num;
        if (cnt_s['?'] < 0) {
          goto end;
        }
        cnt_s[i] = 0;
        change += string(num, i);
      } else {
        cnt_s[i] -= cnt_t[i];
      }
    }
  }
end:;
  long long c = 0;
  for (auto &x : s) {
    if (x == '?') {
      if (c == ((long long)change.size()))
        x = 'a';
      else
        x = change[c++];
    }
  }
  cout << s << endl;
  return 0;
}