($n,$x)=glob<>;
@a=glob<>;
$a=-$n;
for$b(-$n..$n-1){
	$c+=$a[$b];
	while($b-$a>=$n||$c>$x){
		$c-=$a[$a++];
	}
	$d=$c if$d<$c;
}
print$d+0;