#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 */
scalar_t__ ispalindrome(char *);
int lengthtobeadd(char *, int);
int /*<<< orphan*/ printf(char *, ...);
int scanf(char *, char *);
int /*<<< orphan*/ strcat(char *, char *);
int strlen(char *);
int main() {
  int i, j, k, l, m, len;
  char a[10000], b[10000];
  while (scanf("%s", a) == 1) {
    l = 0;
    len = strlen(a);
    if (ispalindrome(a)) {
      printf("%s\n", a);
    } else {
      for (i = len - 1; i >= 0; i--) {
        if (a[i] == a[i - 1]) {
          l++;
        } else
          break;
      }
      printf("%d\n", l);
      m = len - l;
      j = lengthtobeadd(a, m);
      printf("%d\n", j);
      k = 0;
      m = len - 2 * j - 1;
      for (i = m; i >= 0; i--) {
        b[k] = a[i];
        k++;
      }
      b[k] = '\0';
      a[i] = '\0';
      strcat(a, b);
      printf("%s\n", a);
    }
  }
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x4e40,%rsp
movl   $0x0,-0x4(%rbp)
lea    -0x2730(%rbp),%rsi
lea    0xe80(%rip),%rdi
call   1070 <scanf@plt>
cmp    $0x1,%eax
jne    1309 <main+0x1a9>
movl   $0x0,-0x14(%rbp)
lea    -0x2730(%rbp),%rdi
call   1030 <strlen@plt>
mov    %eax,-0x1c(%rbp)
lea    -0x2730(%rbp),%rdi
call   1060 <ispalindrome@plt>
cmp    $0x0,%rax
je     11d4 <main+0x74>
lea    -0x2730(%rbp),%rsi
lea    0xe3b(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
jmp    1304 <main+0x1a4>
mov    -0x1c(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x8(%rbp)
cmpl   $0x0,-0x8(%rbp)
jl     1232 <main+0xd2>
movslq -0x8(%rbp),%rax
movsbl -0x2730(%rbp,%rax,1),%eax
ff
mov    -0x8(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsbl -0x2730(%rbp,%rcx,1),%ecx
ff
cmp    %ecx,%eax
jne    121a <main+0xba>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    121f <main+0xbf>
jmp    1232 <main+0xd2>
jmp    1224 <main+0xc4>
mov    -0x8(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x8(%rbp)
jmp    11dd <main+0x7d>
mov    -0x14(%rbp),%esi
lea    0xdcb(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x1c(%rbp),%eax
sub    -0x14(%rbp),%eax
mov    %eax,-0x18(%rbp)
lea    -0x2730(%rbp),%rdi
mov    -0x18(%rbp),%esi
call   1050 <lengthtobeadd@plt>
mov    %eax,-0xc(%rbp)
mov    -0xc(%rbp),%esi
lea    0xd9f(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
movl   $0x0,-0x10(%rbp)
mov    -0x1c(%rbp),%eax
mov    -0xc(%rbp),%ecx
shl    $0x1,%ecx
sub    %ecx,%eax
sub    $0x1,%eax
mov    %eax,-0x18(%rbp)
mov    -0x18(%rbp),%eax
mov    %eax,-0x8(%rbp)
cmpl   $0x0,-0x8(%rbp)
jl     12c4 <main+0x164>
movslq -0x8(%rbp),%rax
mov    -0x2730(%rbp,%rax,1),%cl
movslq -0x10(%rbp),%rax
mov    %cl,-0x4e40(%rbp,%rax,1)
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
mov    -0x8(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x8(%rbp)
jmp    128d <main+0x12d>
movslq -0x10(%rbp),%rax
movb   $0x0,-0x4e40(%rbp,%rax,1)
movslq -0x8(%rbp),%rax
movb   $0x0,-0x2730(%rbp,%rax,1)
lea    -0x2730(%rbp),%rdi
lea    -0x4e40(%rbp),%rsi
call   1080 <strcat@plt>
lea    -0x2730(%rbp),%rsi
lea    0xd06(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
jmp    1172 <main+0x12>
xor    %eax,%eax
add    $0x4e40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x4e28,%rsp
lea    0xe78(%rip),%rdi
mov    %rsp,%rsi
call   1080 <scanf@plt>
cmp    $0x1,%eax
jne    13f1 <main+0x281>
mov    %rsp,%r13
lea    0xe60(%rip),%r14
lea    0xe56(%rip),%r12
jmp    11ec <main+0x7c>
xor    %r9d,%r9d
mov    %r9d,%ecx
movb   $0x0,0x2710(%rsp,%rcx,1)
cltq
movb   $0x0,(%rsp,%rax,1)
mov    %r13,%rdi
lea    0x2710(%rsp),%rsi
call   1090 <strcat@plt>
mov    %r13,%rdi
call   1030 <puts@plt>
mov    %r12,%rdi
mov    %r13,%rsi
call   1080 <scanf@plt>
cmp    $0x1,%eax
jne    13f1 <main+0x281>
mov    %r13,%rdi
call   1040 <strlen@plt>
mov    %eax,%ebx
mov    %r13,%rdi
call   1070 <ispalindrome@plt>
test   %rax,%rax
jne    11d0 <main+0x60>
mov    $0x0,%ebp
test   %ebx,%ebx
jle    1235 <main+0xc5>
mov    %ebx,%eax
lea    -0x1(%rsp),%rcx
add    %rcx,%rax
xor    %ebp,%ebp
nopl   0x0(%rax,%rax,1)
movzbl (%rax),%ecx
cmp    -0x1(%rax),%cl
jne    1235 <main+0xc5>
add    $0x1,%ebp
add    $0xffffffffffffffff,%rax
cmp    %ebp,%ebx
jne    1220 <main+0xb0>
mov    %ebx,%ebp
mov    %r14,%rdi
mov    %ebp,%esi
xor    %eax,%eax
call   1050 <printf@plt>
mov    %ebx,%esi
sub    %ebp,%esi
mov    %r13,%rdi
call   1060 <lengthtobeadd@plt>
mov    %eax,%r15d
mov    %r14,%rdi
mov    %eax,%esi
xor    %eax,%eax
call   1050 <printf@plt>
add    %r15d,%r15d
mov    %ebx,%r9d
sub    %r15d,%r9d
mov    %r15d,%eax
neg    %eax
add    %ebx,%eax
add    $0xffffffff,%eax
test   %r9d,%r9d
jle    11ac <main+0x3c>
mov    %eax,%r8d
mov    %r9d,%ecx
cmp    $0x8,%r9d
jae    128b <main+0x11b>
xor    %esi,%esi
jmp    13c1 <main+0x251>
cmp    $0x20,%r9d
pxor   %xmm3,%xmm3
jae    129c <main+0x12c>
xor    %esi,%esi
jmp    1351 <main+0x1e1>
mov    %ecx,%esi
and    $0xffffffe0,%esi
mov    %rsi,%rdi
neg    %rdi
lea    -0xf(%rsp),%rax
lea    (%rax,%r8,1),%rdx
xor    %eax,%eax
lea    0x2720(%rsp),%rbp
nopw   0x0(%rax,%rax,1)
movdqu -0x10(%rdx,%rax,1),%xmm0
movdqu (%rdx,%rax,1),%xmm1
movdqa %xmm1,%xmm2
punpcklbw %xmm3,%xmm2
pshufd $0x4e,%xmm2,%xmm2
pshuflw $0x1b,%xmm2,%xmm2
pshufhw $0x1b,%xmm2,%xmm2
punpckhbw %xmm3,%xmm1
pshufd $0x4e,%xmm1,%xmm1
pshuflw $0x1b,%xmm1,%xmm1
pshufhw $0x1b,%xmm1,%xmm1
packuswb %xmm2,%xmm1
movdqa %xmm0,%xmm2
punpcklbw %xmm3,%xmm2
pshufd $0x4e,%xmm2,%xmm2
pshuflw $0x1b,%xmm2,%xmm2
pshufhw $0x1b,%xmm2,%xmm2
punpckhbw %xmm3,%xmm0
pshufd $0x4e,%xmm0,%xmm0
pshuflw $0x1b,%xmm0,%xmm0
pshufhw $0x1b,%xmm0,%xmm0
packuswb %xmm2,%xmm0
movdqa %xmm1,-0x10(%rbp)
movdqa %xmm0,0x0(%rbp)
add    $0x20,%rbp
add    $0xffffffffffffffe0,%rax
cmp    %rax,%rdi
jne    12c0 <main+0x150>
mov    $0xffffffff,%eax
cmp    %rcx,%rsi
je     11af <main+0x3f>
test   $0x18,%cl
je     13be <main+0x24e>
mov    %rsi,%rdx
sub    %r15d,%ebx
mov    %ebx,%esi
and    $0xfffffff8,%esi
lea    (%rsp,%rdx,1),%rax
add    $0x2710,%rax
mov    %ecx,%edi
and    $0xfffffff8,%edi
neg    %rdi
neg    %rdx
lea    -0x7(%rsp),%rbp
add    %r8,%rbp
sub    %rsi,%r8
nopl   0x0(%rax)
movq   0x0(%rbp,%rdx,1),%xmm0
punpcklbw %xmm3,%xmm0
pshufd $0x4e,%xmm0,%xmm0
pshuflw $0x1b,%xmm0,%xmm0
pshufhw $0x1b,%xmm0,%xmm0
packuswb %xmm0,%xmm0
movq   %xmm0,(%rax)
add    $0x8,%rax
add    $0xfffffffffffffff8,%rdx
cmp    %rdx,%rdi
jne    1380 <main+0x210>
mov    $0xffffffff,%eax
cmp    %rbx,%rsi
je     11af <main+0x3f>
jmp    13c1 <main+0x251>
sub    %rsi,%r8
lea    (%rsp,%r8,1),%rax
cs nopw 0x0(%rax,%rax,1)
nop
movzbl (%rax),%edx
mov    %dl,0x2710(%rsp,%rsi,1)
add    $0x1,%rsi
add    $0xffffffffffffffff,%rax
cmp    %rsi,%rcx
jne    13d0 <main+0x260>
mov    $0xffffffff,%eax
jmp    11af <main+0x3f>
xor    %eax,%eax
add    $0x4e28,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
@.str = [3 x i8] c"%s\00"
@.str.2 = [4 x i8] c"%d\0A\00"
define i32 @main() {
%1 = alloca [10000 x i8]
%2 = alloca [10000 x i8]
%3 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 0
%4 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 0
%5 = call i32 @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i8* %3)
%6 = icmp eq i32 %5, 1
br i1 %6, label %7, label %115
7: ; preds = %0, %111
%8 = call i32 @strlen(i8* %3)
%9 = call i64 @ispalindrome(i8* %3)
%10 = icmp eq i64 %9, 0
br i1 %10, label %11, label %111
11: ; preds = %7
%12 = icmp sgt i32 %8, 0
br i1 %12, label %13, label %28
13: ; preds = %11
%14 = zext i32 %8 to i64
br label %15
15: ; preds = %13, %25
%16 = phi i64 [ %14, %13 ], [ %18, %25 ]
%17 = phi i32 [ 0, %13 ], [ %26, %25 ]
%18 = add nsw i64 %16, -1
%19 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %18
%20 = load i8, i8* %19
%21 = add nsw i64 %16, -2
%22 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %21
%23 = load i8, i8* %22
%24 = icmp eq i8 %20, %23
br i1 %24, label %25, label %28
25: ; preds = %15
%26 = add nuw nsw i32 %17, 1
%27 = icmp eq i32 %26, %8
br i1 %27, label %28, label %15
28: ; preds = %25, %15, %11
%29 = phi i32 [ 0, %11 ], [ %17, %15 ], [ %8, %25 ]
%30 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.2, i64 0, i64 0), i32 %29)
%31 = sub nsw i32 %8, %29
%32 = call i32 @lengthtobeadd(i8* %3, i32 %31)
%33 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @.str.2, i64 0, i64 0), i32 %32)
%34 = mul i32 %32, -2
%35 = add i32 %34, %8
%36 = add i32 %35, -1
%37 = icmp sgt i32 %35, 0
br i1 %37, label %38, label %103
38: ; preds = %28
%39 = zext i32 %36 to i64
%40 = zext i32 %35 to i64
%41 = icmp ult i32 %35, 8
br i1 %41, label %91, label %42
42: ; preds = %38
%43 = icmp ult i32 %35, 32
br i1 %43, label %70, label %44
44: ; preds = %42
%45 = and i64 %40, 4294967264
br label %46
46: ; preds = %46, %44
%47 = phi i64 [ 0, %44 ], [ %62, %46 ]
%48 = sub i64 %39, %47
%49 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %48
%50 = getelementptr inbounds i8, i8* %49, i64 -15
%51 = bitcast i8* %50 to <16 x i8>*
%52 = load <16 x i8>, <16 x i8>* %51
%53 = shufflevector <16 x i8> %52, <16 x i8> poison, <16 x i32> <i32 15, i32 14, i32 13, i32 12, i32 11, i32 10, i32 9, i32 8, i32 7, i32 6, i32 5, i32 4, i32 3, i32 2, i32 1, i32 0>
%54 = getelementptr inbounds i8, i8* %49, i64 -31
%55 = bitcast i8* %54 to <16 x i8>*
%56 = load <16 x i8>, <16 x i8>* %55
%57 = shufflevector <16 x i8> %56, <16 x i8> poison, <16 x i32> <i32 15, i32 14, i32 13, i32 12, i32 11, i32 10, i32 9, i32 8, i32 7, i32 6, i32 5, i32 4, i32 3, i32 2, i32 1, i32 0>
%58 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 %47
%59 = bitcast i8* %58 to <16 x i8>*
store <16 x i8> %53, <16 x i8>* %59
%60 = getelementptr inbounds i8, i8* %58, i64 16
%61 = bitcast i8* %60 to <16 x i8>*
store <16 x i8> %57, <16 x i8>* %61
%62 = add nuw i64 %47, 32
%63 = icmp eq i64 %62, %45
br i1 %63, label %64, label %46
64: ; preds = %46
%65 = icmp eq i64 %45, %40
br i1 %65, label %103, label %66
66: ; preds = %64
%67 = sub nsw i64 %39, %45
%68 = and i64 %40, 24
%69 = icmp eq i64 %68, 0
br i1 %69, label %91, label %70
70: ; preds = %42, %66
%71 = phi i64 [ %45, %66 ], [ 0, %42 ]
%72 = mul i32 %32, -2
%73 = add i32 %72, %8
%74 = zext i32 %73 to i64
%75 = and i64 %74, 4294967288
%76 = sub nsw i64 %39, %75
br label %77
77: ; preds = %77, %70
%78 = phi i64 [ %71, %70 ], [ %87, %77 ]
%79 = sub i64 %39, %78
%80 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %79
%81 = getelementptr inbounds i8, i8* %80, i64 -7
%82 = bitcast i8* %81 to <8 x i8>*
%83 = load <8 x i8>, <8 x i8>* %82
%84 = shufflevector <8 x i8> %83, <8 x i8> poison, <8 x i32> <i32 7, i32 6, i32 5, i32 4, i32 3, i32 2, i32 1, i32 0>
%85 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 %78
%86 = bitcast i8* %85 to <8 x i8>*
store <8 x i8> %84, <8 x i8>* %86
%87 = add nuw i64 %78, 8
%88 = icmp eq i64 %87, %75
br i1 %88, label %89, label %77
89: ; preds = %77
%90 = icmp eq i64 %75, %74
br i1 %90, label %103, label %91
91: ; preds = %38, %66, %89
%92 = phi i64 [ 0, %38 ], [ %45, %66 ], [ %75, %89 ]
%93 = phi i64 [ %39, %38 ], [ %67, %66 ], [ %76, %89 ]
br label %94
94: ; preds = %91, %94
%95 = phi i64 [ %100, %94 ], [ %92, %91 ]
%96 = phi i64 [ %101, %94 ], [ %93, %91 ]
%97 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %96
%98 = load i8, i8* %97
%99 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 %95
store i8 %98, i8* %99
%100 = add nuw nsw i64 %95, 1
%101 = add nsw i64 %96, -1
%102 = icmp eq i64 %100, %40
br i1 %102, label %103, label %94
103: ; preds = %94, %64, %89, %28
%104 = phi i32 [ 0, %28 ], [ %35, %89 ], [ %35, %64 ], [ %35, %94 ]
%105 = phi i32 [ %36, %28 ], [ -1, %89 ], [ -1, %64 ], [ -1, %94 ]
%106 = zext i32 %104 to i64
%107 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 %106
store i8 0, i8* %107
%108 = sext i32 %105 to i64
%109 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %108
store i8 0, i8* %109
%110 = call i32 @strcat(i8* %3, i8* %4)
br label %111
111: ; preds = %7, %103
%112 = call i32 @puts(i8* %3)
%113 = call i32 @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i8* %3)
%114 = icmp eq i32 %113, 1
br i1 %114, label %7, label %115
115: ; preds = %111, %0
ret i32 0
}