{ll@n;VI@a(n);rsortV(a);wt(sum[i,0,n](a[i]*Ilog2_f(i+1)));}