Problem: Diana loves playing with numbers. She's got n cards with positive integer numbers a_i written on them. She spends her free time multiplying the numbers on the cards. She picks a non-empty subset of the cards and multiplies all the numbers a_i written on them.

Diana is happy when the product of the numbers ends with her favorite digit d. Now she is curious what cards she should pick so that the product of the numbers on them is the largest possible and the last decimal digit of the product is d. Please, help her.

Input

The first line contains the integers n and d (1≤ n≤ 10^5, 0≤ d≤ 9). The second line contains n integers a_i (1≤ a_i≤ 1000). 

Output

On the first line, print the number of chosen cards k (1≤ k≤ n). On the next line, print the numbers written on the chosen cards in any order. 

If it is impossible to choose a subset of cards with the product that ends with the digit d, print the single line with -1.

Examples

Input


6 4
4 11 8 2 1 13


Output


5
1 2 4 11 13 


Input


3 1
2 4 6


Output


-1


Input


5 7
1 3 1 5 3


Output


-1


Input


6 3
8 9 4 17 11 5


Output


3
9 11 17 


Input


5 6
2 2 2 2 2


Output


4
2 2 2 2 

Note

In the first example, 1 × 2 × 4 × 11 × 13 = 1144, which is the largest product that ends with the digit 4. The same set of cards without the number 1 is also a valid answer, as well as a set of 8, 11, and 13 with or without 1 that also has the product of 1144.

In the second example, all the numbers on the cards are even and their product cannot end with an odd digit 1.

In the third example, the only possible products are 1, 3, 5, 9, 15, and 45, none of which end with the digit 7.

In the fourth example, 9 × 11 × 17 = 1683, which ends with the digit 3. 

In the fifth example, 2 × 2 × 2 × 2 = 16, which ends with the digit 6.

Solution (in CPP):

Solution:
//#pragma GCC optimize("Ofast")
#include <bits/stdc++.h>

using namespace std;

//vector string deque break continue
#define forn(i, s, f) for (int i = (int)s; i < (int)f; i++)
#define ll long long
#define ull unsigned long long
#define ld long double
#define pii pair <int, int>
#define fs first
#define sc second
#define pf push_front
#define pb push_back
#define pop_f pop_front
#define pop_b pop_back
#define eb emplace_back
#define all(x) (x).begin(), (x).end()
#define rall(x) (x).rbegin(), (x).rend()
#define sz(x) (int)(x).size()

#ifdef DEBUG
#else
    #define cerr if (false) cerr
#endif

template <typename T> istream& operator>>(istream& in, vector <T>& a) {for (auto& i : a) in >> i; return in;}
template <typename T> ostream& operator<<(ostream& out, vector <T>& a)  {for (auto& i : a) out << i << " "; return out;}
template <typename T, typename U> void chkmin(T& a, U b) {if (a > b) a = b;}
template <typename T, typename U> void chkmax(T& a, U b) {if (a < b) a = b;}

constexpr int M = 10;

vector<int> cnt;
vector<int> mx_power;
vector<vector<double>> pref;

constexpr int INF = 1e9;

int d;

double best;
vector<int> ans;

void go(int idx, int lst, vector<int> cur_cnt) {
    if (idx == M) {
        if (lst != d) {
            return;
        }
        bool is_empty = true;
        forn (i, 0, M) {
            if (cur_cnt[i]) {
                is_empty = false;
            }
        }
        if (is_empty) {
            return;
        }
        double prod = 0;
        forn (i, 0, M) {
            if (cur_cnt[i] == 0)
                continue;
            int blocks = (cnt[i] - cur_cnt[i]) / mx_power[i];
            int s = blocks * mx_power[i] + cur_cnt[i];
            if (i == 1)
                cerr << blocks << " " << s << "  ";
            prod += pref[i][s];
        }
        cerr << cur_cnt << ": " << prod << "\n";
        if (prod > best) {
            best = prod;
            ans = cur_cnt;
        }
        return;
    }
    forn (k, 0, min(cnt[idx] + 1, mx_power[idx] + 1)) {
        cur_cnt[idx] = k;
        go(idx + 1, lst, cur_cnt);
        lst = (lst * idx) % M;
    }
}

int main() {
    ios_base::sync_with_stdio(0), cin.tie(0);
    mx_power.resize(M);
    mx_power[0] = mx_power[1] = 1;
    forn (i, 2, M) {
        int cur = i;
        int cnt = 0;
        while (cnt == 0 || cur != i) {
            cur = (cur * i) % M;
            ++cnt;
        }
        mx_power[i] = cnt;
    }
    cerr << mx_power << "\n";
    int n;
    cin >> n >> d;
    vector<int> a(n);
    cin >> a;
    cnt.resize(M);
    vector<vector<int>> all_numbers(M);
    forn (i, 0, n) {
        cnt[a[i] % 10]++;
        all_numbers[a[i] % 10].pb(a[i]);
    }
    pref.resize(M);
    forn (i, 0, M) {
        sort(rall(all_numbers[i]));
        pref[i].resize(all_numbers[i].size() + 1);
        forn (j, 0, all_numbers[i].size())
            pref[i][j + 1] = pref[i][j] + log(all_numbers[i][j]);
    }
    best = -1;
    go(0, 1, vector<int>(M, 0));
    cerr << best << "\n" << ans << "\n";
    if (best < 0) {
        cout << "-1";
        return 0;
    }
    vector<int> real_ans;
    forn (i, 0, M) {
        if (ans[i] == 0)
            continue;
        int blocks = (cnt[i] - ans[i]) / mx_power[i];
        int s = blocks * mx_power[i] + ans[i];
        cerr << i << " " << blocks << " " << s << "\n";
        forn (j, 0, s) {
            real_ans.pb(all_numbers[i][j]);
        }
    }
    cout << real_ans.size() << "\n" << real_ans << "\n";
    return 0;
}