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


x86 assembly (clang, -O0):
<arr_float_tol>:
push   %rbp
mov    %rsp,%rbp
mov    %dx,%ax
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %ax,-0x12(%rbp)
movss  %xmm0,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
mov    -0x10(%rbp),%rax
movzwl -0x12(%rbp),%ecx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x2c(%rbp)
movss  -0x2c(%rbp),%xmm0
movss  %xmm0,-0x30(%rbp)
mov    -0x12(%rbp),%ax
mov    %ax,-0x32(%rbp)
movzwl -0x12(%rbp),%eax
sub    $0x1,%eax
mov    %ax,-0x34(%rbp)
movzwl -0x34(%rbp),%eax
cmp    $0xffff,%eax
je     11bf <arr_float_tol+0xbf>
mov    -0x10(%rbp),%rax
movzwl -0x34(%rbp),%ecx
imul   -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x38(%rbp)
movss  -0x38(%rbp),%xmm0
movss  -0x2c(%rbp),%xmm1
mulss  -0x18(%rbp),%xmm1
ucomiss %xmm1,%xmm0
jb     11a4 <arr_float_tol+0xa4>
mov    -0x34(%rbp),%ax
mov    %ax,-0x32(%rbp)
movss  -0x38(%rbp),%xmm0
movss  %xmm0,-0x30(%rbp)
jmp    11a9 <arr_float_tol+0xa9>
jmp    11bf <arr_float_tol+0xbf>
jmp    11ae <arr_float_tol+0xae>
mov    -0x34(%rbp),%ax
add    $0xffff,%ax
mov    %ax,-0x34(%rbp)
jmp    114f <arr_float_tol+0x4f>
mov    -0x32(%rbp),%cx
mov    -0x8(%rbp),%rax
mov    %cx,(%rax)
pop    %rbp
ret

x86 assembly (clang, -O2):
<arr_float_tol>:
mov    %edx,%eax
mulss  (%rsi,%rax,4),%xmm0
add    $0xffffffffffffffff,%rax
nopl   0x0(%rax,%rax,1)
cmp    $0xffffffffffffffff,%rax
je     1132 <arr_float_tol+0x32>
movzwl %ax,%ecx
imul   %r8,%rcx
movss  (%rsi,%rcx,4),%xmm1
add    $0xffffffffffffffff,%rax
ucomiss %xmm0,%xmm1
jae    1110 <arr_float_tol+0x10>
add    $0x2,%eax
mov    %ax,(%rdi)
ret
xor    %eax,%eax
mov    %ax,(%rdi)
ret

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

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