ll@N,@A[2N],S[2d6]{0,1};sortA(N,A,A+N);rep[A](a,N)S[a]?a+=N[&a],S[a]=a:0;wt(max(S(2d6)));