ll@N,@T[N],t=sum[i,0,N](T[i]-T[0]),x=t;sortA(N,T);rep(i,1,N)x+=t+=(T[i]-T[i-1])*(2*i-N);wt(x/2);