Problem: Equilateral Triangular Fence

Ms. Misumi owns an orchard along a straight road. Recently, wild boars have been witnessed strolling around the orchard aiming at pears, and she plans to construct a fence around many of the pear trees.

The orchard contains n pear trees, whose locations are given by the two-dimensional Euclidean coordinates (x1, y1),..., (xn, yn). For simplicity, we neglect the thickness of pear trees. Ms. Misumi's aesthetic tells that the fence has to form a equilateral triangle with one of its edges parallel to the road. Its opposite apex, of course, should be apart from the road. The coordinate system for the positions of the pear trees is chosen so that the road is expressed as y = 0, and the pear trees are located at y ≥ 1.

Due to budget constraints, Ms. Misumi decided to allow at most k trees to be left outside of the fence. You are to find the shortest possible perimeter of the fence on this condition.

The following figure shows the first dataset of the Sample Input. There are four pear trees at (−1,2), (0,1), (1,2), and (2,1). By excluding (−1,2) from the fence, we obtain the equilateral triangle with perimeter 6.

<image>

Input

The input consists of multiple datasets, each in the following format.

> n
>  k
>  x1 y1
>  ...
>  xn yn
>

Each of the datasets consists of n+2 lines. n in the first line is the integer representing the number of pear trees; it satisfies 3 ≤ n ≤ 10 000. k in the second line is the integer representing the number of pear trees that may be left outside of the fence; it satisfies 1 ≤ k ≤ min(n−2, 5 000). The following n lines have two integers each representing the x- and y- coordinates, in this order, of the locations of pear trees; it satisfies −10 000 ≤ xi ≤ 10 000, 1 ≤ yi ≤ 10 000. No two pear trees are at the same location, i.e., (xi, yi)=(xj, yj) only if i=j.

The end of the input is indicated by a line containing a zero. The number of datasets is at most 100.

Output

For each dataset, output a single number that represents the shortest possible perimeter of the fence. The output must not contain an error greater than 10−6.

Sample Input


4
1
0 1
1 2
-1 2
2 1
4
1
1 1
2 2
1 3
1 4
4
1
1 1
2 2
3 1
4 1
4
1
1 2
2 1
3 2
4 2
5
2
0 1
0 2
0 3
0 4
0 5
6
3
0 2
2 2
1 1
0 3
2 3
1 4
0


Output for the Sample Input


6.000000000000
6.928203230276
6.000000000000
7.732050807569
6.928203230276
6.000000000000






Example

Input

4
1
0 1
1 2
-1 2
2 1
4
1
1 1
2 2
1 3
1 4
4
1
1 1
2 2
3 1
4 1
4
1
1 2
2 1
3 2
4 2
5
2
0 1
0 2
0 3
0 4
0 5
6
3
0 2
2 2
1 1
0 3
2 3
1 4
0


Output

6.000000000000
6.928203230276
6.000000000000
7.732050807569
6.928203230276
6.000000000000

Solution (in CPP):

Solution:
#include<bits/stdc++.h>

#define ll long long
#define fornum(A,B,C) for(A=B;A<C;A++)
#define mp make_pair
#define pii pair<int,int>
#define pll pair<ll,ll>

using namespace std;

/////////////////////////////////////////////////////
#define r3 0.57735026918962576450914878050196
//#define s3 1.7320508075688772935274463415059
#define INF 1e12
#define pdl pair<double,ll>
ll n, K,x[10101],y[10101];
pdl av[10101], bv[10101];
//vector<ll> cv;
ll i, j,mk[101010];
double ans;

int main(){
    double s3 = sqrt(3);
    //printf("a%lld", n);
    while(true){
        ans = INF;
        scanf("%lld",&n);
        if(n==0)
            break;
        scanf("%lld", &K);
        K = n - K;
        //av.resize(n);
        //bv.resize(n);
        //cv.resize(n);
        fornum(i,0,n){
            scanf("%lld%lld", &x[i], &y[i]);
            av[i] = mp(x[i] - y[i]/s3, i);
            bv[i] = mp(x[i] + y[i]/s3, i);
            //cv[i] = y[i];
        }
        sort(av, av + n);
        sort(bv, bv + n);
        //sort(cv.begin(), cv.end());
        /*fornum(i,0,n){
            printf("%lld,%lf,%lf\n",i, av[i].first, bv[i].first);
        }*/
        //printf("a\n");
        fornum(i,0,n){
            ll l = 0, r = 0,kk=0;
            ll yy = y[i];
            fornum(j,0,n){
                mk[j] = 0;
            }
            fornum(l, 0, n){
                if (y[av[l].second] < yy)
                    continue;
                while(r<n&&kk<K){
                    ll ii = bv[r].second;
                    if(yy<=y[ii]&&mk[ii]!=2){
                        mk[ii] = 1;
                        kk++;
                    }
                    r++;
                }
                if(kk<K)
                    break;
                ll li = av[l].second;
                if(mk[li]==1){
                    ll ri = bv[r-1].second;
                    double aaa = (x[ri] + (y[ri] - yy) / s3) - (x[li] - (y[li] - yy) / s3);
                    if(aaa<ans)
                        ans = aaa;
                    kk--;
                }else{
                    double aaa = (x[li] + (y[li] - yy) / s3) - (x[li] - (y[li] - yy) / s3);
                    if(aaa<ans)
                        ans = aaa;
                }
                //printf("%lld,%lf,%lf,%lld,%lf\n", yy, av[l].first, bv[r-1].first,mk[av[l].second], ans);
                mk[li] = 2;
                
            }
        }

        printf("%.10lf\n", ans*3);
    }
    return 0;
}