use proconio::input;
fn main() {
    input! {
        lr:String,
    }
    let mut number = 1;
    for i in lr.chars(){
        if i == 'L'{
            number *= 2
        }else {
            number = number * 2 + 1;
        }
    }
    println!("{}",number)
}