Problem: Boboniu likes playing chess with his employees. As we know, no employee can beat the boss in the chess game, so Boboniu has never lost in any round.

You are a new applicant for his company. Boboniu will test you with the following chess question:

Consider a n× m grid (rows are numbered from 1 to n, and columns are numbered from 1 to m). You have a chess piece, and it stands at some cell (S_x,S_y) which is not on the border (i.e. 2 ≤ S_x ≤ n-1 and 2 ≤ S_y ≤ m-1).

From the cell (x,y), you can move your chess piece to (x,y') (1≤ y'≤ m, y' ≠ y) or (x',y) (1≤ x'≤ n, x'≠ x). In other words, the chess piece moves as a rook. From the cell, you can move to any cell on the same row or column.

Your goal is to visit each cell exactly once. Can you find a solution?

Note that cells on the path between two adjacent cells in your route are not counted as visited, and it is not required to return to the starting point.

Input

The only line of the input contains four integers n, m, S_x and S_y (3≤ n,m≤ 100, 2 ≤ S_x ≤ n-1, 2 ≤ S_y ≤ m-1) — the number of rows, the number of columns, and the initial position of your chess piece, respectively.

Output

You should print n⋅ m lines.

The i-th line should contain two integers x_i and y_i (1 ≤ x_i ≤ n, 1 ≤ y_i ≤ m), denoting the i-th cell that you visited. You should print exactly nm pairs (x_i, y_i), they should cover all possible pairs (x_i, y_i), such that 1 ≤ x_i ≤ n, 1 ≤ y_i ≤ m.

We can show that under these constraints there always exists a solution. If there are multiple answers, print any.

Examples

Input


3 3 2 2


Output


2 2
1 2
1 3
2 3
3 3
3 2
3 1
2 1
1 1


Input


3 4 2 2


Output


2 2
2 1
2 3
2 4
1 4
3 4
3 3
3 2
3 1
1 1
1 2
1 3

Note

Possible routes for two examples:

<image>

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
long long fact[1000001], power[1000001];
long long powerr(long long x, long long y);
long long mpower(long long x, long long y, long long p);
long long gcdExtended(long long a, long long b);
bool isPrime(long long n);
long long func(long long n) {
  long long x = sqrt(n);
  if (n % x == 0) x = x + 1;
  long long i;
  for (i = 2; i < n / 2; i++) {
    if (n % i == 0 && isPrime(i) == true) {
      return i;
    }
  }
  return n;
}
int main() {
  ios_base::sync_with_stdio(false);
  cin.tie(NULL);
  long long t, j, k, l, h, p, q, r, x, i, y, z, a, b, c, d, f, n, m,
      M = 1000000007;
  char ch, ch2, ch3;
  string s1, s2, s3;
  vector<long long> v, w;
  set<long long> S;
  t = 1;
  while (t--) {
    cin >> n >> m >> x >> y;
    cout << x << " " << y;
    cout << "\n";
    z = 0;
    for (j = x - 1; j < n; j++) {
      if (z == 0) {
        for (k = z; k < m; k++) {
          if (j == x - 1 && k == y - 1)
            continue;
          else {
            cout << j + 1 << " " << k + 1;
            cout << "\n";
          }
        }
        z = m - 1;
      } else {
        for (k = m - 1; k >= 0; k--) {
          if (j == x - 1 && k == y - 1)
            continue;
          else {
            cout << j + 1 << " " << k + 1;
            cout << "\n";
          }
        }
        z = 0;
      }
    }
    for (j = x - 2; j >= 0; j--) {
      if (z == 0) {
        for (k = z; k < m; k++) {
          if (j == x - 1 && k == y - 1)
            continue;
          else {
            cout << j + 1 << " " << k + 1;
            cout << "\n";
          }
        }
        z = m - 1;
      } else {
        for (k = m - 1; k >= 0; k--) {
          if (j == x - 1 && k == y - 1)
            continue;
          else {
            cout << j + 1 << " " << k + 1;
            cout << "\n";
          }
        }
        z = 0;
      }
    }
  }
}
long long gcdExtended(long long a, long long b) {
  if (b == 0) {
    return a;
  } else
    return gcdExtended(b, a % b);
}
long long mpower(long long x, long long y, long long p) {
  long long res = 1;
  x = x % p;
  while (y > 0) {
    if (y & 1) res = (res * x) % p;
    y = y >> 1;
    x = (x * x) % p;
  }
  return res;
}
long long powerr(long long x, long long y) {
  long long res = 1;
  while (y > 0) {
    if (y & 1) res = res * x;
    y = y >> 1;
    x = x * x;
  }
  return res;
}
bool isPrime(long long n) {
  if (n <= 1) return false;
  if (n <= 3) return true;
  if (n % 2 == 0 || n % 3 == 0) return false;
  long long p = sqrt(n);
  for (int i = 5; i <= p; i = i + 6)
    if (n % i == 0 || n % (i + 2) == 0) return false;
  return true;
}