#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*/ fgets(char *, int, int /*<<< orphan*/);
int /*<<< orphan*/ printf(char *, char);
int /*<<< orphan*/ stdin;
int strlen(char *);
int main() {
  char c[10000];
  int a, m = 0, l = 0, k = 0;
  fgets(c, 100, stdin);
  a = strlen(c);
  while (m <= a) {
    if (c[m - 3] == 's' && c[m - 2] == 't' && c[m - 1] == 'o' && c[m] == 'p') {
      for (l = 0; l < m - 4; l++) {
        if (c[l] <= 'z' && c[l] >= 'a') {
          c[l] = c[l] - 32;
        }
        printf("%c", c[l]);
      }
    }
    m++;
  }
  for (k = l; k < a; k++) {
    printf("%c", c[k]);
  }
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x2730,%rsp
movl   $0x0,-0x4(%rbp)
movl   $0x0,-0x2728(%rbp)
movl   $0x0,-0x272c(%rbp)
movl   $0x0,-0x2730(%rbp)
lea    -0x2720(%rbp),%rdi
mov    0x2e7a(%rip),%rax
mov    (%rax),%edx
mov    $0x64,%esi
call   1050 <fgets@plt>
lea    -0x2720(%rbp),%rdi
call   1030 <strlen@plt>
mov    %eax,-0x2724(%rbp)
mov    -0x2728(%rbp),%eax
cmp    -0x2724(%rbp),%eax
jg     12c5 <main+0x195>
mov    -0x2728(%rbp),%eax
sub    $0x3,%eax
cltq
movsbl -0x2720(%rbp,%rax,1),%eax
ff
cmp    $0x73,%eax
jne    12b1 <main+0x181>
mov    -0x2728(%rbp),%eax
sub    $0x2,%eax
cltq
movsbl -0x2720(%rbp,%rax,1),%eax
ff
cmp    $0x74,%eax
jne    12b1 <main+0x181>
mov    -0x2728(%rbp),%eax
sub    $0x1,%eax
cltq
movsbl -0x2720(%rbp,%rax,1),%eax
ff
cmp    $0x6f,%eax
jne    12b1 <main+0x181>
movslq -0x2728(%rbp),%rax
movsbl -0x2720(%rbp,%rax,1),%eax
cmp    $0x70,%eax
jne    12b1 <main+0x181>
movl   $0x0,-0x272c(%rbp)
mov    -0x272c(%rbp),%eax
mov    -0x2728(%rbp),%ecx
sub    $0x4,%ecx
cmp    %ecx,%eax
jge    12ac <main+0x17c>
movslq -0x272c(%rbp),%rax
movsbl -0x2720(%rbp,%rax,1),%eax
ff
cmp    $0x7a,%eax
jg     127d <main+0x14d>
movslq -0x272c(%rbp),%rax
movsbl -0x2720(%rbp,%rax,1),%eax
ff
cmp    $0x61,%eax
jl     127d <main+0x14d>
movslq -0x272c(%rbp),%rax
movsbl -0x2720(%rbp,%rax,1),%eax
ff
sub    $0x20,%eax
mov    %al,%cl
movslq -0x272c(%rbp),%rax
mov    %cl,-0x2720(%rbp,%rax,1)
movslq -0x272c(%rbp),%rax
lea    0xd75(%rip),%rdi
movsbl -0x2720(%rbp,%rax,1),%esi
ff
call   1040 <printf@plt>
mov    -0x272c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x272c(%rbp)
jmp    1214 <main+0xe4>
jmp    12b1 <main+0x181>
mov    -0x2728(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2728(%rbp)
jmp    118c <main+0x5c>
mov    -0x272c(%rbp),%eax
mov    %eax,-0x2730(%rbp)
mov    -0x2730(%rbp),%eax
cmp    -0x2724(%rbp),%eax
jge    1312 <main+0x1e2>
movslq -0x2730(%rbp),%rax
lea    0xd0f(%rip),%rdi
movsbl -0x2720(%rbp,%rax,1),%esi
ff
call   1040 <printf@plt>
mov    -0x2730(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2730(%rbp)
jmp    12d1 <main+0x1a1>
xor    %eax,%eax
add    $0x2730,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x2728,%rsp
mov    0x2ea0(%rip),%rax
mov    (%rax),%edx
lea    0x10(%rsp),%r12
mov    %r12,%rdi
mov    $0x64,%esi
call   1050 <fgets@plt>
mov    %r12,%rdi
call   1030 <strlen@plt>
mov    %eax,%r15d
test   %eax,%eax
js     11ff <main+0xcf>
lea    0x1(%r15),%r13d
xor    %ebx,%ebx
mov    $0xfffffffc,%ebp
xor    %eax,%eax
jmp    119c <main+0x6c>
mov    %ebp,%eax
mov    0x8(%rsp),%r15
cs nopw 0x0(%rax,%rax,1)
nop
add    $0x1,%rbx
add    $0x1,%ebp
cmp    %r13,%rbx
je     1201 <main+0xd1>
cmpb   $0x73,-0x3(%rbx,%r12,1)
jne    1190 <main+0x60>
cmpb   $0x74,-0x2(%rbx,%r12,1)
jne    1190 <main+0x60>
cmpb   $0x6f,-0x1(%rbx,%r12,1)
jne    1190 <main+0x60>
cmpb   $0x70,0x10(%rsp,%rbx,1)
jne    1190 <main+0x60>
xor    %eax,%eax
cmp    $0x5,%rbx
jb     1190 <main+0x60>
mov    %r15,0x8(%rsp)
mov    %ebp,%r15d
xor    %r14d,%r14d
jmp    11e8 <main+0xb8>
movsbl %al,%esi
lea    0xe26(%rip),%rdi
call   1040 <printf@plt>
add    $0x1,%r14
cmp    %r14,%r15
je     117e <main+0x4e>
movzbl 0x10(%rsp,%r14,1),%eax
lea    -0x61(%rax),%ecx
cmp    $0x19,%cl
ja     11d0 <main+0xa0>
add    $0xe0,%al
mov    %al,0x10(%rsp,%r14,1)
jmp    11d0 <main+0xa0>
xor    %eax,%eax
cmp    %r15d,%eax
jge    1236 <main+0x106>
movslq %eax,%rcx
lea    (%rsp,%rcx,1),%rbp
add    $0x10,%rbp
sub    %eax,%r15d
xor    %ebx,%ebx
lea    0xde3(%rip),%r14
nopl   (%rax)
movsbl 0x0(%rbp,%rbx,1),%esi
mov    %r14,%rdi
call   1040 <printf@plt>
add    $0x1,%rbx
cmp    %ebx,%r15d
jne    1220 <main+0xf0>
xor    %eax,%eax
add    $0x2728,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
@stdin = global i32 0
@.str = [3 x i8] c"%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 = load i32, i32* @stdin
%4 = call i32 @fgets(i8* %2, i32 100, i32 %3)
%5 = call i32 @strlen(i8* %2)
%6 = icmp slt i32 %5, 0
br i1 %6, label %10, label %7
7: ; preds = %0
%8 = add nuw i32 %5, 1
%9 = zext i32 %8 to i64
br label %15
10: ; preds = %54, %0
%11 = phi i32 [ 0, %0 ], [ %55, %54 ]
%12 = icmp slt i32 %11, %5
br i1 %12, label %13, label %67
13: ; preds = %10
%14 = sext i32 %11 to i64
br label %59
15: ; preds = %7, %54
%16 = phi i64 [ 0, %7 ], [ %56, %54 ]
%17 = phi i32 [ -4, %7 ], [ %57, %54 ]
%18 = phi i32 [ 0, %7 ], [ %55, %54 ]
%19 = add nsw i64 %16, -3
%20 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %19
%21 = load i8, i8* %20
%22 = icmp eq i8 %21, 115
br i1 %22, label %23, label %54
23: ; preds = %15
%24 = add nsw i64 %16, -2
%25 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %24
%26 = load i8, i8* %25
%27 = icmp eq i8 %26, 116
br i1 %27, label %28, label %54
28: ; preds = %23
%29 = add nsw i64 %16, -1
%30 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %29
%31 = load i8, i8* %30
%32 = icmp eq i8 %31, 111
br i1 %32, label %33, label %54
33: ; preds = %28
%34 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %16
%35 = load i8, i8* %34
%36 = icmp eq i8 %35, 112
br i1 %36, label %37, label %54
37: ; preds = %33
%38 = icmp ugt i64 %16, 4
br i1 %38, label %39, label %54
39: ; preds = %37
%40 = zext i32 %17 to i64
br label %41
41: ; preds = %39, %49
%42 = phi i64 [ 0, %39 ], [ %52, %49 ]
%43 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %42
%44 = load i8, i8* %43
%45 = add i8 %44, -97
%46 = icmp ult i8 %45, 26
br i1 %46, label %47, label %49
47: ; preds = %41
%48 = add nsw i8 %44, -32
store i8 %48, i8* %43
br label %49
49: ; preds = %47, %41
%50 = phi i8 [ %48, %47 ], [ %44, %41 ]
%51 = call i32 @printf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i8 signext %50)
%52 = add nuw nsw i64 %42, 1
%53 = icmp eq i64 %52, %40
br i1 %53, label %54, label %41
54: ; preds = %49, %37, %33, %28, %23, %15
%55 = phi i32 [ %18, %33 ], [ %18, %28 ], [ %18, %23 ], [ %18, %15 ], [ 0, %37 ], [ %17, %49 ]
%56 = add nuw nsw i64 %16, 1
%57 = add nsw i32 %17, 1
%58 = icmp eq i64 %56, %9
br i1 %58, label %10, label %15
59: ; preds = %13, %59
%60 = phi i64 [ %14, %13 ], [ %64, %59 ]
%61 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %60
%62 = load i8, i8* %61
%63 = call i32 @printf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i8 signext %62)
%64 = add nsw i64 %60, 1
%65 = trunc i64 %64 to i32
%66 = icmp eq i32 %5, %65
br i1 %66, label %67, label %59
67: ; preds = %59, %10
ret i32 0
}