#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 */
typedef int /*<<< orphan*/ c;

/* Variables and functions */
int /*<<< orphan*/ gets(char *);
int /*<<< orphan*/ printf(char *, char);
int main() {
  int i = 0, s, l = 0;
  char c[10000];
  gets(c);
  s = sizeof(c);
  while (l <= s) {
    if (c[l - 3] == 'S' && c[l - 2] == 'T' && c[l - 1] == 'O' && c[l] == 'P') {
      for (i = 0; i < l; i++) {
        if (c[i] >= 'a' && c[i] <= 'z') {
          c[i] = c[i] - 32;
        }
        printf("\n %c", c[i]);
      }
    }
    l++;
  }
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x2720,%rsp
movl   $0x0,-0x4(%rbp)
movl   $0x0,-0x8(%rbp)
movl   $0x0,-0x10(%rbp)
lea    -0x2720(%rbp),%rdi
call   1040 <gets@plt>
movl   $0x2710,-0xc(%rbp)
mov    -0x10(%rbp),%eax
cmp    -0xc(%rbp),%eax
jg     1251 <main+0x131>
mov    -0x10(%rbp),%eax
sub    $0x3,%eax
cltq
movsbl -0x2720(%rbp,%rax,1),%eax
ff
cmp    $0x53,%eax
jne    1243 <main+0x123>
mov    -0x10(%rbp),%eax
sub    $0x2,%eax
cltq
movsbl -0x2720(%rbp,%rax,1),%eax
ff
cmp    $0x54,%eax
jne    1243 <main+0x123>
mov    -0x10(%rbp),%eax
sub    $0x1,%eax
cltq
movsbl -0x2720(%rbp,%rax,1),%eax
ff
cmp    $0x4f,%eax
jne    1243 <main+0x123>
movslq -0x10(%rbp),%rax
movsbl -0x2720(%rbp,%rax,1),%eax
ff
cmp    $0x50,%eax
jne    1243 <main+0x123>
movl   $0x0,-0x8(%rbp)
mov    -0x8(%rbp),%eax
cmp    -0x10(%rbp),%eax
jge    123e <main+0x11e>
movslq -0x8(%rbp),%rax
movsbl -0x2720(%rbp,%rax,1),%eax
ff
cmp    $0x61,%eax
jl     1218 <main+0xf8>
movslq -0x8(%rbp),%rax
movsbl -0x2720(%rbp,%rax,1),%eax
ff
cmp    $0x7a,%eax
jg     1218 <main+0xf8>
movslq -0x8(%rbp),%rax
movsbl -0x2720(%rbp,%rax,1),%eax
ff
sub    $0x20,%eax
mov    %al,%cl
movslq -0x8(%rbp),%rax
mov    %cl,-0x2720(%rbp,%rax,1)
movslq -0x8(%rbp),%rax
lea    0xddd(%rip),%rdi
movsbl -0x2720(%rbp,%rax,1),%esi
ff
call   1030 <printf@plt>
mov    -0x8(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8(%rbp)
jmp    11c6 <main+0xa6>
jmp    1243 <main+0x123>
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    1153 <main+0x33>
xor    %eax,%eax
add    $0x2720,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %r15
push   %r14
push   %r12
push   %rbx
sub    $0x2718,%rsp
mov    %rsp,%r14
mov    %r14,%rdi
call   1040 <gets@plt>
xor    %r12d,%r12d
lea    0xebd(%rip),%r15
jmp    115d <main+0x3d>
cs nopw 0x0(%rax,%rax,1)
nop
add    $0x1,%r12
cmp    $0x2711,%r12
je     11b7 <main+0x97>
cmpb   $0x53,-0x3(%r12,%r14,1)
jne    1150 <main+0x30>
cmpb   $0x54,-0x2(%r12,%r14,1)
jne    1150 <main+0x30>
cmpb   $0x4f,-0x1(%r12,%r14,1)
jne    1150 <main+0x30>
cmpb   $0x50,(%rsp,%r12,1)
jne    1150 <main+0x30>
test   %r12,%r12
je     1150 <main+0x30>
xor    %ebx,%ebx
jmp    11a4 <main+0x84>
cs nopw 0x0(%rax,%rax,1)
nop
movsbl %al,%esi
mov    %r15,%rdi
call   1030 <printf@plt>
add    $0x1,%rbx
cmp    %rbx,%r12
je     1150 <main+0x30>
movzbl (%rsp,%rbx,1),%eax
lea    -0x61(%rax),%ecx
cmp    $0x19,%cl
ja     1190 <main+0x70>
add    $0xe0,%al
mov    %al,(%rsp,%rbx,1)
jmp    1190 <main+0x70>
xor    %eax,%eax
add    $0x2718,%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
ret

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

LLVM IR (-O2):
@.str = [5 x i8] c"\0A %c\00"
define i32 @main() {
%1 = alloca [10000 x i8]
%2 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 0
%3 = call i32 @gets(i8* %2)
br label %4
4: ; preds = %0, %39
%5 = phi i64 [ 0, %0 ], [ %40, %39 ]
%6 = add nsw i64 %5, -3
%7 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %6
%8 = load i8, i8* %7
%9 = icmp eq i8 %8, 83
br i1 %9, label %10, label %39
10: ; preds = %4
%11 = add nsw i64 %5, -2
%12 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %11
%13 = load i8, i8* %12
%14 = icmp eq i8 %13, 84
br i1 %14, label %15, label %39
15: ; preds = %10
%16 = add nsw i64 %5, -1
%17 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %16
%18 = load i8, i8* %17
%19 = icmp eq i8 %18, 79
br i1 %19, label %20, label %39
20: ; preds = %15
%21 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %5
%22 = load i8, i8* %21
%23 = icmp eq i8 %22, 80
%24 = icmp ne i64 %5, 0
%25 = select i1 %23, i1 %24, i1 false
br i1 %25, label %26, label %39
26: ; preds = %20, %34
%27 = phi i64 [ %37, %34 ], [ 0, %20 ]
%28 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %27
%29 = load i8, i8* %28
%30 = add i8 %29, -97
%31 = icmp ult i8 %30, 26
br i1 %31, label %32, label %34
32: ; preds = %26
%33 = add nsw i8 %29, -32
store i8 %33, i8* %28
br label %34
34: ; preds = %32, %26
%35 = phi i8 [ %33, %32 ], [ %29, %26 ]
%36 = call i32 @printf(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str, i64 0, i64 0), i8 signext %35)
%37 = add nuw nsw i64 %27, 1
%38 = icmp eq i64 %37, %5
br i1 %38, label %39, label %26
39: ; preds = %34, %20, %15, %10, %4
%40 = add nuw nsw i64 %5, 1
%41 = icmp eq i64 %40, 10001
br i1 %41, label %42, label %4
42: ; preds = %39
ret i32 0
}