Problem: Polycarpus likes giving presents to Paraskevi. He has bought two chocolate bars, each of them has the shape of a segmented rectangle. The first bar is a1 × b1 segments large and the second one is a2 × b2 segments large.

Polycarpus wants to give Paraskevi one of the bars at the lunch break and eat the other one himself. Besides, he wants to show that Polycarpus's mind and Paraskevi's beauty are equally matched, so the two bars must have the same number of squares.

To make the bars have the same number of squares, Polycarpus eats a little piece of chocolate each minute. Each minute he does the following:

  * he either breaks one bar exactly in half (vertically or horizontally) and eats exactly a half of the bar, 
  * or he chips of exactly one third of a bar (vertically or horizontally) and eats exactly a third of the bar. 



In the first case he is left with a half, of the bar and in the second case he is left with two thirds of the bar.

Both variants aren't always possible, and sometimes Polycarpus cannot chip off a half nor a third. For example, if the bar is 16 × 23, then Polycarpus can chip off a half, but not a third. If the bar is 20 × 18, then Polycarpus can chip off both a half and a third. If the bar is 5 × 7, then Polycarpus cannot chip off a half nor a third.

What is the minimum number of minutes Polycarpus needs to make two bars consist of the same number of squares? Find not only the required minimum number of minutes, but also the possible sizes of the bars after the process.

Input

The first line of the input contains integers a1, b1 (1 ≤ a1, b1 ≤ 109) — the initial sizes of the first chocolate bar. The second line of the input contains integers a2, b2 (1 ≤ a2, b2 ≤ 109) — the initial sizes of the second bar.

You can use the data of type int64 (in Pascal), long long (in С++), long (in Java) to process large integers (exceeding 231 - 1).

Output

In the first line print m — the sought minimum number of minutes. In the second and third line print the possible sizes of the bars after they are leveled in m minutes. Print the sizes using the format identical to the input format. Print the sizes (the numbers in the printed pairs) in any order. The second line must correspond to the first bar and the third line must correspond to the second bar. If there are multiple solutions, print any of them.

If there is no solution, print a single line with integer -1.

Examples

Input

2 6
2 3


Output

1
1 6
2 3


Input

36 5
10 16


Output

3
16 5
5 16


Input

3 5
2 1


Output

-1

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
long long a1, b1, a2, b2;
struct Bar {
  long long a, b;
  long long size;
  Bar() {
    this->a = 0;
    this->b = 0;
    this->size = 0;
  }
  Bar(long long a, long long b) {
    this->a = a;
    this->b = b;
    this->size = a * b;
  }
  void operator=(const Bar &oth) {
    this->a = oth.a;
    this->b = oth.b;
    this->size = oth.size;
  }
  bool operator<(const Bar &oth) const { return this->size < oth.size; }
};
struct Record {
  long long a, b;
  Record(long long a, long long b) {
    this->a = a;
    this->b = b;
  }
  bool operator<(const Record &oth) const {
    if (this->a == oth.a) return this->b < oth.b;
    return this->a < oth.a;
  }
};
set<Record> sz[2];
map<Bar, long long> rd[2];
void DFS(int a, int b, int depth, int opt) {
  Bar bar(a, b);
  Record shape(a, b);
  if (sz[opt].find(shape) == sz[opt].end())
    sz[opt].insert(shape);
  else
    return;
  if (rd[opt].find(bar) == rd[opt].end())
    rd[opt][bar] = depth;
  else {
    map<Bar, long long>::iterator it = rd[opt].find(bar);
    if (it->second > depth) it->second = depth;
  }
  if (a % 2 == 0) DFS(a / 2, b, depth + 1, opt);
  if (b % 2 == 0) DFS(a, b / 2, depth + 1, opt);
  if (a % 3 == 0) DFS(a / 3 * 2, b, depth + 1, opt);
  if (b % 3 == 0) DFS(a, b / 3 * 2, depth + 1, opt);
}
void test() {
  Bar b1(10, 5);
  Bar b2(5, 10);
  map<Bar, long long> tm;
  tm.insert(pair<Bar, long long>(b1, 1));
  if (tm.find(b2) == tm.end())
    cout << "not work\n";
  else
    cout << "OK\n";
}
int min(int a, int b) { return a < b ? a : b; }
int max(int a, int b) { return a > b ? a : b; }
int main() {
  cin >> a1 >> b1;
  cin >> a2 >> b2;
  DFS(a1, b1, 0, 0);
  DFS(a2, b2, 0, 1);
  int m = -1;
  Bar b[2];
  int opt = rd[0].size() < rd[1].size() ? 0 : 1;
  for (map<Bar, long long>::iterator it = rd[opt].begin(); it != rd[opt].end();
       it++) {
    map<Bar, long long>::iterator oit = rd[!opt].find(it->first);
    if (oit != rd[!opt].end()) {
      if (m == -1) {
        m = it->second + oit->second;
        b[opt] = it->first;
        b[!opt] = oit->first;
      } else {
        int time = it->second + oit->second;
        if (m > time) {
          m = time;
          b[opt] = it->first;
          b[!opt] = oit->first;
        }
      }
    }
  }
  cout << m << endl;
  if (m != -1) {
    cout << b[0].a << " " << b[0].b << endl;
    cout << b[1].a << " " << b[1].b << endl;
  }
  return 0;
}