ll@N,@K,@A[2N],@C[N];rep(i,N)C[i]-=A[i+N];rsortA(N,C);wt(sum(A(2N),C(N-K)));