#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 */
long d(long);
int /*<<< orphan*/ printf(char *, long, ...);
int main(void) {
  long int tot = 0L;
  int i;
  for (i = 2; i < 10000; i++) {
    long int p = d(i);
    if (p == i || p < i)
      continue;
    long int q = d(p);
    if (i == q) {
      printf("%4d %4lu\n", i, p);
      tot += i + p;
    }
  }
  printf("%ld\n", tot);
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
movl   $0x0,-0x4(%rbp)
movq   $0x0,-0x10(%rbp)
movl   $0x2,-0x14(%rbp)
cmpl   $0x2710,-0x14(%rbp)
jge    11d3 <main+0xb3>
movslq -0x14(%rbp),%rdi
call   1030 <d@plt>
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
movslq -0x14(%rbp),%rcx
cmp    %rcx,%rax
je     117a <main+0x5a>
mov    -0x20(%rbp),%rax
movslq -0x14(%rbp),%rcx
cmp    %rcx,%rax
jge    117f <main+0x5f>
jmp    11c5 <main+0xa5>
mov    -0x20(%rbp),%rdi
call   1030 <d@plt>
mov    %rax,-0x28(%rbp)
movslq -0x14(%rbp),%rax
cmp    -0x28(%rbp),%rax
jne    11c0 <main+0xa0>
movslq -0x14(%rbp),%rsi
mov    -0x20(%rbp),%rdx
lea    0xe57(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
movslq -0x14(%rbp),%rax
add    -0x20(%rbp),%rax
add    -0x10(%rbp),%rax
mov    %rax,-0x10(%rbp)
jmp    11c5 <main+0xa5>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    113e <main+0x1e>
mov    -0x10(%rbp),%rsi
lea    0xe2c(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
xor    %eax,%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %r15
push   %r14
push   %r12
push   %rbx
push   %rax
mov    $0x2,%ebx
lea    0xecc(%rip),%r15
xor    %r14d,%r14d
jmp    114d <main+0x2d>
nopl   0x0(%rax)
add    $0x1,%rbx
cmp    $0x2710,%rbx
je     1185 <main+0x65>
mov    %rbx,%rdi
call   1030 <d@plt>
cmp    %rbx,%rax
jle    1140 <main+0x20>
mov    %rax,%r12
mov    %rax,%rdi
call   1030 <d@plt>
cmp    %rax,%rbx
jne    1140 <main+0x20>
mov    %r15,%rdi
mov    %rbx,%rsi
mov    %r12,%rdx
xor    %eax,%eax
call   1040 <printf@plt>
add    %r14,%r12
add    %rbx,%r12
mov    %r12,%r14
jmp    1140 <main+0x20>
lea    0xe7e(%rip),%rdi
mov    %r14,%rsi
xor    %eax,%eax
call   1040 <printf@plt>
xor    %eax,%eax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
@.str = [10 x i8] c"%4d %4lu\0A\00"
@.str.1 = [5 x i8] c"%ld\0A\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca i64
%3 = alloca i32
%4 = alloca i64
%5 = alloca i64
store i32 0, i32* %1
store i64 0, i64* %2
store i32 2, i32* %3
br label %6
6: ; preds = %42, %0
%7 = load i32, i32* %3
%8 = icmp slt i32 %7, 10000
br i1 %8, label %9, label %45
9: ; preds = %6
%10 = load i32, i32* %3
%11 = sext i32 %10 to i64
%12 = call i64 @d(i64 %11)
store i64 %12, i64* %4
%13 = load i64, i64* %4
%14 = load i32, i32* %3
%15 = sext i32 %14 to i64
%16 = icmp eq i64 %13, %15
br i1 %16, label %22, label %17
17: ; preds = %9
%18 = load i64, i64* %4
%19 = load i32, i32* %3
%20 = sext i32 %19 to i64
%21 = icmp slt i64 %18, %20
br i1 %21, label %22, label %23
22: ; preds = %17, %9
br label %42
23: ; preds = %17
%24 = load i64, i64* %4
%25 = call i64 @d(i64 %24)
store i64 %25, i64* %5
%26 = load i32, i32* %3
%27 = sext i32 %26 to i64
%28 = load i64, i64* %5
%29 = icmp eq i64 %27, %28
br i1 %29, label %30, label %41
30: ; preds = %23
%31 = load i32, i32* %3
%32 = sext i32 %31 to i64
%33 = load i64, i64* %4
%34 = call i32 (i8*, i64, ...) @printf(i8* getelementptr inbounds ([10 x i8], [10 x i8]* @.str, i64 0, i64 0), i64 %32, i64 %33)
%35 = load i32, i32* %3
%36 = sext i32 %35 to i64
%37 = load i64, i64* %4
%38 = add nsw i64 %36, %37
%39 = load i64, i64* %2
%40 = add nsw i64 %39, %38
store i64 %40, i64* %2
br label %41
41: ; preds = %30, %23
br label %42
42: ; preds = %41, %22
%43 = load i32, i32* %3
%44 = add nsw i32 %43, 1
store i32 %44, i32* %3
br label %6
45: ; preds = %6
%46 = load i64, i64* %2
%47 = call i32 (i8*, i64, ...) @printf(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.1, i64 0, i64 0), i64 %46)
ret i32 0
}

LLVM IR (-O2):
@.str = [10 x i8] c"%4d %4lu\0A\00"
@.str.1 = [5 x i8] c"%ld\0A\00"
define i32 @main() {
br label %1
1: ; preds = %0, %13
%2 = phi i64 [ 2, %0 ], [ %15, %13 ]
%3 = phi i64 [ 0, %0 ], [ %14, %13 ]
%4 = tail call i64 @d(i64 %2)
%5 = icmp sgt i64 %4, %2
br i1 %5, label %6, label %13
6: ; preds = %1
%7 = tail call i64 @d(i64 %4)
%8 = icmp eq i64 %7, %2
br i1 %8, label %9, label %13
9: ; preds = %6
%10 = tail call i32 (i8*, i64, ...) @printf(i8* getelementptr inbounds ([10 x i8], [10 x i8]* @.str, i64 0, i64 0), i64 %2, i64 %4)
%11 = add i64 %3, %2
%12 = add i64 %11, %4
br label %13
13: ; preds = %6, %9, %1
%14 = phi i64 [ %3, %1 ], [ %12, %9 ], [ %3, %6 ]
%15 = add nuw nsw i64 %2, 1
%16 = icmp eq i64 %15, 10000
br i1 %16, label %17, label %1
17: ; preds = %13
%18 = tail call i32 (i8*, i64, ...) @printf(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.1, i64 0, i64 0), i64 %14)
ret i32 0
}