void arr_float_tol(float *pfTolValue, unsigned long int *puIndex, float *pFloat,
                   unsigned long int uOptimum, float fTol,
                   unsigned long int count, unsigned long int uStride) {
  float fOptimum = pFloat[uOptimum];
  float fTolValue = fOptimum;
  unsigned long int uIndex = uOptimum;
  unsigned long int i;
  for (i = uOptimum - 1; i != (0 - 1); i--) {
    float v = pFloat[i * uStride];
    if (v >= fOptimum * fTol) {
      uIndex = i;
      fTolValue = v;
    } else {
      break;
    }
  }
  *pfTolValue = fTolValue;
  *puIndex = uIndex;
}


x86 assembly (clang, -O0):
<arr_float_tol>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
movss  %xmm0,-0x24(%rbp)
mov    %r8,-0x30(%rbp)
mov    %r9,-0x38(%rbp)
mov    -0x18(%rbp),%rax
mov    -0x20(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x3c(%rbp)
movss  -0x3c(%rbp),%xmm0
movss  %xmm0,-0x40(%rbp)
mov    -0x20(%rbp),%rax
mov    %rax,-0x48(%rbp)
mov    -0x20(%rbp),%rax
sub    $0x1,%rax
mov    %rax,-0x50(%rbp)
cmpq   $0xffffffffffffffff,-0x50(%rbp)
je     11bd <arr_float_tol+0xbd>
mov    -0x18(%rbp),%rax
mov    -0x50(%rbp),%rcx
imul   -0x38(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x54(%rbp)
movss  -0x54(%rbp),%xmm0
movss  -0x3c(%rbp),%xmm1
mulss  -0x24(%rbp),%xmm1
ucomiss %xmm1,%xmm0
jb     11a2 <arr_float_tol+0xa2>
mov    -0x50(%rbp),%rax
mov    %rax,-0x48(%rbp)
movss  -0x54(%rbp),%xmm0
movss  %xmm0,-0x40(%rbp)
jmp    11a7 <arr_float_tol+0xa7>
jmp    11bd <arr_float_tol+0xbd>
jmp    11ac <arr_float_tol+0xac>
mov    -0x50(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x50(%rbp)
jmp    1151 <arr_float_tol+0x51>
movss  -0x40(%rbp),%xmm0
mov    -0x8(%rbp),%rax
movss  %xmm0,(%rax)
mov    -0x48(%rbp),%rcx
mov    -0x10(%rbp),%rax
mov    %rcx,(%rax)
pop    %rbp
ret

x86 assembly (clang, -O2):
<arr_float_tol>:
movss  (%rdx,%rcx,4),%xmm1
test   %rcx,%rcx
je     115b <arr_float_tol+0x5b>
mulss  %xmm1,%xmm0
lea    -0x1(%rcx),%rax
imul   %r9,%rax
movss  (%rdx,%rax,4),%xmm2
ucomiss %xmm0,%xmm2
jb     115d <arr_float_tol+0x5d>
lea    -0x2(%rcx),%rax
imul   %r9,%rax
lea    (%rdx,%rax,4),%rax
shl    $0x2,%r9
neg    %r9
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movaps %xmm2,%xmm1
cmp    $0x1,%rcx
je     115b <arr_float_tol+0x5b>
movss  (%rax),%xmm2
add    $0xffffffffffffffff,%rcx
add    %r9,%rax
ucomiss %xmm0,%xmm2
jae    1140 <arr_float_tol+0x40>
jmp    115d <arr_float_tol+0x5d>
xor    %ecx,%ecx
movss  %xmm1,(%rdi)
mov    %rcx,(%rsi)
ret

LLVM IR (-O0):
define void @arr_float_tol(float* %0, i64* %1, float* %2, i64 %3, float %4, i64 %5, i64 %6) {
%8 = alloca float*
%9 = alloca i64*
%10 = alloca float*
%11 = alloca i64
%12 = alloca float
%13 = alloca i64
%14 = alloca i64
%15 = alloca float
%16 = alloca float
%17 = alloca i64
%18 = alloca i64
%19 = alloca float
store float* %0, float** %8
store i64* %1, i64** %9
store float* %2, float** %10
store i64 %3, i64* %11
store float %4, float* %12
store i64 %5, i64* %13
store i64 %6, i64* %14
%20 = load float*, float** %10
%21 = load i64, i64* %11
%22 = getelementptr inbounds float, float* %20, i64 %21
%23 = load float, float* %22
store float %23, float* %15
%24 = load float, float* %15
store float %24, float* %16
%25 = load i64, i64* %11
store i64 %25, i64* %17
%26 = load i64, i64* %11
%27 = sub i64 %26, 1
store i64 %27, i64* %18
br label %28
28: ; preds = %48, %7
%29 = load i64, i64* %18
%30 = icmp ne i64 %29, -1
br i1 %30, label %31, label %51
31: ; preds = %28
%32 = load float*, float** %10
%33 = load i64, i64* %18
%34 = load i64, i64* %14
%35 = mul i64 %33, %34
%36 = getelementptr inbounds float, float* %32, i64 %35
%37 = load float, float* %36
store float %37, float* %19
%38 = load float, float* %19
%39 = load float, float* %15
%40 = load float, float* %12
%41 = fmul float %39, %40
%42 = fcmp oge float %38, %41
br i1 %42, label %43, label %46
43: ; preds = %31
%44 = load i64, i64* %18
store i64 %44, i64* %17
%45 = load float, float* %19
store float %45, float* %16
br label %47
46: ; preds = %31
br label %51
47: ; preds = %43
br label %48
48: ; preds = %47
%49 = load i64, i64* %18
%50 = add i64 %49, -1
store i64 %50, i64* %18
br label %28
51: ; preds = %46, %28
%52 = load float, float* %16
%53 = load float*, float** %8
store float %52, float* %53
%54 = load i64, i64* %17
%55 = load i64*, i64** %9
store i64 %54, i64* %55
ret void
}

LLVM IR (-O2):
define void @arr_float_tol(float* nocapture writeonly %0, i64* nocapture writeonly %1, float* nocapture %2, i64 %3, float %4, i64 %5, i64 %6) {
%8 = getelementptr inbounds float, float* %2, i64 %3
%9 = load float, float* %8
%10 = icmp eq i64 %3, 0
br i1 %10, label %28, label %11
11: ; preds = %7
%12 = fmul float %9, %4
%13 = add i64 %3, -1
%14 = mul i64 %13, %6
%15 = getelementptr inbounds float, float* %2, i64 %14
%16 = load float, float* %15
%17 = fcmp ult float %16, %12
br i1 %17, label %28, label %18
18: ; preds = %11, %22
%19 = phi float [ %26, %22 ], [ %16, %11 ]
%20 = phi i64 [ %23, %22 ], [ %13, %11 ]
%21 = icmp eq i64 %20, 0
br i1 %21, label %28, label %22
22: ; preds = %18
%23 = add i64 %20, -1
%24 = mul i64 %23, %6
%25 = getelementptr inbounds float, float* %2, i64 %24
%26 = load float, float* %25
%27 = fcmp ult float %26, %12
br i1 %27, label %28, label %18
28: ; preds = %22, %18, %11, %7
%29 = phi i64 [ 0, %7 ], [ %3, %11 ], [ 0, %18 ], [ %20, %22 ]
%30 = phi float [ %9, %7 ], [ %9, %11 ], [ %19, %18 ], [ %19, %22 ]
store float %30, float* %0
store i64 %29, i64* %1
ret void
}