N, X = gets.split.map(&:to_i)

Len = [1]
Pat = [1]

(1..N).each do |i|
    Len[i] = Len[i-1] * 2 + 3
    Pat[i] = Pat[i-1] * 2 + 1
end

def rec(n, x)
    return 1 if n == 0
    ans = 0
    x -= 1
    if x > 0
        if x >= Len[n-1]
            ans += Pat[n-1]
            x -= Len[n-1]
        else
            ans += rec(n-1, x)
            return ans
        end
    end
    if x > 0
        ans += 1
        x -= 1
    end
    if x > 0
        if x >= Len[n-1]
            ans += Pat[n-1]
            x -= Len[n-1]
        else
            ans += rec(n-1, x)
            return ans
        end
    end
    ans
end

puts rec(N, X)