print((function () local r,s = 1,io.stdin:read("*l") for i=1,#s do r=s:sub(i,i)=="L" and r*2 or r*2+1 end return r end)())