Problem: While Grisha was celebrating New Year with Ded Moroz, Misha gifted Sasha a small rectangular pond of size n × m, divided into cells of size 1 × 1, inhabited by tiny evil fishes (no more than one fish per cell, otherwise they'll strife!).

The gift bundle also includes a square scoop of size r × r, designed for fishing. If the lower-left corner of the scoop-net is located at cell (x, y), all fishes inside the square (x, y)...(x + r - 1, y + r - 1) get caught. Note that the scoop-net should lie completely inside the pond when used.

Unfortunately, Sasha is not that skilled in fishing and hence throws the scoop randomly. In order to not frustrate Sasha, Misha decided to release k fishes into the empty pond in such a way that the expected value of the number of caught fishes is as high as possible. Help Misha! In other words, put k fishes in the pond into distinct cells in such a way that when the scoop-net is placed into a random position among (n - r + 1)·(m - r + 1) possible positions, the average number of caught fishes is as high as possible.

Input

The only line contains four integers n, m, r, k (1 ≤ n, m ≤ 105, 1 ≤ r ≤ min(n, m), 1 ≤ k ≤ min(n·m, 105)).

Output

Print a single number — the maximum possible expected number of caught fishes.

You answer is considered correct, is its absolute or relative error does not exceed 10 - 9. Namely, let your answer be a, and the jury's answer be b. Your answer is considered correct, if <image>.

Examples

Input

3 3 2 3


Output

2.0000000000


Input

12 17 9 40


Output

32.8333333333

Note

In the first example you can put the fishes in cells (2, 1), (2, 2), (2, 3). In this case, for any of four possible positions of the scoop-net (highlighted with light green), the number of fishes inside is equal to two, and so is the expected value.

<image>

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
const double eps = 1e-9;
const int inf = 2000000000;
const long long infLL = 9000000000000000000;
template <typename first, typename second>
ostream& operator<<(ostream& os, const pair<first, second>& p) {
  return os << "(" << p.first << ", " << p.second << ")";
}
template <typename T>
ostream& operator<<(ostream& os, const vector<T>& v) {
  os << "{";
  for (auto it = v.begin(); it != v.end(); ++it) {
    if (it != v.begin()) os << ", ";
    os << *it;
  }
  return os << "}";
}
template <typename T>
ostream& operator<<(ostream& os, const set<T>& v) {
  os << "[";
  for (auto it = v.begin(); it != v.end(); ++it) {
    if (it != v.begin()) os << ",";
    os << *it;
  }
  return os << "]";
}
template <typename T>
ostream& operator<<(ostream& os, const multiset<T>& v) {
  os << "[";
  for (auto it = v.begin(); it != v.end(); ++it) {
    if (it != v.begin()) os << ", ";
    os << *it;
  }
  return os << "]";
}
template <typename first, typename second>
ostream& operator<<(ostream& os, const map<first, second>& v) {
  os << "[";
  for (auto it = v.begin(); it != v.end(); ++it) {
    if (it != v.begin()) os << ", ";
    os << it->first << " = " << it->second;
  }
  return os << "]";
}
void faltu() { cerr << '\n'; }
template <typename T>
void faltu(T a[], int n) {
  for (int i = 0; i < n; ++i) cerr << a[i] << ' ';
  cerr << '\n';
}
template <typename T, typename... hello>
void faltu(T arg, const hello&... rest) {
  cerr << arg << ' ';
  faltu(rest...);
}
int dx[] = {0, 0, +1, -1};
int dy[] = {+1, -1, 0, 0};
priority_queue<pair<long long, pair<int, int> > > pq;
map<pair<int, int>, bool> mp;
int n, m, r, k;
long long func(int x, int y) {
  long long l1 = max(1, r - (m - y + 1) + 1), r1 = min(y, r);
  long long l2 = max(1, r - (n - x + 1) + 1), r2 = min(x, r);
  long long len1 = r1 - l1 + 1;
  long long len2 = r2 - l2 + 1;
  long long ans = len1 * len2;
  return ans;
}
int main() {
  ios_base::sync_with_stdio(0);
  cin.tie(0);
  cout.tie(0);
  ;
  cout << setprecision(10) << fixed;
  cin >> n >> m >> r >> k;
  int X1, X2, Y1, Y2;
  if (n % 2 == 0) {
    X1 = n / 2;
    X2 = X1 + 1;
  } else {
    X1 = X2 = (n + 1) / 2;
  }
  if (m % 2 == 0) {
    Y1 = m / 2;
    Y2 = Y1 + 1;
  } else {
    Y1 = Y2 = (m + 1) / 2;
  }
  for (int i = X1; i <= X2; ++i) {
    for (int j = Y1; j <= Y2; ++j) {
      pq.push(make_pair(func(i, j), make_pair(i, j)));
      mp[make_pair(i, j)] = 1;
    }
  }
  long long sum = 0;
  while (k--) {
    pair<long long, pair<int, int> > p = pq.top();
    pq.pop();
    sum += p.first;
    int x = p.second.first, y = p.second.second;
    for (int i = 0; i < 4; ++i) {
      int nx = x + dx[i], ny = y + dy[i];
      if (nx < 1 || nx > n || ny < 1 || ny > m) continue;
      if (mp.lower_bound(make_pair(nx, ny)) !=
          mp.upper_bound(make_pair(nx, ny)))
        continue;
      pq.push(make_pair(func(nx, ny), make_pair(nx, ny)));
      mp[make_pair(nx, ny)] = 1;
    }
  }
  long long den = (long long)(n - r + 1) * (m - r + 1);
  double ans = (double)sum / (double)den;
  cout << ans << '\n';
}