Cod sursa(job #64922)

Utilizator fireatmyselfBogdan-Alexandru Stoica fireatmyself Data 6 iunie 2007 12:29:42
Problema Adapost Scor 41
Compilator cpp Status done
Runda Arhiva de probleme Marime 4.01 kb
#include <cstdio>
#include <cstring>
#include <cmath>
#include <vector>
#include <algorithm>


#define NMAX 404
#define MMAX 2*404
#define QMAX ((1<<16)-1)
#define INF 666000666
#define eps 1e-4
#define f first
#define s second

using namespace std;

int N, Cup[NMAX], F[NMAX], T, Fl[NMAX][NMAX], Flow;
vector<pair<double,int> > D[NMAX];
double X[NMAX], Y[NMAX], Rmin, Dmin, Dd[NMAX][MMAX], Dist[MMAX];
int t[MMAX], inQ[MMAX], Q[QMAX+10], cup[MMAX], type[MMAX];

void read()
{
        int i, j;
        double x, y;

        freopen("adapost.in", "r", stdin);
        scanf("%d", &N);

        for (i = 0; i < NMAX; i++)
            for (j = 0; j < NMAX; j++) Dd[i][j] = INF+1;

        for (i = 1; i <= N; i++)
            { scanf("%lf %lf", &X[i], &Y[i]); D[i].push_back(make_pair(-INF,0)); }

        for (i = 1; i <= N; i++)
        {
                scanf("%lf %lf", &x, &y);
                for (j = 1; j <= N; j++)
                {
                    D[j].push_back(make_pair(sqrt( (X[j]-x)*(X[j]-x) + (Y[j]-y)*(Y[j]-y) ), i));
                    Dd[j][i] = D[j][i].f;
                }
        }
        T = 2*N+1;

        for (i = 1; i <= N; i++) sort(D[i].begin(), D[i].end());
}

int pairthembaby(int i, double dmax)
{
        int j, x;
        
        if (F[i]) return 0;
        F[i] = 1;
        for (j = 1; j <= N && D[i][j].f <= dmax; j++)
            if ((!Cup[ D[i][j].s ]) || (pairthembaby(Cup[D[i][j].s], dmax)))
            {
                Cup[ D[i][j].s ] = i;
                return 1;
            }
        return 0;
}

void joint(double dmax)
{
        int i;

        for (i = 1; i <= N; i++)
            if (!pairthembaby(i,dmax))
            {
                memset(F,0,sizeof(F));
                pairthembaby(i,dmax);
            }
}

int bf(int tap)
{
        int i, j, lo, hi;
        double min;

        for (i = 0; i < MMAX; i++)
            t[i] = inQ[i] = 0, Dist[i] = INF;

        Q[0] = tap; inQ[tap] = 1; Dist[tap] = 0;

        for (lo = 0, hi = 1; lo != hi; lo = (lo+1)&QMAX)
        {
                i = Q[lo];
                for (j = 0; j <= T; j++)
                    if ( (!Fl[i][j]) && (Dist[j]>Dist[i]+Dd[i][j]) )
                    {
                        Dist[j] = Dist[i]+Dd[i][j];
                        t[j] = i;
                        if (!inQ[j]) inQ[j] = 1, Q[hi] = j, hi = (hi+1)&QMAX;
                        if (j == T)
                        {
                            Flow++;
                            Dmin += Dist[T];
                            for (i=T; i; i=t[i])
                                Fl[t[i]][i]++, Fl[i][t[i]]--;
                            return 1;
                        }
                    }
                    else
                    if ( (Fl[i][j]<0) && (Dist[j]>Dist[i]+Dd[i][j]) )
                        {
                                Dist[j] = Dist[i]+Dd[i][j];
                                t[j] = i;
                                if (!inQ[j]) inQ[j] = 1, Q[hi] = j, hi = (hi+1)&QMAX;
                        }
        }

        return 0;
}

void solve()
{
        int flow, i, j;
        double lo = 0, hi = (1<<28), mij;

        while (lo<=hi)
        {
                mij = (lo+hi)/2.0;
                memset(Cup,0,sizeof(Cup));
                joint(mij);
                for (i = 1, flow = 0; i <= N; i++) flow += (Cup[i]>0);
                if (flow == N) Rmin = mij, hi = mij-eps;
                else lo = mij+eps;
        }

        for (i = 1; i <= N; i++)
            for (j = 1; j <= N; j++) {
                if (Dd[i][j]<=Rmin) Dd[i][N+j] = Dd[i][j];
                Dd[i][j] = INF+1; }

        for (i = 1; i <= N; i++) Dd[0][i] = 0;
        for (i = N+1; i <= N<<1; i++) Dd[i][T] = 0;
        while (bf(0) && Flow < N);
}

void write()
{
        freopen("adapost.out", "w", stdout);
        printf("%lf %lf\n", Rmin, Dmin);
}

int main()
{
        read();
        solve();
        write();
        return 0;
}