int main() {
  char str[100], c;
  int i, l = 0, d = 0;
  for (i = 0; i < 100; i++) {
    scanf("%c", &str[i]);
  }
  for (i = 0; i < 100; i++) {
    if (str[i] >= 'a' && str[i] <= 'z')
      l++;
    else
      d++;
  }
  for (i = 0; i < l; i++) {
    c = (str[i]) * 2 - 96;
    if (c > 122) {
      c = str[i] - 122 + 96;
      printf("%c", c);
    } else {
      printf("%c", c);
    }
  }
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x80,%rsp
movl   $0x0,-0x4(%rbp)
movl   $0x0,-0x7c(%rbp)
movl   $0x0,-0x80(%rbp)
movl   $0x0,-0x78(%rbp)
cmpl   $0x64,-0x78(%rbp)
jge    1178 <main+0x58>
movslq -0x78(%rbp),%rax
lea    -0x70(%rbp),%rsi
add    %rax,%rsi
lea    0xe9d(%rip),%rdi
mov    $0x0,%al
call   1040 <scanf@plt>
mov    -0x78(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x78(%rbp)
jmp    1147 <main+0x27>
movl   $0x0,-0x78(%rbp)
cmpl   $0x64,-0x78(%rbp)
jge    11d7 <main+0xb7>
movslq -0x78(%rbp),%rax
movsbl -0x70(%rbp,%rax,1),%eax
cmp    $0x61,%eax
jl     11bb <main+0x9b>
movslq -0x78(%rbp),%rax
movsbl -0x70(%rbp,%rax,1),%eax
cmp    $0x7a,%eax
jg     11bb <main+0x9b>
mov    -0x7c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x7c(%rbp)
jmp    11c4 <main+0xa4>
mov    -0x80(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x80(%rbp)
jmp    11c9 <main+0xa9>
mov    -0x78(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x78(%rbp)
jmp    117f <main+0x5f>
movl   $0x0,-0x78(%rbp)
mov    -0x78(%rbp),%eax
cmp    -0x7c(%rbp),%eax
jge    1257 <main+0x137>
movslq -0x78(%rbp),%rax
movsbl -0x70(%rbp,%rax,1),%eax
shl    $0x1,%eax
sub    $0x60,%eax
mov    %al,-0x71(%rbp)
movsbl -0x71(%rbp),%eax
cmp    $0x7a,%eax
jle    1232 <main+0x112>
movslq -0x78(%rbp),%rax
movsbl -0x70(%rbp,%rax,1),%eax
sub    $0x7a,%eax
add    $0x60,%eax
mov    %al,-0x71(%rbp)
movsbl -0x71(%rbp),%esi
lea    0xdda(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
jmp    1244 <main+0x124>
movsbl -0x71(%rbp),%esi
lea    0xdc3(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
jmp    1249 <main+0x129>
mov    -0x78(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x78(%rbp)
jmp    11de <main+0xbe>
xor    %eax,%eax
add    $0x80,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %r14
push   %rbx
sub    $0x68,%rsp
lea    0xf02(%rip),%r14
xor    %ebx,%ebx
lea    (%rsp,%rbx,1),%rsi
mov    %r14,%rdi
xor    %eax,%eax
call   1040 <scanf@plt>
add    $0x1,%rbx
cmp    $0x64,%rbx
jne    1130 <main+0x10>
pxor   %xmm5,%xmm5
mov    $0xc,%eax
movdqa 0xea7(%rip),%xmm0
movdqa 0xeaf(%rip),%xmm1
pcmpeqd %xmm2,%xmm2
movdqa 0xeb3(%rip),%xmm3
nopl   (%rax)
movdqa -0xc(%rsp,%rax,1),%xmm6
paddb  %xmm0,%xmm6
movdqa %xmm6,%xmm4
pmaxub %xmm1,%xmm4
pcmpeqb %xmm6,%xmm4
pxor   %xmm2,%xmm4
punpcklbw %xmm4,%xmm4
punpcklwd %xmm4,%xmm4
pand   %xmm3,%xmm4
paddd  %xmm5,%xmm4
cmp    $0x6c,%rax
je     122a <main+0x10a>
movd   -0x8(%rsp,%rax,1),%xmm5
paddb  %xmm0,%xmm5
movdqa %xmm5,%xmm6
pmaxub %xmm1,%xmm6
pcmpeqb %xmm5,%xmm6
pxor   %xmm2,%xmm6
punpcklbw %xmm6,%xmm6
punpcklwd %xmm6,%xmm6
pand   %xmm3,%xmm6
paddd  %xmm6,%xmm4
movq   -0x4(%rsp,%rax,1),%xmm5
paddb  %xmm0,%xmm5
movdqa %xmm5,%xmm6
pmaxub %xmm1,%xmm6
pcmpeqb %xmm5,%xmm6
pxor   %xmm2,%xmm6
punpcklbw %xmm6,%xmm6
punpcklwd %xmm6,%xmm6
pand   %xmm3,%xmm6
movd   (%rsp,%rax,1),%xmm7
paddb  %xmm0,%xmm7
movdqa %xmm7,%xmm5
pmaxub %xmm1,%xmm5
pcmpeqb %xmm7,%xmm5
pxor   %xmm2,%xmm5
punpcklbw %xmm5,%xmm5
punpcklwd %xmm5,%xmm5
pand   %xmm3,%xmm5
paddd  %xmm6,%xmm5
paddd  %xmm4,%xmm5
add    $0x10,%rax
jmp    1170 <main+0x50>
pshufd $0xee,%xmm4,%xmm0
paddd  %xmm4,%xmm0
pshufd $0x55,%xmm0,%xmm1
paddd  %xmm0,%xmm1
movd   %xmm1,%eax
test   %eax,%eax
je     1279 <main+0x159>
mov    %eax,%r14d
xor    %ebx,%ebx
nopl   0x0(%rax)
movzbl (%rsp,%rbx,1),%eax
lea    (%rax,%rax,1),%ecx
add    $0xa0,%cl
add    $0xe6,%al
cmp    $0x7b,%cl
movzbl %al,%eax
movzbl %cl,%ecx
cmovge %eax,%ecx
movsbl %cl,%edi
call   1030 <putchar@plt>
add    $0x1,%rbx
cmp    %rbx,%r14
jne    1250 <main+0x130>
xor    %eax,%eax
add    $0x68,%rsp
pop    %rbx
pop    %r14
ret

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

LLVM IR (-O2):
@.str = [3 x i8] c"%c\00"
define i32 @main() {
%1 = alloca [100 x i8]
%2 = getelementptr inbounds [100 x i8], [100 x i8]* %1, i64 0, i64 0
br label %3
3: ; preds = %0, %3
%4 = phi i64 [ 0, %0 ], [ %7, %3 ]
%5 = getelementptr inbounds [100 x i8], [100 x i8]* %1, i64 0, i64 %4
%6 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i8* %5)
%7 = add nuw nsw i64 %4, 1
%8 = icmp eq i64 %7, 100
br i1 %8, label %9, label %3
9: ; preds = %3, %21
%10 = phi i64 [ %45, %21 ], [ 0, %3 ]
%11 = phi <4 x i32> [ %44, %21 ], [ zeroinitializer, %3 ]
%12 = getelementptr inbounds [100 x i8], [100 x i8]* %1, i64 0, i64 %10
%13 = bitcast i8* %12 to <4 x i8>*
%14 = load <4 x i8>, <4 x i8>* %13
%15 = add <4 x i8> %14, <i8 -97, i8 -97, i8 -97, i8 -97>
%16 = icmp ult <4 x i8> %15, <i8 26, i8 26, i8 26, i8 26>
%17 = zext <4 x i1> %16 to <4 x i32>
%18 = add <4 x i32> %11, %17
%19 = or i64 %10, 4
%20 = icmp eq i64 %19, 100
br i1 %20, label %46, label %21
21: ; preds = %9
%22 = getelementptr inbounds [100 x i8], [100 x i8]* %1, i64 0, i64 %19
%23 = bitcast i8* %22 to <4 x i8>*
%24 = load <4 x i8>, <4 x i8>* %23
%25 = add <4 x i8> %24, <i8 -97, i8 -97, i8 -97, i8 -97>
%26 = icmp ult <4 x i8> %25, <i8 26, i8 26, i8 26, i8 26>
%27 = zext <4 x i1> %26 to <4 x i32>
%28 = add <4 x i32> %18, %27
%29 = or i64 %10, 8
%30 = getelementptr inbounds [100 x i8], [100 x i8]* %1, i64 0, i64 %29
%31 = bitcast i8* %30 to <4 x i8>*
%32 = load <4 x i8>, <4 x i8>* %31
%33 = add <4 x i8> %32, <i8 -97, i8 -97, i8 -97, i8 -97>
%34 = icmp ult <4 x i8> %33, <i8 26, i8 26, i8 26, i8 26>
%35 = zext <4 x i1> %34 to <4 x i32>
%36 = add <4 x i32> %28, %35
%37 = or i64 %10, 12
%38 = getelementptr inbounds [100 x i8], [100 x i8]* %1, i64 0, i64 %37
%39 = bitcast i8* %38 to <4 x i8>*
%40 = load <4 x i8>, <4 x i8>* %39
%41 = add <4 x i8> %40, <i8 -97, i8 -97, i8 -97, i8 -97>
%42 = icmp ult <4 x i8> %41, <i8 26, i8 26, i8 26, i8 26>
%43 = zext <4 x i1> %42 to <4 x i32>
%44 = add <4 x i32> %36, %43
%45 = add nuw nsw i64 %10, 16
br label %9
46: ; preds = %9
%47 = call i32 @llvm.vector.reduce.add.v4i32(<4 x i32> %18)
%48 = icmp eq i32 %47, 0
br i1 %48, label %64, label %49
49: ; preds = %46
%50 = zext i32 %47 to i64
br label %51
51: ; preds = %49, %51
%52 = phi i64 [ 0, %49 ], [ %62, %51 ]
%53 = getelementptr inbounds [100 x i8], [100 x i8]* %1, i64 0, i64 %52
%54 = load i8, i8* %53
%55 = shl i8 %54, 1
%56 = add i8 %55, -96
%57 = icmp sgt i8 %56, 122
%58 = add i8 %54, -26
%59 = select i1 %57, i8 %58, i8 %56
%60 = sext i8 %59 to i32
%61 = call i32 @putchar(i32 %60)
%62 = add nuw nsw i64 %52, 1
%63 = icmp eq i64 %62, %50
br i1 %63, label %64, label %51
64: ; preds = %51, %46
ret i32 0
}