ll@n,@a[2n],b[];sortA_index(2n,a,b);wt(sum(a(2n))-sum(a(n))*2);rep(i,n)wt(b[i]+1,b[i+n]+1);