ll@n,z=-1;string@s;rrep(i,n)if(s[i]&1)z=max(z+2,n-i);wt(z);