Problem: Vasya has gotten interested in programming contests in TCMCF+++ rules. On the contest n problems were suggested and every problem had a cost — a certain integral number of points (perhaps, negative or even equal to zero). According to TCMCF+++ rules, only accepted problems can earn points and the overall number of points of a contestant was equal to the product of the costs of all the problems he/she had completed. If a person didn't solve anything, then he/she didn't even appear in final standings and wasn't considered as participant. Vasya understood that to get the maximal number of points it is not always useful to solve all the problems. Unfortunately, he understood it only after the contest was finished. Now he asks you to help him: find out what problems he had to solve to earn the maximal number of points.

Input

The first line contains an integer n (1 ≤ n ≤ 100) — the number of the suggested problems. The next line contains n space-separated integers ci ( - 100 ≤ ci ≤ 100) — the cost of the i-th task. The tasks' costs may coinсide.

Output

Print space-separated the costs of the problems that needed to be solved to get the maximal possible number of points. Do not forget, please, that it was necessary to solve at least one problem. If there are several solutions to that problem, print any of them.

Examples

Input

5
1 2 -3 3 3


Output

3 1 2 3 


Input

13
100 100 100 100 100 100 100 100 100 100 100 100 100


Output

100 100 100 100 100 100 100 100 100 100 100 100 100 


Input

4
-2 -2 -2 -2


Output

-2 -2 -2 -2 

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
void print(string s) {
  cout << s << endl;
  exit(0);
}
bool t[110];
void solve() {
  int n, p[110], ans[110], k = 0;
  cin >> n;
  for (int(i) = 0; i < (n); i++) cin >> p[i + 1];
  for (int(i) = 0; i < (n); i++)
    if (p[i + 1] > 0) {
      ans[k++] = p[i + 1];
      t[i + 1] = true;
    }
  for (;;) {
    int m1 = 0, m2 = 0;
    for (int(i) = 0; i < (n); i++)
      if (!t[i + 1] && p[i + 1] < 0)
        if (m1 == 0 || p[i + 1] < p[m1]) m1 = i + 1;
    for (int(i) = 0; i < (n); i++)
      if (!t[i + 1] && p[i + 1] < 0 && i + 1 != m1)
        if (m2 == 0 || p[i + 1] < p[m2]) m2 = i + 1;
    if (m1 != 0 && m2 != 0) {
      t[m1] = t[m2] = true;
      ans[k++] = p[m1];
      ans[k++] = p[m2];
    } else
      break;
  }
  if (k == 0) {
    for (int(i) = 0; i < (n); i++)
      if (p[i + 1] == 0) {
        ans[k++] = 0;
        t[i + 1] = true;
        break;
      }
  }
  if (k == 0) {
    int mm = 0;
    for (int(i) = 0; i < (n); i++)
      if (mm == 0 || p[i + 1] > p[mm]) mm = i + 1;
    ans[k++] = p[mm];
    t[mm] = true;
  }
  for (int(i) = 0; i < (k); i++) cout << ans[i] << " ";
}
int main() {
  solve();
  return 0;
}