#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__ charater(char *);
scalar_t__ digit(char *);
scalar_t__ gets(char *);
int /*<<< orphan*/ memset(char *, char, int);
int /*<<< orphan*/ printf(char *, ...);
int strlen(char *);
int main() {
  char a[10000], b[10000];
  int i, n, j, len, dig, e;
  while (gets(a)) {
    len = strlen(a);
    j = 0;
    if (charater(a)) {
      for (i = len - 1; i >= 0; i--) {
        n = a[i];
        while (n > 0) {
          e = n % 10;
          n = n / 10;
          b[j] = e + '0';
          printf("%c", b[j]);
          j++;
        }
      }
    } else if (digit(a)) {
      i = len - 1;
      while (i >= 0) {
        if (a[i] == '0' || a[i] == '1' || a[i] == '2') {
          dig = (a[i] - '0') * 100 + (a[i - 1] - '0') * 10 + a[i - 2] - '0';
          printf("%c", dig);
          i = i - 3;
        } else {
          dig = (a[i] - '0') * 10 + a[i - 1] - '0';
          printf("%c", dig);
          i = i - 2;
        }
      }
    }
    printf("\n");
    memset(a, ' ', 10000);
    memset(b, ' ', 10000);
  }
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x4e50,%rsp
movl   $0x0,-0x4(%rbp)
lea    -0x2720(%rbp),%rdi
call   1070 <gets@plt>
cmp    $0x0,%rax
je     141f <main+0x2bf>
lea    -0x2720(%rbp),%rdi
call   1030 <strlen@plt>
mov    %eax,-0x4e40(%rbp)
movl   $0x0,-0x4e3c(%rbp)
lea    -0x2720(%rbp),%rdi
call   1080 <charater@plt>
cmp    $0x0,%rax
je     1288 <main+0x128>
mov    -0x4e40(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x4e34(%rbp)
cmpl   $0x0,-0x4e34(%rbp)
jl     1283 <main+0x123>
movslq -0x4e34(%rbp),%rax
movsbl -0x2720(%rbp,%rax,1),%eax
ff
mov    %eax,-0x4e38(%rbp)
cmpl   $0x0,-0x4e38(%rbp)
jle    126a <main+0x10a>
mov    -0x4e38(%rbp),%eax
mov    $0xa,%ecx
cltd
idiv   %ecx
mov    %edx,-0x4e48(%rbp)
mov    -0x4e38(%rbp),%eax
mov    $0xa,%ecx
cltd
idiv   %ecx
mov    %eax,-0x4e38(%rbp)
mov    -0x4e48(%rbp),%eax
add    $0x30,%eax
mov    %al,%cl
movslq -0x4e3c(%rbp),%rax
mov    %cl,-0x4e30(%rbp,%rax,1)
movslq -0x4e3c(%rbp),%rax
movsbl -0x4e30(%rbp,%rax,1),%esi
ff
lea    0xdb1(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x4e3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x4e3c(%rbp)
jmp    11eb <main+0x8b>
jmp    126f <main+0x10f>
mov    -0x4e34(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x4e34(%rbp)
jmp    11c9 <main+0x69>
jmp    13e0 <main+0x280>
lea    -0x2720(%rbp),%rdi
call   1050 <digit@plt>
cmp    $0x0,%rax
je     13db <main+0x27b>
mov    -0x4e40(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x4e34(%rbp)
cmpl   $0x0,-0x4e34(%rbp)
jl     13d6 <main+0x276>
movslq -0x4e34(%rbp),%rax
movsbl -0x2720(%rbp,%rax,1),%eax
ff
cmp    $0x30,%eax
je     1302 <main+0x1a2>
movslq -0x4e34(%rbp),%rax
movsbl -0x2720(%rbp,%rax,1),%eax
ff
cmp    $0x31,%eax
je     1302 <main+0x1a2>
movslq -0x4e34(%rbp),%rax
movsbl -0x2720(%rbp,%rax,1),%eax
ff
cmp    $0x32,%eax
jne    137a <main+0x21a>
movslq -0x4e34(%rbp),%rax
movsbl -0x2720(%rbp,%rax,1),%eax
ff
sub    $0x30,%eax
imul   $0x64,%eax,%eax
mov    -0x4e34(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsbl -0x2720(%rbp,%rcx,1),%ecx
ff
sub    $0x30,%ecx
imul   $0xa,%ecx,%ecx
add    %ecx,%eax
mov    -0x4e34(%rbp),%ecx
sub    $0x2,%ecx
movslq %ecx,%rcx
movsbl -0x2720(%rbp,%rcx,1),%ecx
ff
add    %ecx,%eax
sub    $0x30,%eax
mov    %eax,-0x4e44(%rbp)
mov    -0x4e44(%rbp),%esi
lea    0xca1(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x4e34(%rbp),%eax
sub    $0x3,%eax
mov    %eax,-0x4e34(%rbp)
jmp    13d1 <main+0x271>
movslq -0x4e34(%rbp),%rax
movsbl -0x2720(%rbp,%rax,1),%eax
ff
sub    $0x30,%eax
imul   $0xa,%eax,%eax
mov    -0x4e34(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsbl -0x2720(%rbp,%rcx,1),%ecx
ff
add    %ecx,%eax
sub    $0x30,%eax
mov    %eax,-0x4e44(%rbp)
mov    -0x4e44(%rbp),%esi
lea    0xc45(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x4e34(%rbp),%eax
sub    $0x2,%eax
mov    %eax,-0x4e34(%rbp)
jmp    12ad <main+0x14d>
jmp    13db <main+0x27b>
jmp    13e0 <main+0x280>
lea    0xc1c(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
lea    -0x2720(%rbp),%rdi
mov    $0x20,%esi
mov    $0x2710,%edx
call   1060 <memset@plt>
lea    -0x4e30(%rbp),%rdi
mov    $0x20,%esi
mov    $0x2710,%edx
call   1060 <memset@plt>
jmp    1172 <main+0x12>
xor    %eax,%eax
add    $0x4e50,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x4e38,%rsp
lea    0x10(%rsp),%r14
mov    %r14,%rdi
call   1070 <gets@plt>
test   %rax,%rax
je     12f8 <main+0x198>
mov    $0xcccccccd,%ebx
jmp    11d9 <main+0x79>
xchg   %ax,%ax
mov    $0xa,%edi
call   1030 <putchar@plt>
lea    0x10(%rsp),%r14
mov    %r14,%rdi
mov    $0x20,%esi
mov    $0x2710,%edx
call   1060 <memset@plt>
lea    0x2720(%rsp),%rdi
mov    $0x20,%esi
mov    $0x2710,%edx
call   1060 <memset@plt>
mov    %r14,%rdi
call   1070 <gets@plt>
test   %rax,%rax
je     12f8 <main+0x198>
mov    %r14,%rdi
call   1040 <strlen@plt>
mov    %eax,%ebp
mov    %r14,%rdi
call   1080 <charater@plt>
test   %rax,%rax
je     1270 <main+0x110>
test   %ebp,%ebp
jle    1190 <main+0x30>
mov    %ebp,%r13d
xor    %ebp,%ebp
jmp    120b <main+0xab>
nop
cmp    $0x2,%r13
mov    0x8(%rsp),%r13
jl     1190 <main+0x30>
lea    -0x1(%r13),%rcx
mov    %ecx,%eax
movzbl 0x10(%rsp,%rax,1),%r14d
test   %r14b,%r14b
mov    %rcx,0x8(%rsp)
jle    1200 <main+0xa0>
movslq %ebp,%rax
lea    (%rsp,%rax,1),%r15
add    $0x2720,%r15
nop
mov    %r14d,%r12d
imul   %rbx,%r12
shr    $0x23,%r12
lea    (%r12,%r12,1),%eax
lea    (%rax,%rax,4),%eax
mov    %r14d,%ecx
sub    %eax,%ecx
or     $0x30,%cl
mov    %cl,(%r15)
movzbl %cl,%edi
call   1030 <putchar@plt>
add    $0x1,%r15
add    $0x1,%ebp
cmp    $0xa,%r14d
mov    %r12d,%r14d
jae    1230 <main+0xd0>
jmp    1200 <main+0xa0>
nopw   0x0(%rax,%rax,1)
mov    %r14,%rdi
call   1050 <digit@plt>
test   %rax,%rax
je     1190 <main+0x30>
test   %ebp,%ebp
jle    1190 <main+0x30>
add    $0xffffffff,%ebp
jmp    12bd <main+0x15d>
xchg   %ax,%ax
lea    (%rax,%rax,4),%eax
movslq %ebp,%rcx
lea    0x10(%rsp),%rdx
movsbl -0x1(%rcx,%rdx,1),%ecx
lea    (%rcx,%rax,2),%edi
add    $0xfffffdf0,%edi
mov    $0xfffffffe,%r14d
call   1030 <putchar@plt>
add    %r14d,%ebp
js     1190 <main+0x30>
mov    %ebp,%eax
movsbl 0x10(%rsp,%rax,1),%eax
lea    -0x30(%rax),%ecx
cmp    $0x2,%cl
ja     1290 <main+0x130>
imul   $0x64,%eax,%eax
movslq %ebp,%rcx
lea    0x10(%rsp),%rsi
movsbl -0x1(%rcx,%rsi,1),%edx
lea    (%rdx,%rdx,4),%edx
movsbl -0x2(%rcx,%rsi,1),%ecx
lea    (%rax,%rdx,2),%eax
lea    (%rcx,%rax,1),%edi
add    $0xffffeb30,%edi
mov    $0xfffffffd,%r14d
jmp    12af <main+0x14f>
xor    %eax,%eax
add    $0x4e38,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [3 x i8] c"%c\00"
@.str.1 = [2 x i8] c"\0A\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca [10000 x i8]
%3 = alloca [10000 x i8]
%4 = alloca i32
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
store i32 0, i32* %1
br label %10
10: ; preds = %142, %0
%11 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 0
%12 = call i64 @gets(i8* %11)
%13 = icmp ne i64 %12, 0
br i1 %13, label %14, label %148
14: ; preds = %10
%15 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 0
%16 = call i32 @strlen(i8* %15)
store i32 %16, i32* %7
store i32 0, i32* %6
%17 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 0
%18 = call i64 @charater(i8* %17)
%19 = icmp ne i64 %18, 0
br i1 %19, label %20, label %59
20: ; preds = %14
%21 = load i32, i32* %7
%22 = sub nsw i32 %21, 1
store i32 %22, i32* %4
br label %23
23: ; preds = %55, %20
%24 = load i32, i32* %4
%25 = icmp sge i32 %24, 0
br i1 %25, label %26, label %58
26: ; preds = %23
%27 = load i32, i32* %4
%28 = sext i32 %27 to i64
%29 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 %28
%30 = load i8, i8* %29
%31 = sext i8 %30 to i32
store i32 %31, i32* %5
br label %32
32: ; preds = %35, %26
%33 = load i32, i32* %5
%34 = icmp sgt i32 %33, 0
br i1 %34, label %35, label %54
35: ; preds = %32
%36 = load i32, i32* %5
%37 = srem i32 %36, 10
store i32 %37, i32* %9
%38 = load i32, i32* %5
%39 = sdiv i32 %38, 10
store i32 %39, i32* %5
%40 = load i32, i32* %9
%41 = add nsw i32 %40, 48
%42 = trunc i32 %41 to i8
%43 = load i32, i32* %6
%44 = sext i32 %43 to i64
%45 = getelementptr inbounds [10000 x i8], [10000 x i8]* %3, i64 0, i64 %44
store i8 %42, i8* %45
%46 = load i32, i32* %6
%47 = sext i32 %46 to i64
%48 = getelementptr inbounds [10000 x i8], [10000 x i8]* %3, i64 0, i64 %47
%49 = load i8, i8* %48
%50 = sext i8 %49 to i32
%51 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32 %50)
%52 = load i32, i32* %6
%53 = add nsw i32 %52, 1
store i32 %53, i32* %6
br label %32
54: ; preds = %32
br label %55
55: ; preds = %54
%56 = load i32, i32* %4
%57 = add nsw i32 %56, -1
store i32 %57, i32* %4
br label %23
58: ; preds = %23
br label %142
59: ; preds = %14
%60 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 0
%61 = call i64 @digit(i8* %60)
%62 = icmp ne i64 %61, 0
br i1 %62, label %63, label %141
63: ; preds = %59
%64 = load i32, i32* %7
%65 = sub nsw i32 %64, 1
store i32 %65, i32* %4
br label %66
66: ; preds = %139, %63
%67 = load i32, i32* %4
%68 = icmp sge i32 %67, 0
br i1 %68, label %69, label %140
69: ; preds = %66
%70 = load i32, i32* %4
%71 = sext i32 %70 to i64
%72 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 %71
%73 = load i8, i8* %72
%74 = sext i8 %73 to i32
%75 = icmp eq i32 %74, 48
br i1 %75, label %90, label %76
76: ; preds = %69
%77 = load i32, i32* %4
%78 = sext i32 %77 to i64
%79 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 %78
%80 = load i8, i8* %79
%81 = sext i8 %80 to i32
%82 = icmp eq i32 %81, 49
br i1 %82, label %90, label %83
83: ; preds = %76
%84 = load i32, i32* %4
%85 = sext i32 %84 to i64
%86 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 %85
%87 = load i8, i8* %86
%88 = sext i8 %87 to i32
%89 = icmp eq i32 %88, 50
br i1 %89, label %90, label %119
90: ; preds = %83, %76, %69
%91 = load i32, i32* %4
%92 = sext i32 %91 to i64
%93 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 %92
%94 = load i8, i8* %93
%95 = sext i8 %94 to i32
%96 = sub nsw i32 %95, 48
%97 = mul nsw i32 %96, 100
%98 = load i32, i32* %4
%99 = sub nsw i32 %98, 1
%100 = sext i32 %99 to i64
%101 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 %100
%102 = load i8, i8* %101
%103 = sext i8 %102 to i32
%104 = sub nsw i32 %103, 48
%105 = mul nsw i32 %104, 10
%106 = add nsw i32 %97, %105
%107 = load i32, i32* %4
%108 = sub nsw i32 %107, 2
%109 = sext i32 %108 to i64
%110 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 %109
%111 = load i8, i8* %110
%112 = sext i8 %111 to i32
%113 = add nsw i32 %106, %112
%114 = sub nsw i32 %113, 48
store i32 %114, i32* %8
%115 = load i32, i32* %8
%116 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32 %115)
%117 = load i32, i32* %4
%118 = sub nsw i32 %117, 3
store i32 %118, i32* %4
br label %139
119: ; preds = %83
%120 = load i32, i32* %4
%121 = sext i32 %120 to i64
%122 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 %121
%123 = load i8, i8* %122
%124 = sext i8 %123 to i32
%125 = sub nsw i32 %124, 48
%126 = mul nsw i32 %125, 10
%127 = load i32, i32* %4
%128 = sub nsw i32 %127, 1
%129 = sext i32 %128 to i64
%130 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 %129
%131 = load i8, i8* %130
%132 = sext i8 %131 to i32
%133 = add nsw i32 %126, %132
%134 = sub nsw i32 %133, 48
store i32 %134, i32* %8
%135 = load i32, i32* %8
%136 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32 %135)
%137 = load i32, i32* %4
%138 = sub nsw i32 %137, 2
store i32 %138, i32* %4
br label %139
139: ; preds = %119, %90
br label %66
140: ; preds = %66
br label %141
141: ; preds = %140, %59
br label %142
142: ; preds = %141, %58
%143 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0))
%144 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 0
%145 = call i32 @memset(i8* %144, i8 signext 32, i32 10000)
%146 = getelementptr inbounds [10000 x i8], [10000 x i8]* %3, i64 0, i64 0
%147 = call i32 @memset(i8* %146, i8 signext 32, i32 10000)
br label %10
148: ; preds = %10
ret i32 0
}

LLVM IR (-O2):
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 i64 @gets(i8* %3)
%6 = icmp eq i64 %5, 0
br i1 %6, label %95, label %7
7: ; preds = %0, %89
%8 = call i32 @strlen(i8* %3)
%9 = call i64 @charater(i8* %3)
%10 = icmp eq i64 %9, 0
br i1 %10, label %43, label %11
11: ; preds = %7
%12 = icmp sgt i32 %8, 0
br i1 %12, label %13, label %89
13: ; preds = %11
%14 = zext i32 %8 to i64
br label %20
15: ; preds = %31
%16 = trunc i64 %41 to i32
br label %17
17: ; preds = %15, %20
%18 = phi i32 [ %22, %20 ], [ %16, %15 ]
%19 = icmp sgt i64 %21, 1
br i1 %19, label %20, label %89
20: ; preds = %13, %17
%21 = phi i64 [ %14, %13 ], [ %23, %17 ]
%22 = phi i32 [ 0, %13 ], [ %18, %17 ]
%23 = add nsw i64 %21, -1
%24 = and i64 %23, 4294967295
%25 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %24
%26 = load i8, i8* %25
%27 = icmp sgt i8 %26, 0
br i1 %27, label %28, label %17
28: ; preds = %20
%29 = zext i8 %26 to i32
%30 = sext i32 %22 to i64
br label %31
31: ; preds = %28, %31
%32 = phi i64 [ %30, %28 ], [ %41, %31 ]
%33 = phi i32 [ %29, %28 ], [ %35, %31 ]
%34 = urem i32 %33, 10
%35 = udiv i32 %33, 10
%36 = trunc i32 %34 to i8
%37 = or i8 %36, 48
%38 = getelementptr inbounds [10000 x i8], [10000 x i8]* %2, i64 0, i64 %32
store i8 %37, i8* %38
%39 = zext i8 %37 to i32
%40 = call i32 @putchar(i32 %39)
%41 = add i64 %32, 1
%42 = icmp ult i32 %33, 10
br i1 %42, label %15, label %31
43: ; preds = %7
%44 = call i64 @digit(i8* %3)
%45 = icmp ne i64 %44, 0
%46 = icmp sgt i32 %8, 0
%47 = select i1 %45, i1 %46, i1 false
br i1 %47, label %48, label %89
48: ; preds = %43
%49 = add nsw i32 %8, -1
br label %50
50: ; preds = %48, %83
%51 = phi i32 [ %87, %83 ], [ %49, %48 ]
%52 = zext i32 %51 to i64
%53 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %52
%54 = load i8, i8* %53
%55 = sext i8 %54 to i32
%56 = add i8 %54, -48
%57 = icmp ult i8 %56, 3
br i1 %57, label %58, label %74
58: ; preds = %50
%59 = mul nsw i32 %55, 100
%60 = add nsw i32 %51, -1
%61 = sext i32 %60 to i64
%62 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %61
%63 = load i8, i8* %62
%64 = sext i8 %63 to i32
%65 = mul nsw i32 %64, 10
%66 = add nsw i32 %51, -2
%67 = sext i32 %66 to i64
%68 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %67
%69 = load i8, i8* %68
%70 = sext i8 %69 to i32
%71 = add nsw i32 %59, -5328
%72 = add nsw i32 %71, %65
%73 = add nsw i32 %72, %70
br label %83
74: ; preds = %50
%75 = mul nsw i32 %55, 10
%76 = add nsw i32 %51, -1
%77 = sext i32 %76 to i64
%78 = getelementptr inbounds [10000 x i8], [10000 x i8]* %1, i64 0, i64 %77
%79 = load i8, i8* %78
%80 = sext i8 %79 to i32
%81 = add nsw i32 %75, -528
%82 = add nsw i32 %81, %80
br label %83
83: ; preds = %74, %58
%84 = phi i32 [ %82, %74 ], [ %73, %58 ]
%85 = phi i32 [ -2, %74 ], [ -3, %58 ]
%86 = call i32 @putchar(i32 %84)
%87 = add nsw i32 %51, %85
%88 = icmp sgt i32 %87, -1
br i1 %88, label %50, label %89
89: ; preds = %17, %83, %11, %43
%90 = call i32 @putchar(i32 10)
%91 = call i32 @memset(i8* %3, i8 signext 32, i32 10000)
%92 = call i32 @memset(i8* %4, i8 signext 32, i32 10000)
%93 = call i64 @gets(i8* %3)
%94 = icmp eq i64 %93, 0
br i1 %94, label %95, label %7
95: ; preds = %89, %0
ret i32 0
}