int isbn13(int *parsed) {
  int sum = 0, i;
  for (i = 0; i < 12; i++) {
    if (i % 2 == 0)
      sum = sum + parsed[i];
    else {
      sum = sum + parsed[i] * 3;
    }
  }
  if ((10 - sum % 10) == parsed[12]) {
    return 1;
  }
  return 0;
}


x86 assembly (clang, -O0):
<isbn13>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
movl   $0x0,-0x14(%rbp)
movl   $0x0,-0x18(%rbp)
cmpl   $0xc,-0x18(%rbp)
jge    1171 <isbn13+0x71>
mov    -0x18(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
cmp    $0x0,%edx
jne    114a <isbn13+0x4a>
mov    -0x14(%rbp),%eax
mov    -0x10(%rbp),%rcx
movslq -0x18(%rbp),%rdx
add    (%rcx,%rdx,4),%eax
mov    %eax,-0x14(%rbp)
jmp    115e <isbn13+0x5e>
mov    -0x14(%rbp),%eax
mov    -0x10(%rbp),%rcx
movslq -0x18(%rbp),%rdx
imul   $0x3,(%rcx,%rdx,4),%ecx
add    %ecx,%eax
mov    %eax,-0x14(%rbp)
jmp    1163 <isbn13+0x63>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    1116 <isbn13+0x16>
mov    -0x14(%rbp),%eax
mov    $0xa,%ecx
cltd
idiv   %ecx
mov    $0xa,%eax
sub    %edx,%eax
mov    -0x10(%rbp),%rcx
cmp    0x30(%rcx),%eax
jne    119c <isbn13+0x9c>
movl   $0x1,-0x4(%rbp)
jmp    11a3 <isbn13+0xa3>
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<isbn13>:
mov    0x4(%rdi),%eax
mov    0xc(%rdi),%ecx
lea    (%rax,%rax,2),%eax
lea    (%rcx,%rcx,2),%ecx
mov    0x14(%rdi),%edx
lea    (%rdx,%rdx,2),%edx
mov    0x1c(%rdi),%esi
lea    (%rsi,%rsi,2),%r8d
mov    0x24(%rdi),%esi
lea    (%rsi,%rsi,2),%r9d
add    (%rdi),%eax
add    0x8(%rdi),%eax
mov    0x2c(%rdi),%esi
add    %ecx,%eax
add    0x10(%rdi),%eax
lea    (%rsi,%rsi,2),%ecx
add    %edx,%eax
add    0x18(%rdi),%eax
add    %r8d,%eax
add    0x20(%rdi),%eax
add    %r9d,%eax
add    0x28(%rdi),%eax
add    %ecx,%eax
cltq
imul   $0x66666667,%rax,%rcx
mov    %rcx,%rdx
shr    $0x3f,%rdx
sar    $0x22,%rcx
add    %edx,%ecx
add    %ecx,%ecx
lea    (%rcx,%rcx,4),%ecx
sub    %eax,%ecx
add    $0xa,%ecx
xor    %eax,%eax
cmp    0x30(%rdi),%ecx
sete   %al
ret

LLVM IR (-O0):
define i32 @isbn13(i32* %0) {
%2 = alloca i32
%3 = alloca i32*
%4 = alloca i32
%5 = alloca i32
store i32* %0, i32** %3
store i32 0, i32* %4
store i32 0, i32* %5
br label %6
6: ; preds = %31, %1
%7 = load i32, i32* %5
%8 = icmp slt i32 %7, 12
br i1 %8, label %9, label %34
9: ; preds = %6
%10 = load i32, i32* %5
%11 = srem i32 %10, 2
%12 = icmp eq i32 %11, 0
br i1 %12, label %13, label %21
13: ; preds = %9
%14 = load i32, i32* %4
%15 = load i32*, i32** %3
%16 = load i32, i32* %5
%17 = sext i32 %16 to i64
%18 = getelementptr inbounds i32, i32* %15, i64 %17
%19 = load i32, i32* %18
%20 = add nsw i32 %14, %19
store i32 %20, i32* %4
br label %30
21: ; preds = %9
%22 = load i32, i32* %4
%23 = load i32*, i32** %3
%24 = load i32, i32* %5
%25 = sext i32 %24 to i64
%26 = getelementptr inbounds i32, i32* %23, i64 %25
%27 = load i32, i32* %26
%28 = mul nsw i32 %27, 3
%29 = add nsw i32 %22, %28
store i32 %29, i32* %4
br label %30
30: ; preds = %21, %13
br label %31
31: ; preds = %30
%32 = load i32, i32* %5
%33 = add nsw i32 %32, 1
store i32 %33, i32* %5
br label %6
34: ; preds = %6
%35 = load i32, i32* %4
%36 = srem i32 %35, 10
%37 = sub nsw i32 10, %36
%38 = load i32*, i32** %3
%39 = getelementptr inbounds i32, i32* %38, i64 12
%40 = load i32, i32* %39
%41 = icmp eq i32 %37, %40
br i1 %41, label %42, label %43
42: ; preds = %34
store i32 1, i32* %2
br label %44
43: ; preds = %34
store i32 0, i32* %2
br label %44
44: ; preds = %43, %42
%45 = load i32, i32* %2
ret i32 %45
}

LLVM IR (-O2):
define i32 @isbn13(i32* nocapture %0) {
%2 = load i32, i32* %0
%3 = getelementptr inbounds i32, i32* %0, i64 1
%4 = load i32, i32* %3
%5 = mul nsw i32 %4, 3
%6 = getelementptr inbounds i32, i32* %0, i64 2
%7 = load i32, i32* %6
%8 = getelementptr inbounds i32, i32* %0, i64 3
%9 = load i32, i32* %8
%10 = mul nsw i32 %9, 3
%11 = getelementptr inbounds i32, i32* %0, i64 4
%12 = load i32, i32* %11
%13 = getelementptr inbounds i32, i32* %0, i64 5
%14 = load i32, i32* %13
%15 = mul nsw i32 %14, 3
%16 = getelementptr inbounds i32, i32* %0, i64 6
%17 = load i32, i32* %16
%18 = getelementptr inbounds i32, i32* %0, i64 7
%19 = load i32, i32* %18
%20 = mul nsw i32 %19, 3
%21 = getelementptr inbounds i32, i32* %0, i64 8
%22 = load i32, i32* %21
%23 = getelementptr inbounds i32, i32* %0, i64 9
%24 = load i32, i32* %23
%25 = mul nsw i32 %24, 3
%26 = getelementptr inbounds i32, i32* %0, i64 10
%27 = load i32, i32* %26
%28 = getelementptr inbounds i32, i32* %0, i64 11
%29 = load i32, i32* %28
%30 = mul nsw i32 %29, 3
%31 = add nsw i32 %5, %2
%32 = add nsw i32 %7, %31
%33 = add nsw i32 %10, %32
%34 = add nsw i32 %12, %33
%35 = add nsw i32 %15, %34
%36 = add nsw i32 %17, %35
%37 = add nsw i32 %20, %36
%38 = add nsw i32 %22, %37
%39 = add nsw i32 %25, %38
%40 = add nsw i32 %27, %39
%41 = add nsw i32 %30, %40
%42 = srem i32 %41, 10
%43 = sub nsw i32 10, %42
%44 = getelementptr inbounds i32, i32* %0, i64 12
%45 = load i32, i32* %44
%46 = icmp eq i32 %43, %45
%47 = zext i1 %46 to i32
ret i32 %47
}