#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 */
double exp(double);
double ran3(long *);
void mcmove(int spin[], int nbr1[], int nbr2[]) {
  int i;
  int flag;
  int ipick;
  long int idum;
  double prob;
  prob = exp(-4.0 / 2.0);
  flag = 0;
  for (i = 0; i < 1000; i++) {
    ipick = 1000 * ran3(&idum);
    if ((spin[ipick] == spin[nbr1[ipick]]) &&
        (spin[nbr1[ipick]] == spin[nbr2[ipick]]) && (ran3(&idum) > prob)) {
      flag = 0;
    } else
      flag = 1;
    spin[ipick] = (1 - 2 * flag) * spin[ipick];
  }
}


x86 assembly (clang, -O0):
<mcmove>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
movsd  0xec4(%rip),%xmm0
call   1030 <exp@plt>
movsd  %xmm0,-0x38(%rbp)
movl   $0x0,-0x20(%rbp)
movl   $0x0,-0x1c(%rbp)
cmpl   $0x3e8,-0x1c(%rbp)
jge    1229 <mcmove+0x109>
lea    -0x30(%rbp),%rdi
call   1040 <ran3@plt>
movaps %xmm0,%xmm1
movsd  0xe93(%rip),%xmm0
mulsd  %xmm1,%xmm0
cvttsd2si %xmm0,%eax
mov    %eax,-0x24(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x24(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    -0x8(%rbp),%rcx
mov    -0x10(%rbp),%rdx
movslq -0x24(%rbp),%rsi
movslq (%rdx,%rsi,4),%rdx
cmp    (%rcx,%rdx,4),%eax
jne    11f0 <mcmove+0xd0>
mov    -0x8(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq -0x24(%rbp),%rdx
movslq (%rcx,%rdx,4),%rcx
mov    (%rax,%rcx,4),%eax
mov    -0x8(%rbp),%rcx
mov    -0x18(%rbp),%rdx
movslq -0x24(%rbp),%rsi
movslq (%rdx,%rsi,4),%rdx
cmp    (%rcx,%rdx,4),%eax
jne    11f0 <mcmove+0xd0>
lea    -0x30(%rbp),%rdi
call   1040 <ran3@plt>
ucomisd -0x38(%rbp),%xmm0
jbe    11f0 <mcmove+0xd0>
movl   $0x0,-0x20(%rbp)
jmp    11f7 <mcmove+0xd7>
movl   $0x1,-0x20(%rbp)
mov    -0x20(%rbp),%eax
shl    $0x1,%eax
mov    $0x1,%edx
sub    %eax,%edx
mov    -0x8(%rbp),%rax
movslq -0x24(%rbp),%rcx
imul   (%rax,%rcx,4),%edx
mov    -0x8(%rbp),%rax
movslq -0x24(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1154 <mcmove+0x34>
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<mcmove>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %rdx,%r14
mov    %rsi,%r15
mov    %rdi,%r13
mov    $0x3e8,%ebp
mov    %rsp,%r12
jmp    1145 <mcmove+0x35>
xchg   %ax,%ax
mov    $0xffffffff,%eax
imul   0x0(%r13,%rbx,4),%eax
mov    %eax,0x0(%r13,%rbx,4)
add    $0xffffffff,%ebp
je     1190 <mcmove+0x80>
mov    %r12,%rdi
call   1030 <ran3@plt>
mulsd  0xeab(%rip),%xmm0
cvttsd2si %xmm0,%eax
movslq %eax,%rbx
mov    0x0(%r13,%rbx,4),%eax
movslq (%r15,%rbx,4),%rcx
cmp    0x0(%r13,%rcx,4),%eax
jne    1130 <mcmove+0x20>
movslq (%r14,%rbx,4),%rcx
cmp    0x0(%r13,%rcx,4),%eax
jne    1130 <mcmove+0x20>
mov    %r12,%rdi
call   1030 <ran3@plt>
mov    $0x1,%eax
ucomisd 0xe7c(%rip),%xmm0
jbe    1130 <mcmove+0x20>
jmp    1135 <mcmove+0x25>
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @mcmove(i32* %0, i32* %1, i32* %2) {
%4 = alloca i32*
%5 = alloca i32*
%6 = alloca i32*
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
%10 = alloca i64
%11 = alloca double
store i32* %0, i32** %4
store i32* %1, i32** %5
store i32* %2, i32** %6
%12 = call double @exp(double -2.000000e+00)
store double %12, double* %11
store i32 0, i32* %8
store i32 0, i32* %7
br label %13
13: ; preds = %75, %3
%14 = load i32, i32* %7
%15 = icmp slt i32 %14, 1000
br i1 %15, label %16, label %78
16: ; preds = %13
%17 = call double @ran3(i64* %10)
%18 = fmul double 1.000000e+03, %17
%19 = fptosi double %18 to i32
store i32 %19, i32* %9
%20 = load i32*, i32** %4
%21 = load i32, i32* %9
%22 = sext i32 %21 to i64
%23 = getelementptr inbounds i32, i32* %20, i64 %22
%24 = load i32, i32* %23
%25 = load i32*, i32** %4
%26 = load i32*, i32** %5
%27 = load i32, i32* %9
%28 = sext i32 %27 to i64
%29 = getelementptr inbounds i32, i32* %26, i64 %28
%30 = load i32, i32* %29
%31 = sext i32 %30 to i64
%32 = getelementptr inbounds i32, i32* %25, i64 %31
%33 = load i32, i32* %32
%34 = icmp eq i32 %24, %33
br i1 %34, label %35, label %60
35: ; preds = %16
%36 = load i32*, i32** %4
%37 = load i32*, i32** %5
%38 = load i32, i32* %9
%39 = sext i32 %38 to i64
%40 = getelementptr inbounds i32, i32* %37, i64 %39
%41 = load i32, i32* %40
%42 = sext i32 %41 to i64
%43 = getelementptr inbounds i32, i32* %36, i64 %42
%44 = load i32, i32* %43
%45 = load i32*, i32** %4
%46 = load i32*, i32** %6
%47 = load i32, i32* %9
%48 = sext i32 %47 to i64
%49 = getelementptr inbounds i32, i32* %46, i64 %48
%50 = load i32, i32* %49
%51 = sext i32 %50 to i64
%52 = getelementptr inbounds i32, i32* %45, i64 %51
%53 = load i32, i32* %52
%54 = icmp eq i32 %44, %53
br i1 %54, label %55, label %60
55: ; preds = %35
%56 = call double @ran3(i64* %10)
%57 = load double, double* %11
%58 = fcmp ogt double %56, %57
br i1 %58, label %59, label %60
59: ; preds = %55
store i32 0, i32* %8
br label %61
60: ; preds = %55, %35, %16
store i32 1, i32* %8
br label %61
61: ; preds = %60, %59
%62 = load i32, i32* %8
%63 = mul nsw i32 2, %62
%64 = sub nsw i32 1, %63
%65 = load i32*, i32** %4
%66 = load i32, i32* %9
%67 = sext i32 %66 to i64
%68 = getelementptr inbounds i32, i32* %65, i64 %67
%69 = load i32, i32* %68
%70 = mul nsw i32 %64, %69
%71 = load i32*, i32** %4
%72 = load i32, i32* %9
%73 = sext i32 %72 to i64
%74 = getelementptr inbounds i32, i32* %71, i64 %73
store i32 %70, i32* %74
br label %75
75: ; preds = %61
%76 = load i32, i32* %7
%77 = add nsw i32 %76, 1
store i32 %77, i32* %7
br label %13
78: ; preds = %13
ret void
}

LLVM IR (-O2):
define void @mcmove(i32* nocapture %0, i32* nocapture %1, i32* nocapture %2) {
%4 = alloca i64
%5 = bitcast i64* %4 to i8*
br label %6
6: ; preds = %3, %31
%7 = phi i32 [ 0, %3 ], [ %35, %31 ]
%8 = call double @ran3(i64* %4)
%9 = fmul double %8, 1.000000e+03
%10 = fptosi double %9 to i32
%11 = sext i32 %10 to i64
%12 = getelementptr inbounds i32, i32* %0, i64 %11
%13 = load i32, i32* %12
%14 = getelementptr inbounds i32, i32* %1, i64 %11
%15 = load i32, i32* %14
%16 = sext i32 %15 to i64
%17 = getelementptr inbounds i32, i32* %0, i64 %16
%18 = load i32, i32* %17
%19 = icmp eq i32 %13, %18
br i1 %19, label %20, label %30
20: ; preds = %6
%21 = getelementptr inbounds i32, i32* %2, i64 %11
%22 = load i32, i32* %21
%23 = sext i32 %22 to i64
%24 = getelementptr inbounds i32, i32* %0, i64 %23
%25 = load i32, i32* %24
%26 = icmp eq i32 %13, %25
br i1 %26, label %27, label %30
27: ; preds = %20
%28 = call double @ran3(i64* %4)
%29 = fcmp ogt double %28, 0x3FC152AAA3BF81CC
br i1 %29, label %31, label %30
30: ; preds = %27, %20, %6
br label %31
31: ; preds = %27, %30
%32 = phi i32 [ -1, %30 ], [ 1, %27 ]
%33 = load i32, i32* %12
%34 = mul nsw i32 %33, %32
store i32 %34, i32* %12
%35 = add nuw nsw i32 %7, 1
%36 = icmp eq i32 %35, 1000
br i1 %36, label %37, label %6
37: ; preds = %31
ret void
}