#pragma GCC optimize("Ofast")
#include<iostream>
#include<stdio.h>
#include<algorithm>
#include<vector>
#include<string.h>
#include<math.h>
#include<map>
#include<iomanip>
#include<queue>

using namespace std;

int main(){	
	string s;
	cin >> s;
	long long ans=1;
	for(int i=0;i<s.size();i++){
		ans*=2;
		if(s[i]=='R')ans+=1;
	}
	cout << ans << endl;
	return 0;
}