int vh_index(double *f, int vh, int vg, int n) {
  int j;
  for (j = 0; j <= n; j++) {
    if (f[j] > f[vh] && f[j] < f[vg]) {
      vh = j;
    }
  }
  return vh;
}


x86 assembly (clang, -O0):
<vh_index>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    %ecx,-0x14(%rbp)
movl   $0x0,-0x18(%rbp)
mov    -0x18(%rbp),%eax
cmp    -0x14(%rbp),%eax
jg     1181 <vh_index+0x81>
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
movslq -0xc(%rbp),%rcx
ucomisd (%rax,%rcx,8),%xmm0
jbe    116e <vh_index+0x6e>
mov    -0x8(%rbp),%rax
movslq -0x18(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
mov    -0x8(%rbp),%rax
movslq -0x10(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
ucomisd %xmm1,%xmm0
jbe    116e <vh_index+0x6e>
mov    -0x18(%rbp),%eax
mov    %eax,-0xc(%rbp)
jmp    1173 <vh_index+0x73>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    1118 <vh_index+0x18>
mov    -0xc(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<vh_index>:
mov    %esi,%eax
test   %ecx,%ecx
js     118c <vh_index+0x8c>
movslq %edx,%r9
lea    0x1(%rcx),%r8d
test   %ecx,%ecx
je     1167 <vh_index+0x67>
mov    %r8d,%esi
and    $0xfffffffe,%esi
xor    %ecx,%ecx
jmp    1129 <vh_index+0x29>
nop
add    $0x2,%rcx
cmp    %rcx,%rsi
je     1169 <vh_index+0x69>
movsd  (%rdi,%rcx,8),%xmm0
movslq %eax,%rdx
ucomisd (%rdi,%rdx,8),%xmm0
jbe    1146 <vh_index+0x46>
movsd  (%rdi,%r9,8),%xmm1
ucomisd %xmm0,%xmm1
jbe    1146 <vh_index+0x46>
mov    %ecx,%eax
movsd  0x8(%rdi,%rcx,8),%xmm0
movslq %eax,%rdx
ucomisd (%rdi,%rdx,8),%xmm0
jbe    1120 <vh_index+0x20>
movsd  (%rdi,%r9,8),%xmm1
ucomisd %xmm0,%xmm1
jbe    1120 <vh_index+0x20>
lea    0x1(%rcx),%eax
jmp    1120 <vh_index+0x20>
xor    %ecx,%ecx
test   $0x1,%r8b
je     118c <vh_index+0x8c>
movsd  (%rdi,%rcx,8),%xmm0
movslq %eax,%rdx
ucomisd (%rdi,%rdx,8),%xmm0
jbe    118c <vh_index+0x8c>
movsd  (%rdi,%r9,8),%xmm1
ucomisd %xmm0,%xmm1
jbe    118c <vh_index+0x8c>
mov    %ecx,%eax
ret

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

LLVM IR (-O2):
define i32 @vh_index(double* nocapture %0, i32 %1, i32 %2, i32 %3) {
%5 = icmp slt i32 %3, 0
br i1 %5, label %66, label %6
6: ; preds = %4
%7 = sext i32 %2 to i64
%8 = getelementptr inbounds double, double* %0, i64 %7
%9 = add nuw i32 %3, 1
%10 = zext i32 %9 to i64
%11 = and i64 %10, 1
%12 = icmp eq i32 %3, 0
br i1 %12, label %49, label %13
13: ; preds = %6
%14 = and i64 %10, 4294967294
br label %15
15: ; preds = %44, %13
%16 = phi i64 [ 0, %13 ], [ %46, %44 ]
%17 = phi i32 [ %1, %13 ], [ %45, %44 ]
%18 = phi i64 [ 0, %13 ], [ %47, %44 ]
%19 = getelementptr inbounds double, double* %0, i64 %16
%20 = load double, double* %19
%21 = sext i32 %17 to i64
%22 = getelementptr inbounds double, double* %0, i64 %21
%23 = load double, double* %22
%24 = fcmp ogt double %20, %23
br i1 %24, label %25, label %30
25: ; preds = %15
%26 = load double, double* %8
%27 = fcmp olt double %20, %26
br i1 %27, label %28, label %30
28: ; preds = %25
%29 = trunc i64 %16 to i32
br label %30
30: ; preds = %15, %25, %28
%31 = phi i32 [ %29, %28 ], [ %17, %25 ], [ %17, %15 ]
%32 = or i64 %16, 1
%33 = getelementptr inbounds double, double* %0, i64 %32
%34 = load double, double* %33
%35 = sext i32 %31 to i64
%36 = getelementptr inbounds double, double* %0, i64 %35
%37 = load double, double* %36
%38 = fcmp ogt double %34, %37
br i1 %38, label %39, label %44
39: ; preds = %30
%40 = load double, double* %8
%41 = fcmp olt double %34, %40
br i1 %41, label %42, label %44
42: ; preds = %39
%43 = trunc i64 %32 to i32
br label %44
44: ; preds = %42, %39, %30
%45 = phi i32 [ %43, %42 ], [ %31, %39 ], [ %31, %30 ]
%46 = add nuw nsw i64 %16, 2
%47 = add i64 %18, 2
%48 = icmp eq i64 %47, %14
br i1 %48, label %49, label %15
49: ; preds = %44, %6
%50 = phi i32 [ undef, %6 ], [ %45, %44 ]
%51 = phi i64 [ 0, %6 ], [ %46, %44 ]
%52 = phi i32 [ %1, %6 ], [ %45, %44 ]
%53 = icmp eq i64 %11, 0
br i1 %53, label %66, label %54
54: ; preds = %49
%55 = getelementptr inbounds double, double* %0, i64 %51
%56 = load double, double* %55
%57 = sext i32 %52 to i64
%58 = getelementptr inbounds double, double* %0, i64 %57
%59 = load double, double* %58
%60 = fcmp ogt double %56, %59
br i1 %60, label %61, label %66
61: ; preds = %54
%62 = load double, double* %8
%63 = fcmp olt double %56, %62
br i1 %63, label %64, label %66
64: ; preds = %61
%65 = trunc i64 %51 to i32
br label %66
66: ; preds = %49, %64, %61, %54, %4
%67 = phi i32 [ %1, %4 ], [ %50, %49 ], [ %65, %64 ], [ %52, %61 ], [ %52, %54 ]
ret i32 %67
}