Problem:
Problem E: Mobile Computing

There is a mysterious planet called Yaen, whose space is 2-dimensional. There are many beautiful
stones on the planet, and the Yaen people love to collect them. They bring the stones back home
and make nice mobile arts of them to decorate their 2-dimensional living rooms.

In their 2-dimensional world, a mobile is defined recursively as follows:

a stone hung by a string, or

a rod of length 1 with two sub-mobiles at both ends; the rod
is hung by a string at the center of gravity of sub-mobiles.
When the weights of the sub-mobiles are n and m, and their
distances from the center of gravity are a and b respectively,
the equation n × a = m × b holds.

For example, if you got three stones with weights 1, 1, and 2, here are some possible mobiles
and their widths:

Given the weights of stones and the width of the room, your task is to design the widest possible
mobile satisfying both of the following conditions.

It uses all the stones.

Its width is less than the width of the room.

You should ignore the widths of stones.

In some cases two sub-mobiles hung from both ends of a rod might
overlap (see the figure on the below). Such mobiles are acceptable.
The width of the example is (1/3) + 1 + (1/4).

Input

The first line of the input gives the number of datasets. Then the specified number of datasets
follow. A dataset has the following format.

r
s
w1
.
.
.
ws

r is a decimal fraction representing the width of the room, which satisfies 0 < r < 10. s is the
number of the stones. You may assume 1 ≤ s ≤ 6. wi is the weight of the i-th stone, which is
an integer. You may assume 1 ≤ wi ≤ 1000.

You can assume that no mobiles whose widths are between r - 0.00001 and r + 0.00001 can be made of given stones.

Output

For each dataset in the input, one line containing a decimal fraction should be output. The
decimal fraction should give the width of the widest possible mobile as defined above. An
output line should not contain extra characters such as spaces.

In case there is no mobile which satisfies the requirement, answer -1 instead.

The answer should not have an error greater than 0.00000001. You may output any number of
digits after the decimal point, provided that the above accuracy condition is satisfied.

Sample Input

5
1.3
3
1
2
1
1.4
3
1
2
1
2.0
3
1
2
1
1.59
4
2
1
1
3
1.7143
4
1
2
3
5

Output for the Sample Input

-1
1.3333333333333335
1.6666666666666667
1.5833333333333335
1.7142857142857142

Solution in C (judge verdict: Runtime Error)

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#define MAX 200

struct tree
{
    int wei;
    double l,r,m;
    int is;

}tr[MAX];

double r;
int s,w[7];
int jie[8];

int queen[MAX];
int tail=0;

int  calcw(int rt)
{
    int l=0,r=0;
    if(tr[rt].wei!=0)
    return tr[rt].wei;
    else
    {
        if(tr[2*rt].is==1)
        l=calcw(2*rt);
        if(tr[2*rt+1].is==1)
        r=calcw(2*rt+1);

        tr[rt].wei=l+r;
        return l+r;
    }

}

double calclr()
{
    int i;
    double min=9999999,max=-999999;

    tr[1].m=0;

    for(i=1;i<MAX;++i)
    {

        if(2*i+1<MAX&&tr[i*2].is==1)
        {
            double sum=tr[2*i].wei+tr[i*2+1].wei;

            tr[i].l=tr[i].m-tr[i*2+1].wei/sum;
            tr[i].r=tr[i].m+tr[i*2].wei/sum;
            min=min>tr[i].l?tr[i].l:min;
            max=max>tr[i].r?max:tr[i].r;

            tr[i*2].m=tr[i].l;
            tr[i*2+1].m=tr[i].r;

        }
    }

    return max-min;
}

void in(int n)
{
    int i;
    for(i=tail;i>n;--i)
    {
        queen[i]=queen[i-1];
    }
    queen[n]=queen[n+1]*2;
    queen[n+1]+=queen[n+1]+1;
    tr[queen[n]].is=1;
    tr[queen[n+1]].is=1;

    tail++;
}

int main()
{


    int i,t,j,l;
    double max;
    jie[0]=1;
    for(i=1;i<8;++i)
    jie[i]=jie[i-1]*i;


    scanf("%d",&t);
    for(;t>0;--t)
    {
    max=0;
    scanf("%lf%d",&r,&s);
    for(i=0;i<s;++i)
    scanf("%d",w+i);
        if(s>1)
        for(i=0;i<jie[s];++i)
        {
            int k=2;
            int pos=i;


            tail=0;
            memset(tr,0,sizeof(tr));
            queen[tail++]=1;
            in(0);

            tr[1].is=1;

            for(;k<s;++k)
            {
                in(pos*jie[k]/jie[s-1]);
                pos=pos%(jie[s-1]/jie[k]);


            }



            for(j=0;j<jie[tail];++j)
            {
                int k=tail-1;
                int nhh;
                int pos=j;
                int sub;
                double temp;

                int pailie[7];
                for(nhh=0;nhh<6;++nhh)
                pailie[nhh]=0;

                for(l=0;l<tail;++l)
                {
                    int i;

                    sub=pos/jie[k];
                    for(i=0;sub!=0||pailie[i]==1;)
                    {
                        if(pailie[i]==1)
                        ++i;
                        else if(pailie[i]==0)
                        {
                            --sub;
                            ++i;}

                    }
                    pailie[i]=1;
                    pos=pos%jie[k];
                    --k;
                    tr[queen[l]].wei=w[i];
                }

                calcw(1);
                temp=calclr();
                if(temp<=r)
                max=max>temp?max:temp;



            }





        }


        else
        {
            max=-1;
            printf("-1\n");
        }
        if(max>0)
        printf("%.16lf\n",max);
        else if(max==0)
        printf("-1\n");

    }
    return 0;
}