#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 */
float abs(int);
double exp(double);
double ran3(long *);
void mcmove(int height[], int nbr1[], int nbr2[]) {
  int i;
  int ixpick;
  int h_old, h_new, h_left, h_right;
  float E_old, E_new, dE;
  double prob;
  int zero_one, plus_minus, flag;
  long int idum;
  for (i = 1; i <= 100; i++) {
    ixpick = 100 * ran3(&idum);
    zero_one = 2 * ran3(&idum);
    plus_minus = 2 * zero_one - 1;
    h_old = height[ixpick];
    h_new = height[ixpick] + plus_minus;
    h_left = height[nbr1[ixpick]];
    h_right = height[nbr2[ixpick]];
    E_old = abs(h_left - h_old) + abs(h_old - h_right);
    E_new = abs(h_left - h_new) + abs(h_new - h_right);
    dE = E_new - E_old, prob = exp(-1.0 * dE / 1.0);
    flag = 1;
    if ((dE > 0) && (ran3(&idum) > prob))
      flag = 0;
    height[ixpick] = h_old - flag * (h_old - h_new);
  }
}


x86 assembly (clang, -O0):
<mcmove>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
movl   $0x1,-0x1c(%rbp)
cmpl   $0x64,-0x1c(%rbp)
jg     12d9 <mcmove+0x1a9>
lea    -0x60(%rbp),%rdi
call   1050 <ran3@plt>
movaps %xmm0,%xmm1
movsd  0xeaf(%rip),%xmm0
mulsd  %xmm1,%xmm0
cvttsd2si %xmm0,%eax
mov    %eax,-0x20(%rbp)
lea    -0x60(%rbp),%rdi
call   1050 <ran3@plt>
movaps %xmm0,%xmm1
movsd  0xe88(%rip),%xmm0
mulsd  %xmm1,%xmm0
cvttsd2si %xmm0,%eax
mov    %eax,-0x4c(%rbp)
mov    -0x4c(%rbp),%eax
shl    $0x1,%eax
sub    $0x1,%eax
mov    %eax,-0x50(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x24(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
add    -0x50(%rbp),%eax
mov    %eax,-0x28(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq -0x20(%rbp),%rdx
movslq (%rcx,%rdx,4),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x2c(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x18(%rbp),%rcx
movslq -0x20(%rbp),%rdx
movslq (%rcx,%rdx,4),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x30(%rbp)
mov    -0x2c(%rbp),%edi
sub    -0x24(%rbp),%edi
call   1030 <abs@plt>
movss  %xmm0,-0x68(%rbp)
mov    -0x24(%rbp),%edi
sub    -0x30(%rbp),%edi
call   1030 <abs@plt>
movaps %xmm0,%xmm1
movss  -0x68(%rbp),%xmm0
addss  %xmm1,%xmm0
movss  %xmm0,-0x34(%rbp)
mov    -0x2c(%rbp),%edi
sub    -0x28(%rbp),%edi
call   1030 <abs@plt>
movss  %xmm0,-0x64(%rbp)
mov    -0x28(%rbp),%edi
sub    -0x30(%rbp),%edi
call   1030 <abs@plt>
movaps %xmm0,%xmm1
movss  -0x64(%rbp),%xmm0
addss  %xmm1,%xmm0
movss  %xmm0,-0x38(%rbp)
movss  -0x38(%rbp),%xmm0
subss  -0x34(%rbp),%xmm0
movss  %xmm0,-0x3c(%rbp)
movss  -0x3c(%rbp),%xmm0
cvtss2sd %xmm0,%xmm1
movsd  0xda6(%rip),%xmm0
mulsd  %xmm1,%xmm0
movsd  0xd92(%rip),%xmm1
divsd  %xmm1,%xmm0
call   1040 <exp@plt>
movsd  %xmm0,-0x48(%rbp)
movl   $0x1,-0x54(%rbp)
movss  -0x3c(%rbp),%xmm0
xorps  %xmm1,%xmm1
ucomiss %xmm1,%xmm0
jbe    12af <mcmove+0x17f>
lea    -0x60(%rbp),%rdi
call   1050 <ran3@plt>
ucomisd -0x48(%rbp),%xmm0
jbe    12af <mcmove+0x17f>
movl   $0x0,-0x54(%rbp)
mov    -0x24(%rbp),%edx
mov    -0x54(%rbp),%eax
mov    -0x24(%rbp),%ecx
sub    -0x28(%rbp),%ecx
imul   %ecx,%eax
sub    %eax,%edx
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    114b <mcmove+0x1b>
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<mcmove>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x38,%rsp
mov    %rdx,0x30(%rsp)
mov    %rsi,0x28(%rsp)
mov    %rdi,%r13
mov    $0x64,%r14d
lea    0x20(%rsp),%rbp
mov    %rdi,0x10(%rsp)
jmp    1189 <mcmove+0x59>
nopl   (%rax)
mov    0x10(%rsp),%r13
lea    0x20(%rsp),%rbp
mov    0x18(%rsp),%rax
add    %eax,%eax
add    $0xffffffff,%eax
imul   %ebx,%eax
add    %r12d,%eax
mov    %eax,0x0(%r13,%r15,4)
add    $0xffffffff,%r14d
je     127d <mcmove+0x14d>
mov    %rbp,%rdi
call   1050 <ran3@plt>
mulsd  0xe67(%rip),%xmm0
cvttsd2si %xmm0,%ebx
mov    %rbp,%rdi
call   1050 <ran3@plt>
addsd  %xmm0,%xmm0
cvttsd2si %xmm0,%eax
movslq %ebx,%r15
mov    0x0(%r13,%r15,4),%r12d
mov    %rax,0x18(%rsp)
lea    -0x1(%r12,%rax,2),%ebp
mov    0x28(%rsp),%rax
movslq (%rax,%r15,4),%rax
mov    0x0(%r13,%rax,4),%ebx
mov    0x30(%rsp),%rax
movslq (%rax,%r15,4),%rax
mov    0x0(%r13,%rax,4),%r13d
mov    %ebx,%edi
sub    %r12d,%edi
call   1030 <abs@plt>
movss  %xmm0,(%rsp)
mov    %r12d,%edi
sub    %r13d,%edi
call   1030 <abs@plt>
addss  (%rsp),%xmm0
movss  %xmm0,(%rsp)
sub    %ebp,%ebx
mov    %ebx,%edi
call   1030 <abs@plt>
movss  %xmm0,0xc(%rsp)
sub    %r13d,%ebp
mov    %ebp,%edi
call   1030 <abs@plt>
addss  0xc(%rsp),%xmm0
subss  (%rsp),%xmm0
movss  %xmm0,(%rsp)
cvtss2sd %xmm0,%xmm0
xorps  0xddd(%rip),%xmm0
call   1040 <exp@plt>
mov    $0x1,%ebx
movss  (%rsp),%xmm1
ucomiss 0xdd7(%rip),%xmm1
jbe    1160 <mcmove+0x30>
lea    0x20(%rsp),%rbp
mov    %rbp,%rdi
movsd  %xmm0,(%rsp)
call   1050 <ran3@plt>
ucomisd (%rsp),%xmm0
mov    0x10(%rsp),%r13
mov    0x18(%rsp),%rax
jbe    116f <mcmove+0x3f>
xor    %ebx,%ebx
jmp    116f <mcmove+0x3f>
add    $0x38,%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 i32
%11 = alloca i32
%12 = alloca i32
%13 = alloca float
%14 = alloca float
%15 = alloca float
%16 = alloca double
%17 = alloca i32
%18 = alloca i32
%19 = alloca i32
%20 = alloca i64
store i32* %0, i32** %4
store i32* %1, i32** %5
store i32* %2, i32** %6
store i32 1, i32* %7
br label %21
21: ; preds = %109, %3
%22 = load i32, i32* %7
%23 = icmp sle i32 %22, 100
br i1 %23, label %24, label %112
24: ; preds = %21
%25 = call double @ran3(i64* %20)
%26 = fmul double 1.000000e+02, %25
%27 = fptosi double %26 to i32
store i32 %27, i32* %8
%28 = call double @ran3(i64* %20)
%29 = fmul double 2.000000e+00, %28
%30 = fptosi double %29 to i32
store i32 %30, i32* %17
%31 = load i32, i32* %17
%32 = mul nsw i32 2, %31
%33 = sub nsw i32 %32, 1
store i32 %33, i32* %18
%34 = load i32*, i32** %4
%35 = load i32, i32* %8
%36 = sext i32 %35 to i64
%37 = getelementptr inbounds i32, i32* %34, i64 %36
%38 = load i32, i32* %37
store i32 %38, i32* %9
%39 = load i32*, i32** %4
%40 = load i32, i32* %8
%41 = sext i32 %40 to i64
%42 = getelementptr inbounds i32, i32* %39, i64 %41
%43 = load i32, i32* %42
%44 = load i32, i32* %18
%45 = add nsw i32 %43, %44
store i32 %45, i32* %10
%46 = load i32*, i32** %4
%47 = load i32*, i32** %5
%48 = load i32, i32* %8
%49 = sext i32 %48 to i64
%50 = getelementptr inbounds i32, i32* %47, i64 %49
%51 = load i32, i32* %50
%52 = sext i32 %51 to i64
%53 = getelementptr inbounds i32, i32* %46, i64 %52
%54 = load i32, i32* %53
store i32 %54, i32* %11
%55 = load i32*, i32** %4
%56 = load i32*, i32** %6
%57 = load i32, i32* %8
%58 = sext i32 %57 to i64
%59 = getelementptr inbounds i32, i32* %56, i64 %58
%60 = load i32, i32* %59
%61 = sext i32 %60 to i64
%62 = getelementptr inbounds i32, i32* %55, i64 %61
%63 = load i32, i32* %62
store i32 %63, i32* %12
%64 = load i32, i32* %11
%65 = load i32, i32* %9
%66 = sub nsw i32 %64, %65
%67 = call float @abs(i32 %66)
%68 = load i32, i32* %9
%69 = load i32, i32* %12
%70 = sub nsw i32 %68, %69
%71 = call float @abs(i32 %70)
%72 = fadd float %67, %71
store float %72, float* %13
%73 = load i32, i32* %11
%74 = load i32, i32* %10
%75 = sub nsw i32 %73, %74
%76 = call float @abs(i32 %75)
%77 = load i32, i32* %10
%78 = load i32, i32* %12
%79 = sub nsw i32 %77, %78
%80 = call float @abs(i32 %79)
%81 = fadd float %76, %80
store float %81, float* %14
%82 = load float, float* %14
%83 = load float, float* %13
%84 = fsub float %82, %83
store float %84, float* %15
%85 = load float, float* %15
%86 = fpext float %85 to double
%87 = fmul double -1.000000e+00, %86
%88 = fdiv double %87, 1.000000e+00
%89 = call double @exp(double %88)
store double %89, double* %16
store i32 1, i32* %19
%90 = load float, float* %15
%91 = fcmp ogt float %90, 0.000000e+00
br i1 %91, label %92, label %97
92: ; preds = %24
%93 = call double @ran3(i64* %20)
%94 = load double, double* %16
%95 = fcmp ogt double %93, %94
br i1 %95, label %96, label %97
96: ; preds = %92
store i32 0, i32* %19
br label %97
97: ; preds = %96, %92, %24
%98 = load i32, i32* %9
%99 = load i32, i32* %19
%100 = load i32, i32* %9
%101 = load i32, i32* %10
%102 = sub nsw i32 %100, %101
%103 = mul nsw i32 %99, %102
%104 = sub nsw i32 %98, %103
%105 = load i32*, i32** %4
%106 = load i32, i32* %8
%107 = sext i32 %106 to i64
%108 = getelementptr inbounds i32, i32* %105, i64 %107
store i32 %104, i32* %108
br label %109
109: ; preds = %97
%110 = load i32, i32* %7
%111 = add nsw i32 %110, 1
store i32 %111, i32* %7
br label %21
112: ; preds = %21
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, %49
%7 = phi i32 [ 1, %3 ], [ %53, %49 ]
%8 = call double @ran3(i64* %4)
%9 = fmul double %8, 1.000000e+02
%10 = fptosi double %9 to i32
%11 = call double @ran3(i64* %4)
%12 = fmul double %11, 2.000000e+00
%13 = fptosi double %12 to i32
%14 = shl nsw i32 %13, 1
%15 = add i32 %14, -1
%16 = sext i32 %10 to i64
%17 = getelementptr inbounds i32, i32* %0, i64 %16
%18 = load i32, i32* %17
%19 = add nsw i32 %15, %18
%20 = getelementptr inbounds i32, i32* %1, i64 %16
%21 = load i32, i32* %20
%22 = sext i32 %21 to i64
%23 = getelementptr inbounds i32, i32* %0, i64 %22
%24 = load i32, i32* %23
%25 = getelementptr inbounds i32, i32* %2, i64 %16
%26 = load i32, i32* %25
%27 = sext i32 %26 to i64
%28 = getelementptr inbounds i32, i32* %0, i64 %27
%29 = load i32, i32* %28
%30 = sub nsw i32 %24, %18
%31 = call float @abs(i32 %30)
%32 = sub nsw i32 %18, %29
%33 = call float @abs(i32 %32)
%34 = fadd float %31, %33
%35 = sub nsw i32 %24, %19
%36 = call float @abs(i32 %35)
%37 = sub nsw i32 %19, %29
%38 = call float @abs(i32 %37)
%39 = fadd float %36, %38
%40 = fsub float %39, %34
%41 = fpext float %40 to double
%42 = fneg double %41
%43 = call double @exp(double %42)
%44 = fcmp ogt float %40, 0.000000e+00
br i1 %44, label %45, label %49
45: ; preds = %6
%46 = call double @ran3(i64* %4)
%47 = fcmp ogt double %46, %43
br i1 %47, label %48, label %49
48: ; preds = %45
br label %49
49: ; preds = %48, %45, %6
%50 = phi i32 [ 0, %48 ], [ 1, %45 ], [ 1, %6 ]
%51 = mul nuw nsw i32 %50, %15
%52 = add i32 %51, %18
store i32 %52, i32* %17
%53 = add nuw nsw i32 %7, 1
%54 = icmp eq i32 %53, 101
br i1 %54, label %55, label %6
55: ; preds = %49
ret void
}