($n,$m)=glob<>;
for(1..$n){
	$s+=$m;
	$m=$m+1>>1;
}
print$s;