Problem: Luyi has n circles on the plane. The i-th circle is centered at (xi, yi). At the time zero circles start to grow simultaneously. In other words, the radius of each circle at time t (t > 0) is equal to t. The circles are drawn as black discs on an infinite white plane. So at each moment the plane consists of several black and white regions. Note that the circles may overlap while growing.

<image>

We define a hole as a closed, connected white region. For instance, the figure contains two holes shown by red border. During growing some holes may be created and it is easy to see that each created hole will disappear eventually. Luyi asks you to find moment of time such that the last hole disappears. In other words, you should find the first moment such that no hole can be seen after that.

Input

The first line of the input contains integer n (1 ≤ n ≤ 100). Each of the next n lines contains two integers xi and yi ( - 104 ≤ xi, yi ≤ 104), indicating the location of i-th circle.

It's guaranteed that no two circles are centered at the same point.

Output

Print the moment where the last hole disappears. If there exists no moment in which we can find holes print -1.

The answer will be considered correct if the absolute or relative error does not exceed 10 - 4.

Examples

Input

3
0 0
1 1
2 2


Output

-1


Input

4
0 0
0 2
2 2
2 0


Output

1.414214


Input

4
0 1
0 -1
-2 0
4 0


Output

2.125000

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
template <class T>
inline T min(T &a, T &b) {
  return a < b ? a : b;
}
template <class T>
inline T max(T &a, T &b) {
  return a > b ? a : b;
}
template <class T>
void read(T &x) {
  char ch;
  while ((ch = getchar()) && !isdigit(ch))
    ;
  x = ch - '0';
  while ((ch = getchar()) && isdigit(ch)) x = x * 10 + ch - '0';
}
const double DINF = 1e30, eps = 1e-7;
const int N = 200;
struct point {
  double x, y;
  point() {}
  point(double _x, double _y) : x(_x), y(_y) {}
} P[N];
struct Line {
  double k, b;
  Line() {}
  Line(double _k, double _b) : k(_k), b(_b) {}
};
int n;
map<pair<int, int>, int> Hash;
double Ans = -1;
point operator-(point a, point b) { return point(a.x - b.x, a.y - b.y); }
point operator+(point a, point b) { return point(a.x + b.x, a.y + b.y); }
double operator^(point a, point b) { return a.x * b.x + a.y * b.y; }
void sc_point(point a) { printf("point %.3lf %.3lf\n", a.x, a.y); }
double check_acute(point a, point b, point c) {
  point X = b - a, Y = c - a;
  if (X.x * Y.y == X.y * Y.x) return -1;
  return X ^ Y;
}
double Dis(point a, point b) {
  return sqrt((a.x - b.x) * (a.x - b.x) + (a.y - b.y) * (a.y - b.y));
}
Line Get_Line(point a, point b) {
  if (a.x == b.x)
    return Line((~0U >> 1) - 3, a.x);
  else {
    double k = (b.y - a.y) / (b.x - a.x);
    return Line(k, a.y - a.x * k);
  }
}
Line Change_k(Line a) {
  if (a.k == (~0U >> 1) - 3)
    return Line(0, a.b);
  else if (a.k == 0)
    return Line((~0U >> 1) - 3, a.b);
  else
    return Line(-1 / a.k, a.b);
}
Line Change_b(Line a, point b) {
  if (a.k == (~0U >> 1) - 3)
    return Line(a.k, b.x);
  else if (a.k == 0)
    return Line(a.k, b.y);
  else
    return Line(a.k, b.y - a.k * b.x);
}
point Get_point(Line x, Line y) {
  if (x.k > y.k) swap(x, y);
  if (y.k == (~0U >> 1) - 3) return point(y.b, x.k * y.b + x.b);
  if (x.k == 0) return point((x.b - y.b) / (y.k), x.b);
  if (y.k == 0) return point((y.b - x.b) / (x.k), y.b);
  double a = x.k, b = x.b, c = y.k, d = y.b;
  return point(((a * d - b * c) / (a - c) - b) / a, (a * d - b * c) / (a - c));
}
point Find_Ct(point a, point b, point c) {
  point d = point((a.x + b.x) / 2., (a.y + b.y) / 2.),
        e = point((a.x + c.x) / 2., (a.y + c.y) / 2.);
  Line lab = Get_Line(a, b), lac = Get_Line(a, c);
  lab = Change_k(lab);
  lac = Change_k(lac);
  lab = Change_b(lab, d);
  lac = Change_b(lac, e);
  return Get_point(lab, lac);
}
void update(point a, point b, point c) {
  point d = c + (b - a), Ct;
  if (Hash[make_pair(d.x, d.y)]) {
    Ct = point((b.x + c.x) / 2., (b.y + c.y) / 2.);
    double ans = DINF;
    for (int l = 1; l <= n; l++) ans = min(ans, Dis(Ct, P[l]));
    if (ans >= Dis(Ct, a) - eps) Ans = max(Ans, ans);
  }
}
int main() {
  scanf("%d", &n);
  for (int i = 1; i <= n; i++)
    scanf("%lf%lf", &P[i].x, &P[i].y), Hash[make_pair(P[i].x, P[i].y)] = 1;
  for (int i = 1; i <= n; i++)
    for (int j = i + 1; j <= n; j++)
      for (int k = j + 1; k <= n; k++) {
        double ca = check_acute(P[i], P[j], P[k]),
               cb = check_acute(P[j], P[i], P[k]),
               cc = check_acute(P[k], P[i], P[j]);
        if (!(ca < eps || cb < eps || cc < eps)) {
          point Ct = Find_Ct(P[i], P[j], P[k]);
          double ans = DINF;
          for (int l = 1; l <= n; l++) ans = min(ans, Dis(Ct, P[l]));
          if (ans >= Dis(Ct, P[i]) - eps) Ans = max(Ans, ans);
        }
        if (-eps < ca && ca < eps) update(P[i], P[j], P[k]);
        if (-eps < cb && cb < eps) update(P[j], P[i], P[k]);
        if (-eps < cc && cc < eps) update(P[k], P[i], P[j]);
      }
  if (Ans < eps && Ans > -eps)
    puts("-1");
  else
    printf("%.10lf\n", Ans);
}