local s = io.read()
local t = {}
local n = #s
for i = 1, n do
  table.insert(t, s:sub(i, i) == "B")
end
local cnt = 0
local curcnt = 0
for i = n, 1, -1 do
  if t[i] then
    cnt = cnt + curcnt
    t[i] = false
  else
    curcnt = curcnt + 1
  end
end
print(cnt)
