Problem: You are given an strictly convex polygon with n vertices. It is guaranteed that no three points are collinear. You would like to take a maximum non intersecting path on the polygon vertices that visits each point at most once.

More specifically your path can be represented as some sequence of distinct polygon vertices. Your path is the straight line segments between adjacent vertices in order. These segments are not allowed to touch or intersect each other except at the vertices in your sequence.

Given the polygon, print the maximum length non-intersecting path that visits each point at most once.

Input

The first line of input will contain a single integer n (2 ≤ n ≤ 2 500), the number of points.

The next n lines will contain two integers xi, yi (|xi|, |yi| ≤ 109), denoting the coordinates of the i-th vertex.

It is guaranteed that these points are listed in clockwise order.

Output

Print a single floating point number, representing the longest non-intersecting path that visits the vertices at most once.

Your answer will be accepted if it has absolute or relative error at most 10 - 9. More specifically, if your answer is a and the jury answer is b, your answer will be accepted if <image>.

Example

Input

4
0 0
0 1
1 1
1 0


Output

3.4142135624

Note

One optimal path is to visit points 0,1,3,2 in order.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
struct dot {
  double x, y;
  dot(long long x = 0, long long y = 0) {
    this->x = x;
    this->y = y;
  };
} p[3001];
double dp[3001][3001][2];
inline long long Read() {
  register long long Flag;
  register char C;
  register long long X = 0;
  Flag = 1, C = getchar();
  while (!isdigit(C)) {
    if (C == '-') {
      Flag = -1;
    }
    C = getchar();
  }
  while (isdigit(C)) {
    X = (X << 1) + (X << 3) + C - '0';
    C = getchar();
  }
  return X * Flag;
}
signed main() {
  long long n;
  cin >> n;
  long long y, z;
  for (long long x = 0; x < n; x++) y = Read(), z = Read(), p[x] = dot(y, z);
  for (long long x = 2; x <= n; x++)
    for (long long l = 0; l < n; l++)
      dp[l][(l + x - 1) % n]
        [0] =
            ((dp[(l + 1) % n][(l + x - 1) % n][0] +
              (sqrt((p[l].x - p[(l + 1) % n].x) * (p[l].x - p[(l + 1) % n].x) +
                    (p[l].y - p[(l + 1) % n].y) *
                        (p[l].y - p[(l + 1) % n].y)))) >
                     (dp[(l + 1) % n][(l + x - 1) % n][1] +
                      (sqrt((p[l].x - p[(l + x - 1) % n].x) *
                                (p[l].x - p[(l + x - 1) % n].x) +
                            (p[l].y - p[(l + x - 1) % n].y) *
                                (p[l].y - p[(l + x - 1) % n].y))))
                 ? (dp[(l + 1) % n][(l + x - 1) % n][0] +
                    (sqrt((p[l].x - p[(l + 1) % n].x) *
                              (p[l].x - p[(l + 1) % n].x) +
                          (p[l].y - p[(l + 1) % n].y) *
                              (p[l].y - p[(l + 1) % n].y))))
                 : (dp[(l + 1) % n][(l + x - 1) % n][1] +
                    (sqrt((p[l].x - p[(l + x - 1) % n].x) *
                              (p[l].x - p[(l + x - 1) % n].x) +
                          (p[l].y - p[(l + x - 1) % n].y) *
                              (p[l].y - p[(l + x - 1) % n].y))))),
      dp[l][(l + x - 1) %
            n][1] =
          ((dp[l][(l + x - 2 + n) % n][0] +
            (sqrt((p[(l + x - 1) % n].x - p[l].x) *
                      (p[(l + x - 1) % n].x - p[l].x) +
                  (p[(l + x - 1) % n].y - p[l].y) *
                      (p[(l + x - 1) % n].y - p[l].y)))) >
                   (dp[l][(l + x - 2 + n) % n][1] +
                    (sqrt(
                        (p[(l + x - 1) % n].x - p[(l + x - 2 + n) % n].x) *
                            (p[(l + x - 1) % n].x - p[(l + x - 2 + n) % n].x) +
                        (p[(l + x - 1) % n].y - p[(l + x - 2 + n) % n].y) *
                            (p[(l + x - 1) % n].y - p[(l + x - 2 + n) % n].y))))
               ? (dp[l][(l + x - 2 + n) % n][0] +
                  (sqrt((p[(l + x - 1) % n].x - p[l].x) *
                            (p[(l + x - 1) % n].x - p[l].x) +
                        (p[(l + x - 1) % n].y - p[l].y) *
                            (p[(l + x - 1) % n].y - p[l].y))))
               : (dp[l][(l + x - 2 + n) % n][1] +
                  (sqrt(
                      (p[(l + x - 1) % n].x - p[(l + x - 2 + n) % n].x) *
                          (p[(l + x - 1) % n].x - p[(l + x - 2 + n) % n].x) +
                      (p[(l + x - 1) % n].y - p[(l + x - 2 + n) % n].y) *
                          (p[(l + x - 1) % n].y - p[(l + x - 2 + n) % n].y)))));
  double ans = 0;
  for (long long x = 0; x < n; x++)
    ans = ((ans) > (((dp[x][(x + n - 1) % n][0]) > (dp[x][(x + n - 1) % n][1])
                         ? (dp[x][(x + n - 1) % n][0])
                         : (dp[x][(x + n - 1) % n][1])))
               ? (ans)
               : (((dp[x][(x + n - 1) % n][0]) > (dp[x][(x + n - 1) % n][1])
                       ? (dp[x][(x + n - 1) % n][0])
                       : (dp[x][(x + n - 1) % n][1]))));
  printf("%.10lf", ans);
}