n,w=gets.split.map &:to_i a=$<.map &:to_i z=j=s=0 p={} n.times{|i| s+=a[i]; while s>w||p[a[i]]&&j<=p[a[i]]do s-=a[j];j+=1end z