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;
const int maxn = 1000100;
const int INF = 1e9 + 9;
int ans;
long long area1, area2;
long long a[3], b[3];
int twos[3], threes[3];
int loss2[3], loss3[3];
int trans[3];
void out() {
  printf("%d\n", ans);
  long long *cur = &a[1];
  for (int i = int(1); i <= int(trans[1]); ++i) {
    if (*cur % 3 != 0) cur = &b[1];
    *cur /= 3, *cur *= 2;
  }
  cur = &a[1];
  for (int i = int(1); i <= int(loss3[1]); ++i) {
    if (*cur % 3 != 0) cur = &b[1];
    *cur /= 3;
  }
  cur = &a[1];
  for (int i = int(1); i <= int(loss2[1]); ++i) {
    if (*cur % 2 != 0) cur = &b[1];
    *cur /= 2;
  }
  cur = &a[2];
  for (int i = int(1); i <= int(trans[2]); ++i) {
    if (*cur % 3 != 0) cur = &b[2];
    *cur /= 3, *cur *= 2;
  }
  cur = &a[2];
  for (int i = int(1); i <= int(loss3[2]); ++i) {
    if (*cur % 3 != 0) cur = &b[2];
    *cur /= 3;
  }
  cur = &a[2];
  for (int i = int(1); i <= int(loss2[2]); ++i) {
    if (*cur % 2 != 0) cur = &b[2];
    *cur /= 2;
  }
  printf("%I64d %I64d\n", a[1], b[1]);
  printf("%I64d %I64d\n", a[2], b[2]);
}
int main() {
  scanf("%I64d %I64d", &a[1], &b[1]);
  area1 = a[1] * b[1];
  scanf("%I64d %I64d", &a[2], &b[2]);
  area2 = a[2] * b[2];
  while (area1 % 2 == 0) ++twos[1], area1 /= 2;
  while (area1 % 3 == 0) ++threes[1], area1 /= 3;
  while (area2 % 2 == 0) ++twos[2], area2 /= 2;
  while (area2 % 3 == 0) ++threes[2], area2 /= 3;
  if (area1 != area2) {
    printf("-1");
    return 0;
  }
  twos[0] = min(twos[1], twos[2]);
  loss2[1] = twos[1] - twos[0];
  loss2[2] = twos[2] - twos[0];
  threes[0] = min(threes[1], threes[2]);
  loss3[1] = threes[1] - threes[0];
  loss3[2] = threes[2] - threes[0];
  if ((loss2[1] && loss3[2]) || (loss2[2] && loss3[1])) {
    ans = max(max(loss2[1], loss3[1]), max(loss2[2], loss3[2]));
    if ((loss2[1] < loss3[2]) || (loss2[2] < loss3[1]))
      ans += max(loss3[2] - loss2[1], loss3[1] - loss2[2]);
    if (loss2[1] && loss3[2])
      loss2[2] = max(0, loss3[2] - loss2[1]);
    else
      loss2[1] = max(0, loss3[1] - loss2[2]);
    loss2[1] -= min(loss2[1], loss3[2]);
    loss2[2] -= min(loss2[2], loss3[1]);
    trans[1] = loss3[1], loss3[1] = 0;
    trans[2] = loss3[2], loss3[2] = 0;
  } else {
    ans = max(loss2[1] + loss3[1] * 2, loss2[2] + loss3[2] * 2);
    trans[1] = loss3[1];
    loss2[1] += loss3[1];
    trans[2] = loss3[2];
    loss2[2] += loss3[2];
    loss3[1] = 0;
    loss3[2] = 0;
  }
  out();
  return 0;
}