#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
int /*<<< orphan*/ printf(char *, long long);
int /*<<< orphan*/ scanf(char *, char *, long long *, long long *);
long long strlen(char *);
int main(int argc, const char *argv[]) {
  long long i, n, l, r, ans = 0, ln, rn, j = 0;
  char a[105], started = 1;
  scanf("%s %lli %lli", a, &l, &r);
  --l, --r;
  n = strlen(a);
  ln = l % n;
  rn = (r + 1) % n;
  for (i = ln; started || i != ln; i = (i + 1) % n) {
    started = 0;
    if (i == rn)
      j = ans;
    if (a[i] == 'B')
      ++ans;
  }
  printf("%lli", (r - l + 1) / n * ans + j);
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0xd0,%rsp
movl   $0x0,-0x4(%rbp)
mov    %edi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
movq   $0x0,-0x38(%rbp)
movq   $0x0,-0x50(%rbp)
movb   $0x1,-0xc1(%rbp)
lea    -0xc0(%rbp),%rsi
lea    0xe92(%rip),%rdi
lea    -0x28(%rbp),%rdx
lea    -0x30(%rbp),%rcx
call   1050 <scanf@plt>
mov    -0x28(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x28(%rbp)
mov    -0x30(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x30(%rbp)
lea    -0xc0(%rbp),%rdi
call   1030 <strlen@plt>
mov    %rax,-0x20(%rbp)
mov    -0x28(%rbp),%rax
cqto
idivq  -0x20(%rbp)
mov    %rdx,-0x40(%rbp)
mov    -0x30(%rbp),%rax
add    $0x1,%rax
cqto
idivq  -0x20(%rbp)
mov    %rdx,-0x48(%rbp)
mov    -0x40(%rbp),%rax
mov    %rax,-0x18(%rbp)
movsbl -0xc1(%rbp),%ecx
mov    $0x1,%al
cmp    $0x0,%ecx
mov    %al,-0xc2(%rbp)
jne    11f4 <main+0xc4>
mov    -0x18(%rbp),%rax
cmp    -0x40(%rbp),%rax
setne  %al
mov    %al,-0xc2(%rbp)
mov    -0xc2(%rbp),%al
test   $0x1,%al
jne    1207 <main+0xd7>
jmp    1261 <main+0x131>
movb   $0x0,-0xc1(%rbp)
mov    -0x18(%rbp),%rax
cmp    -0x48(%rbp),%rax
jne    1224 <main+0xf4>
mov    -0x38(%rbp),%rax
mov    %rax,-0x50(%rbp)
mov    -0x18(%rbp),%rax
movsbl -0xc0(%rbp,%rax,1),%eax
ff
cmp    $0x42,%eax
jne    1245 <main+0x115>
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    124a <main+0x11a>
mov    -0x18(%rbp),%rax
add    $0x1,%rax
cqto
idivq  -0x20(%rbp)
mov    %rdx,-0x18(%rbp)
jmp    11cb <main+0x9b>
mov    -0x30(%rbp),%rax
sub    -0x28(%rbp),%rax
add    $0x1,%rax
cqto
idivq  -0x20(%rbp)
mov    %rax,%rsi
imul   -0x38(%rbp),%rsi
add    -0x50(%rbp),%rsi
lea    0xd82(%rip),%rdi
call   1040 <printf@plt>
xor    %eax,%eax
add    $0xd0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %r15
push   %r14
push   %r12
push   %rbx
sub    $0x88,%rsp
lea    0xebb(%rip),%rdi
lea    0x10(%rsp),%r15
lea    0x8(%rsp),%rdx
mov    %rsp,%rcx
mov    %r15,%rsi
call   1050 <scanf@plt>
mov    0x8(%rsp),%r12
lea    -0x1(%r12),%rbx
mov    %rbx,0x8(%rsp)
mov    (%rsp),%r14
lea    -0x1(%r14),%rax
mov    %rax,(%rsp)
mov    %r15,%rdi
call   1030 <strlen@plt>
mov    %rax,%r10
mov    %rbx,%rax
or     %r10,%rax
shr    $0x20,%rax
je     1199 <main+0x69>
mov    %rbx,%rax
cqto
idiv   %r10
mov    %rdx,%r8
jmp    11a3 <main+0x73>
mov    %ebx,%eax
xor    %edx,%edx
div    %r10d
mov    %edx,%r8d
mov    %r14,%rax
or     %r10,%rax
shr    $0x20,%rax
je     11bc <main+0x8c>
mov    %r14,%rax
cqto
idiv   %r10
mov    %rdx,%r9
jmp    11c7 <main+0x97>
mov    %r14d,%eax
xor    %edx,%edx
div    %r10d
mov    %edx,%r9d
xor    %ebx,%ebx
mov    %r8,%rax
xor    %esi,%esi
jmp    11e3 <main+0xb3>
cqto
idiv   %r10
mov    %rdx,%rax
mov    %cl,%dil
add    %rdi,%rsi
cmp    %r8,%rax
je     120d <main+0xdd>
cmp    %r9,%rax
cmove  %rsi,%rbx
xor    %edi,%edi
cmpb   $0x42,0x10(%rsp,%rax,1)
sete   %cl
add    $0x1,%rax
mov    %rax,%rdx
or     %r10,%rdx
shr    $0x20,%rdx
jne    11d0 <main+0xa0>
xor    %edx,%edx
div    %r10d
mov    %edx,%eax
jmp    11d8 <main+0xa8>
sub    %r12,%r14
add    $0x1,%r14
mov    %r10,%rax
or     %r14,%rax
shr    $0x20,%rax
je     122a <main+0xfa>
mov    %r14,%rax
cqto
idiv   %r10
jmp    1232 <main+0x102>
mov    %r14d,%eax
xor    %edx,%edx
div    %r10d
imul   %rsi,%rax
add    %rbx,%rax
lea    0xdc8(%rip),%rdi
mov    %rax,%rsi
call   1040 <printf@plt>
xor    %eax,%eax
add    $0x88,%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
@.str = [13 x i8] c"%s %lli %lli\00"
@.str.1 = [5 x i8] c"%lli\00"
define i32 @main(i32 %0, i8** %1) {
%3 = alloca i32
%4 = alloca i32
%5 = alloca i8**
%6 = alloca i64
%7 = alloca i64
%8 = alloca i64
%9 = alloca i64
%10 = alloca i64
%11 = alloca i64
%12 = alloca i64
%13 = alloca i64
%14 = alloca [105 x i8]
%15 = alloca i8
store i32 0, i32* %3
store i32 %0, i32* %4
store i8** %1, i8*** %5
store i64 0, i64* %10
store i64 0, i64* %13
store i8 1, i8* %15
%16 = getelementptr inbounds [105 x i8], [105 x i8]* %14, i64 0, i64 0
%17 = call i32 @scanf(i8* getelementptr inbounds ([13 x i8], [13 x i8]* @.str, i64 0, i64 0), i8* %16, i64* %8, i64* %9)
%18 = load i64, i64* %8
%19 = add nsw i64 %18, -1
store i64 %19, i64* %8
%20 = load i64, i64* %9
%21 = add nsw i64 %20, -1
store i64 %21, i64* %9
%22 = getelementptr inbounds [105 x i8], [105 x i8]* %14, i64 0, i64 0
%23 = call i64 @strlen(i8* %22)
store i64 %23, i64* %7
%24 = load i64, i64* %8
%25 = load i64, i64* %7
%26 = srem i64 %24, %25
store i64 %26, i64* %11
%27 = load i64, i64* %9
%28 = add nsw i64 %27, 1
%29 = load i64, i64* %7
%30 = srem i64 %28, %29
store i64 %30, i64* %12
%31 = load i64, i64* %11
store i64 %31, i64* %6
br label %32
32: ; preds = %58, %2
%33 = load i8, i8* %15
%34 = sext i8 %33 to i32
%35 = icmp ne i32 %34, 0
br i1 %35, label %40, label %36
36: ; preds = %32
%37 = load i64, i64* %6
%38 = load i64, i64* %11
%39 = icmp ne i64 %37, %38
br label %40
40: ; preds = %36, %32
%41 = phi i1 [ true, %32 ], [ %39, %36 ]
br i1 %41, label %42, label %63
42: ; preds = %40
store i8 0, i8* %15
%43 = load i64, i64* %6
%44 = load i64, i64* %12
%45 = icmp eq i64 %43, %44
br i1 %45, label %46, label %48
46: ; preds = %42
%47 = load i64, i64* %10
store i64 %47, i64* %13
br label %48
48: ; preds = %46, %42
%49 = load i64, i64* %6
%50 = getelementptr inbounds [105 x i8], [105 x i8]* %14, i64 0, i64 %49
%51 = load i8, i8* %50
%52 = sext i8 %51 to i32
%53 = icmp eq i32 %52, 66
br i1 %53, label %54, label %57
54: ; preds = %48
%55 = load i64, i64* %10
%56 = add nsw i64 %55, 1
store i64 %56, i64* %10
br label %57
57: ; preds = %54, %48
br label %58
58: ; preds = %57
%59 = load i64, i64* %6
%60 = add nsw i64 %59, 1
%61 = load i64, i64* %7
%62 = srem i64 %60, %61
store i64 %62, i64* %6
br label %32
63: ; preds = %40
%64 = load i64, i64* %9
%65 = load i64, i64* %8
%66 = sub nsw i64 %64, %65
%67 = add nsw i64 %66, 1
%68 = load i64, i64* %7
%69 = sdiv i64 %67, %68
%70 = load i64, i64* %10
%71 = mul nsw i64 %69, %70
%72 = load i64, i64* %13
%73 = add nsw i64 %71, %72
%74 = call i32 @printf(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.1, i64 0, i64 0), i64 %73)
ret i32 0
}

LLVM IR (-O2):
@.str = [13 x i8] c"%s %lli %lli\00"
@.str.1 = [5 x i8] c"%lli\00"
define i32 @main(i32 %0, i8** nocapture readnone %1) {
%3 = alloca i64
%4 = alloca i64
%5 = alloca [105 x i8]
%6 = bitcast i64* %3 to i8*
%7 = bitcast i64* %4 to i8*
%8 = getelementptr inbounds [105 x i8], [105 x i8]* %5, i64 0, i64 0
%9 = call i32 @scanf(i8* getelementptr inbounds ([13 x i8], [13 x i8]* @.str, i64 0, i64 0), i8* %8, i64* %3, i64* %4)
%10 = load i64, i64* %3
%11 = add nsw i64 %10, -1
store i64 %11, i64* %3
%12 = load i64, i64* %4
%13 = add nsw i64 %12, -1
store i64 %13, i64* %4
%14 = call i64 @strlen(i8* %8)
%15 = srem i64 %11, %14
%16 = srem i64 %12, %14
br label %17
17: ; preds = %2, %17
%18 = phi i64 [ 0, %2 ], [ %22, %17 ]
%19 = phi i64 [ %15, %2 ], [ %29, %17 ]
%20 = phi i64 [ 0, %2 ], [ %27, %17 ]
%21 = icmp eq i64 %19, %16
%22 = select i1 %21, i64 %20, i64 %18
%23 = getelementptr inbounds [105 x i8], [105 x i8]* %5, i64 0, i64 %19
%24 = load i8, i8* %23
%25 = icmp eq i8 %24, 66
%26 = zext i1 %25 to i64
%27 = add nuw nsw i64 %20, %26
%28 = add nsw i64 %19, 1
%29 = srem i64 %28, %14
%30 = icmp eq i64 %29, %15
br i1 %30, label %31, label %17
31: ; preds = %17
%32 = sub i64 %12, %10
%33 = add i64 %32, 1
%34 = sdiv i64 %33, %14
%35 = mul nsw i64 %34, %27
%36 = add nsw i64 %35, %22
%37 = call i32 @printf(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.1, i64 0, i64 0), i64 %36)
ret i32 0
}