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;
string s, t;
long long nut[300] = {0};
long long nus[300] = {0};
long long ssr[300] = {0};
signed main() {
  cin >> s;
  cin >> t;
  long long si = s.size();
  long long ti = t.size();
  for (long long i = 0; i < ti; i++) {
    nut[t[i]]++;
  }
  for (long long i = 0; i < si; i++) {
    nus[s[i]]++;
  }
  if (nus['?'] == 0) {
    cout << s << endl;
  } else if (ti > si) {
    for (long long i = 0; i < si; i++) {
      if (s[i] == '?') {
        cout << 'a';
      } else {
        cout << s[i];
      }
    }
    cout << endl;
  } else {
    long long su = nus['?'];
    long long sa;
    long long ans;
    for (long long i = 1;; i++) {
      sa = 0;
      for (long long j = 'a'; j <= 'z'; j++) {
        sa = sa + max(0ll, nut[j] * i - nus[j]);
      }
      if (sa > su) {
        ans = i - 1;
        break;
      }
    }
    for (long long j = 'a'; j <= 'z'; j++) {
      ssr[j] = nut[j] * ans - nus[j];
    }
    char p = 'a';
    while (ssr[p] <= 0 && p <= 'z') {
      p++;
    }
    for (long long i = 0; i < si; i++) {
      if (s[i] == '?') {
        s[i] = p;
        ssr[p]--;
        while (ssr[p] <= 0 && p <= 'z') {
          p++;
        }
      }
    }
    for (long long i = 0; i < si; i++) {
      if (s[i] == ('z' + 1)) {
        cout << 'a';
      } else {
        cout << s[i];
      }
    }
    cout << endl;
  }
  return 0;
}