#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*/ printf(char *);
int /*<<< orphan*/ scanf(char *, char *);
int main(void) {
  int cd;
  char s[16];
  scanf("%s", s);
  for (char *d = s; *d; *(d++) -= '0')
    ;
  cd = s[0] + s[3] + s[5] + s[8] + s[10] + s[12];
  cd *= 3;
  cd += s[2] + s[4] + s[6] + s[9] + s[11];
  cd %= 10;
  if (cd)
    cd = 10 - cd;
  if (cd == s[14])
    printf("Correct UPC\n");
  else
    printf("Incorrect UPC\n");
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
movl   $0x0,-0x4(%rbp)
lea    -0x20(%rbp),%rsi
lea    0xec6(%rip),%rdi
call   1040 <scanf@plt>
lea    -0x20(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
cmpb   $0x0,(%rax)
je     1175 <main+0x55>
jmp    1159 <main+0x39>
mov    -0x28(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x28(%rbp)
movsbl (%rax),%ecx
sub    $0x30,%ecx
mov    %cl,(%rax)
jmp    1147 <main+0x27>
movsbl -0x20(%rbp),%eax
movsbl -0x1d(%rbp),%ecx
add    %ecx,%eax
movsbl -0x1b(%rbp),%ecx
add    %ecx,%eax
movsbl -0x18(%rbp),%ecx
add    %ecx,%eax
movsbl -0x16(%rbp),%ecx
add    %ecx,%eax
movsbl -0x14(%rbp),%ecx
add    %ecx,%eax
mov    %eax,-0x8(%rbp)
imul   $0x3,-0x8(%rbp),%eax
mov    %eax,-0x8(%rbp)
movsbl -0x1e(%rbp),%eax
movsbl -0x1c(%rbp),%ecx
add    %ecx,%eax
movsbl -0x1a(%rbp),%ecx
add    %ecx,%eax
movsbl -0x17(%rbp),%ecx
add    %ecx,%eax
movsbl -0x15(%rbp),%ecx
add    %ecx,%eax
add    -0x8(%rbp),%eax
mov    %eax,-0x8(%rbp)
mov    -0x8(%rbp),%eax
mov    $0xa,%ecx
cltd
idiv   %ecx
mov    %edx,-0x8(%rbp)
cmpl   $0x0,-0x8(%rbp)
je     11e6 <main+0xc6>
mov    $0xa,%eax
sub    -0x8(%rbp),%eax
mov    %eax,-0x8(%rbp)
mov    -0x8(%rbp),%eax
movsbl -0x12(%rbp),%ecx
cmp    %ecx,%eax
jne    1206 <main+0xe6>
lea    0xe07(%rip),%rdi
call   1030 <printf@plt>
jmp    1212 <main+0xf2>
lea    0xe03(%rip),%rdi
call   1030 <printf@plt>
xor    %eax,%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
sub    $0x18,%rsp
lea    0xed5(%rip),%rdi
mov    %rsp,%rsi
call   1040 <scanf@plt>
mov    (%rsp),%cl
xor    %eax,%eax
test   %cl,%cl
je     1167 <main+0x47>
lea    0x1(%rsp),%rdx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
add    $0xd0,%cl
mov    %cl,-0x1(%rdx)
movzbl (%rdx),%ecx
add    $0x1,%rdx
test   %cl,%cl
jne    1150 <main+0x30>
movsbl (%rsp),%ecx
jmp    1169 <main+0x49>
xor    %ecx,%ecx
movsbl 0x3(%rsp),%edx
movswl %cx,%ecx
add    %edx,%ecx
movsbl 0x5(%rsp),%edx
add    %ecx,%edx
movsbl 0x8(%rsp),%ecx
add    %edx,%ecx
movsbl 0xa(%rsp),%edx
add    %ecx,%edx
movsbl 0xc(%rsp),%ecx
add    %edx,%ecx
lea    (%rcx,%rcx,2),%ecx
movsbl 0x2(%rsp),%edx
movsbl 0x4(%rsp),%esi
add    %edx,%esi
add    %ecx,%esi
movsbl 0x6(%rsp),%ecx
add    %esi,%ecx
movsbl 0x9(%rsp),%edx
add    %ecx,%edx
movsbl 0xb(%rsp),%ecx
add    %edx,%ecx
movswl %cx,%edx
imul   $0x6667,%edx,%edx
mov    %edx,%esi
shr    $0x1f,%esi
sar    $0x12,%edx
add    %esi,%edx
add    %edx,%edx
lea    (%rdx,%rdx,4),%edx
sub    %edx,%ecx
mov    $0xa,%edx
sub    %ecx,%edx
test   %cx,%cx
cmove  %eax,%edx
movsbl 0xe(%rsp),%eax
cmp    %ax,%dx
lea    0xe26(%rip),%rax
lea    0xe11(%rip),%rdi
cmove  %rax,%rdi
call   1030 <puts@plt>
xor    %eax,%eax
add    $0x18,%rsp
ret

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

LLVM IR (-O2):
@.str = [3 x i8] c"%s\00"
@str = [14 x i8] c"Incorrect UPC\00"
@str.3 = [12 x i8] c"Correct UPC\00"
define i32 @main() {
%1 = alloca [16 x i8]
%2 = getelementptr inbounds [16 x i8], [16 x i8]* %1, i64 0, i64 0
%3 = call i32 @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i8* %2)
%4 = load i8, i8* %2
%5 = icmp eq i8 %4, 0
br i1 %5, label %9, label %62
6: ; preds = %62
%7 = load i8, i8* %2
%8 = sext i8 %7 to i16
br label %9
9: ; preds = %6, %0
%10 = phi i16 [ %8, %6 ], [ 0, %0 ]
%11 = getelementptr inbounds [16 x i8], [16 x i8]* %1, i64 0, i64 3
%12 = load i8, i8* %11
%13 = sext i8 %12 to i16
%14 = add nsw i16 %10, %13
%15 = getelementptr inbounds [16 x i8], [16 x i8]* %1, i64 0, i64 5
%16 = load i8, i8* %15
%17 = sext i8 %16 to i16
%18 = add nsw i16 %14, %17
%19 = getelementptr inbounds [16 x i8], [16 x i8]* %1, i64 0, i64 8
%20 = load i8, i8* %19
%21 = sext i8 %20 to i16
%22 = add nsw i16 %18, %21
%23 = getelementptr inbounds [16 x i8], [16 x i8]* %1, i64 0, i64 10
%24 = load i8, i8* %23
%25 = sext i8 %24 to i16
%26 = add nsw i16 %22, %25
%27 = getelementptr inbounds [16 x i8], [16 x i8]* %1, i64 0, i64 12
%28 = load i8, i8* %27
%29 = sext i8 %28 to i16
%30 = add nsw i16 %26, %29
%31 = mul nsw i16 %30, 3
%32 = getelementptr inbounds [16 x i8], [16 x i8]* %1, i64 0, i64 2
%33 = load i8, i8* %32
%34 = sext i8 %33 to i16
%35 = getelementptr inbounds [16 x i8], [16 x i8]* %1, i64 0, i64 4
%36 = load i8, i8* %35
%37 = sext i8 %36 to i16
%38 = add nsw i16 %37, %34
%39 = getelementptr inbounds [16 x i8], [16 x i8]* %1, i64 0, i64 6
%40 = load i8, i8* %39
%41 = sext i8 %40 to i16
%42 = getelementptr inbounds [16 x i8], [16 x i8]* %1, i64 0, i64 9
%43 = load i8, i8* %42
%44 = sext i8 %43 to i16
%45 = getelementptr inbounds [16 x i8], [16 x i8]* %1, i64 0, i64 11
%46 = load i8, i8* %45
%47 = sext i8 %46 to i16
%48 = add nsw i16 %38, %31
%49 = add nsw i16 %48, %41
%50 = add nsw i16 %49, %44
%51 = add nsw i16 %50, %47
%52 = srem i16 %51, 10
%53 = icmp eq i16 %52, 0
%54 = sub nsw i16 10, %52
%55 = select i1 %53, i16 0, i16 %54
%56 = getelementptr inbounds [16 x i8], [16 x i8]* %1, i64 0, i64 14
%57 = load i8, i8* %56
%58 = sext i8 %57 to i16
%59 = icmp eq i16 %55, %58
%60 = select i1 %59, i8* getelementptr inbounds ([12 x i8], [12 x i8]* @str.3, i64 0, i64 0), i8* getelementptr inbounds ([14 x i8], [14 x i8]* @str, i64 0, i64 0)
%61 = call i32 @puts(i8* dereferenceable(1) %60)
ret i32 0
62: ; preds = %0, %62
%63 = phi i8 [ %67, %62 ], [ %4, %0 ]
%64 = phi i8* [ %65, %62 ], [ %2, %0 ]
%65 = getelementptr inbounds i8, i8* %64, i64 1
%66 = add i8 %63, -48
store i8 %66, i8* %64
%67 = load i8, i8* %65
%68 = icmp eq i8 %67, 0
br i1 %68, label %6, label %62
}