ll@N,@K,@A[N],@C[N],B[N][N]={},k;rep(i,N)B[i][i]=1LL<<C[i];rep(l,1,N)rep(i,N){k=i+l;rep(j,i,k)REP(d,K+1)B[i][k%N]|=B[i][j%N]&B[(j+1)%N][k%N]<<d|B[i][j%N]&B[(j+1)%N][k%N]>>d;}wt(max[(i,l),0,N@B[i][(i+l)%N]](sum[m,i,i+l+1](A[m%N])));