int find_winner(map, data, point, ivars, total_units)
float **map, **data;
int point, ivars, total_units;
{
  int i, j, best;
  float sum, diff, bestd;
  best = 1;
  bestd = 0.0;
  for (j = 1; j <= ivars; j++) {
    diff = map[1][j] - data[point][j];
    bestd = bestd + diff * diff;
  }
  for (i = 2; i <= total_units; i++) {
    sum = 0;
    j = 1;
    while (j <= ivars && sum <= bestd) {
      diff = map[i][j] - data[point][j];
      sum = sum + diff * diff;
      j++;
    }
    if (sum < bestd) {
      bestd = sum;
      best = i;
    }
  }
  return (best);
}


x86 assembly (clang, -O0):
<find_winner>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %ecx,-0x18(%rbp)
mov    %r8d,-0x1c(%rbp)
movl   $0x1,-0x28(%rbp)
xorps  %xmm0,%xmm0
movss  %xmm0,-0x34(%rbp)
movl   $0x1,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x18(%rbp),%eax
jg     118d <find_winner+0x8d>
mov    -0x8(%rbp),%rax
mov    0x8(%rax),%rax
movslq -0x24(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x24(%rbp),%rcx
subss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x30(%rbp)
movss  -0x34(%rbp),%xmm1
movss  -0x30(%rbp),%xmm0
movss  -0x30(%rbp),%xmm2
mulss  %xmm2,%xmm0
addss  %xmm1,%xmm0
movss  %xmm0,-0x34(%rbp)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    112c <find_winner+0x2c>
movl   $0x2,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jg     1272 <find_winner+0x172>
xorps  %xmm0,%xmm0
movss  %xmm0,-0x2c(%rbp)
movl   $0x1,-0x24(%rbp)
mov    -0x24(%rbp),%ecx
xor    %eax,%eax
cmp    -0x18(%rbp),%ecx
mov    %al,-0x35(%rbp)
jg     11d3 <find_winner+0xd3>
movss  -0x2c(%rbp),%xmm1
movss  -0x34(%rbp),%xmm0
ucomiss %xmm1,%xmm0
setae  %al
mov    %al,-0x35(%rbp)
mov    -0x35(%rbp),%al
test   $0x1,%al
jne    11e3 <find_winner+0xe3>
jmp    123c <find_winner+0x13c>
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x24(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x24(%rbp),%rcx
subss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x30(%rbp)
movss  -0x2c(%rbp),%xmm1
movss  -0x30(%rbp),%xmm0
movss  -0x30(%rbp),%xmm2
mulss  %xmm2,%xmm0
addss  %xmm1,%xmm0
movss  %xmm0,-0x2c(%rbp)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    11af <find_winner+0xaf>
movss  -0x2c(%rbp),%xmm1
movss  -0x34(%rbp),%xmm0
ucomiss %xmm1,%xmm0
jbe    125f <find_winner+0x15f>
movss  -0x2c(%rbp),%xmm0
movss  %xmm0,-0x34(%rbp)
mov    -0x20(%rbp),%eax
mov    %eax,-0x28(%rbp)
jmp    1264 <find_winner+0x164>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    1194 <find_winner+0x94>
mov    -0x28(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<find_winner>:
push   %r14
push   %rbx
movslq %edx,%r9
test   %ecx,%ecx
jle    113b <find_winner+0x3b>
mov    0x8(%rdi),%r11
mov    (%rsi,%r9,8),%rax
mov    %ecx,%ebx
lea    -0x1(%rbx),%rdx
mov    %ebx,%r10d
and    $0x3,%r10d
cmp    $0x3,%rdx
jae    1143 <find_winner+0x43>
xorps  %xmm0,%xmm0
mov    $0x1,%edx
test   %r10,%r10
jne    11b6 <find_winner+0xb6>
jmp    11db <find_winner+0xdb>
xorps  %xmm0,%xmm0
jmp    11db <find_winner+0xdb>
and    $0xfffffffc,%ebx
xorps  %xmm0,%xmm0
xor    %edx,%edx
nopl   0x0(%rax,%rax,1)
movss  0x4(%r11,%rdx,4),%xmm1
movss  0x8(%r11,%rdx,4),%xmm2
subss  0x4(%rax,%rdx,4),%xmm1
mulss  %xmm1,%xmm1
addss  %xmm0,%xmm1
subss  0x8(%rax,%rdx,4),%xmm2
mulss  %xmm2,%xmm2
addss  %xmm1,%xmm2
movss  0xc(%r11,%rdx,4),%xmm1
subss  0xc(%rax,%rdx,4),%xmm1
mulss  %xmm1,%xmm1
addss  %xmm2,%xmm1
movss  0x10(%r11,%rdx,4),%xmm0
subss  0x10(%rax,%rdx,4),%xmm0
mulss  %xmm0,%xmm0
addss  %xmm1,%xmm0
add    $0x4,%rdx
cmp    %rdx,%rbx
jne    1150 <find_winner+0x50>
add    $0x1,%rdx
test   %r10,%r10
je     11db <find_winner+0xdb>
lea    (%rax,%rdx,4),%rax
lea    (%r11,%rdx,4),%rdx
xor    %ebx,%ebx
movss  (%rdx,%rbx,4),%xmm1
subss  (%rax,%rbx,4),%xmm1
mulss  %xmm1,%xmm1
addss  %xmm1,%xmm0
add    $0x1,%rbx
cmp    %rbx,%r10
jne    11c0 <find_winner+0xc0>
mov    $0x1,%eax
cmp    $0x2,%r8d
jge    11ea <find_winner+0xea>
pop    %rbx
pop    %r14
ret
movslq %ecx,%r11
add    $0x1,%r8d
mov    $0x1,%eax
mov    $0x2,%r10d
xorps  %xmm1,%xmm1
jmp    1227 <find_winner+0x127>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
ucomiss %xmm2,%xmm0
cmova  %r10d,%eax
minss  %xmm0,%xmm2
add    $0x1,%r10
movaps %xmm2,%xmm0
cmp    %r8,%r10
je     11e6 <find_winner+0xe6>
xorps  %xmm2,%xmm2
test   %ecx,%ecx
jle    1210 <find_winner+0x110>
ucomiss %xmm1,%xmm0
xorps  %xmm2,%xmm2
jb     1210 <find_winner+0x110>
mov    (%rdi,%r10,8),%r14
mov    (%rsi,%r9,8),%rdx
xorps  %xmm2,%xmm2
mov    $0x1,%ebx
cs nopw 0x0(%rax,%rax,1)
movaps %xmm2,%xmm3
movss  (%r14,%rbx,4),%xmm2
subss  (%rdx,%rbx,4),%xmm2
mulss  %xmm2,%xmm2
addss  %xmm3,%xmm2
cmp    %r11,%rbx
jge    1210 <find_winner+0x110>
add    $0x1,%rbx
ucomiss %xmm2,%xmm0
jae    1250 <find_winner+0x150>
jmp    1210 <find_winner+0x110>

LLVM IR (-O0):
define i32 @find_winner(float** %0, float** %1, i32 %2, i32 %3, i32 %4) {
%6 = alloca float**
%7 = alloca float**
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32
%11 = alloca i32
%12 = alloca i32
%13 = alloca i32
%14 = alloca float
%15 = alloca float
%16 = alloca float
store float** %0, float*** %6
store float** %1, float*** %7
store i32 %2, i32* %8
store i32 %3, i32* %9
store i32 %4, i32* %10
store i32 1, i32* %13
store float 0.000000e+00, float* %16
store i32 1, i32* %12
br label %17
17: ; preds = %43, %5
%18 = load i32, i32* %12
%19 = load i32, i32* %9
%20 = icmp sle i32 %18, %19
br i1 %20, label %21, label %46
21: ; preds = %17
%22 = load float**, float*** %6
%23 = getelementptr inbounds float*, float** %22, i64 1
%24 = load float*, float** %23
%25 = load i32, i32* %12
%26 = sext i32 %25 to i64
%27 = getelementptr inbounds float, float* %24, i64 %26
%28 = load float, float* %27
%29 = load float**, float*** %7
%30 = load i32, i32* %8
%31 = sext i32 %30 to i64
%32 = getelementptr inbounds float*, float** %29, i64 %31
%33 = load float*, float** %32
%34 = load i32, i32* %12
%35 = sext i32 %34 to i64
%36 = getelementptr inbounds float, float* %33, i64 %35
%37 = load float, float* %36
%38 = fsub float %28, %37
store float %38, float* %15
%39 = load float, float* %16
%40 = load float, float* %15
%41 = load float, float* %15
%42 = call float @llvm.fmuladd.f32(float %40, float %41, float %39)
store float %42, float* %16
br label %43
43: ; preds = %21
%44 = load i32, i32* %12
%45 = add nsw i32 %44, 1
store i32 %45, i32* %12
br label %17
46: ; preds = %17
store i32 2, i32* %11
br label %47
47: ; preds = %96, %46
%48 = load i32, i32* %11
%49 = load i32, i32* %10
%50 = icmp sle i32 %48, %49
br i1 %50, label %51, label %99
51: ; preds = %47
store float 0.000000e+00, float* %14
store i32 1, i32* %12
br label %52
52: ; preds = %62, %51
%53 = load i32, i32* %12
%54 = load i32, i32* %9
%55 = icmp sle i32 %53, %54
br i1 %55, label %56, label %60
56: ; preds = %52
%57 = load float, float* %14
%58 = load float, float* %16
%59 = fcmp ole float %57, %58
br label %60
60: ; preds = %56, %52
%61 = phi i1 [ false, %52 ], [ %59, %56 ]
br i1 %61, label %62, label %88
62: ; preds = %60
%63 = load float**, float*** %6
%64 = load i32, i32* %11
%65 = sext i32 %64 to i64
%66 = getelementptr inbounds float*, float** %63, i64 %65
%67 = load float*, float** %66
%68 = load i32, i32* %12
%69 = sext i32 %68 to i64
%70 = getelementptr inbounds float, float* %67, i64 %69
%71 = load float, float* %70
%72 = load float**, float*** %7
%73 = load i32, i32* %8
%74 = sext i32 %73 to i64
%75 = getelementptr inbounds float*, float** %72, i64 %74
%76 = load float*, float** %75
%77 = load i32, i32* %12
%78 = sext i32 %77 to i64
%79 = getelementptr inbounds float, float* %76, i64 %78
%80 = load float, float* %79
%81 = fsub float %71, %80
store float %81, float* %15
%82 = load float, float* %14
%83 = load float, float* %15
%84 = load float, float* %15
%85 = call float @llvm.fmuladd.f32(float %83, float %84, float %82)
store float %85, float* %14
%86 = load i32, i32* %12
%87 = add nsw i32 %86, 1
store i32 %87, i32* %12
br label %52
88: ; preds = %60
%89 = load float, float* %14
%90 = load float, float* %16
%91 = fcmp olt float %89, %90
br i1 %91, label %92, label %95
92: ; preds = %88
%93 = load float, float* %14
store float %93, float* %16
%94 = load i32, i32* %11
store i32 %94, i32* %13
br label %95
95: ; preds = %92, %88
br label %96
96: ; preds = %95
%97 = load i32, i32* %11
%98 = add nsw i32 %97, 1
store i32 %98, i32* %11
br label %47
99: ; preds = %47
%100 = load i32, i32* %13
ret i32 %100
}

LLVM IR (-O2):
define i32 @find_winner(float** nocapture %0, float** nocapture %1, i32 %2, i32 %3, i32 %4) {
%6 = icmp slt i32 %3, 1
br i1 %6, label %39, label %7
7: ; preds = %5
%8 = getelementptr inbounds float*, float** %0, i64 1
%9 = load float*, float** %8
%10 = sext i32 %2 to i64
%11 = getelementptr inbounds float*, float** %1, i64 %10
%12 = load float*, float** %11
%13 = add nuw i32 %3, 1
%14 = zext i32 %13 to i64
%15 = add nsw i64 %14, -1
%16 = add nsw i64 %14, -2
%17 = and i64 %15, 3
%18 = icmp ult i64 %16, 3
br i1 %18, label %21, label %19
19: ; preds = %7
%20 = and i64 %15, -4
br label %49
21: ; preds = %49, %7
%22 = phi float [ undef, %7 ], [ %79, %49 ]
%23 = phi i64 [ 1, %7 ], [ %80, %49 ]
%24 = phi float [ 0.000000e+00, %7 ], [ %79, %49 ]
%25 = icmp eq i64 %17, 0
br i1 %25, label %39, label %26
26: ; preds = %21, %26
%27 = phi i64 [ %36, %26 ], [ %23, %21 ]
%28 = phi float [ %35, %26 ], [ %24, %21 ]
%29 = phi i64 [ %37, %26 ], [ 0, %21 ]
%30 = getelementptr inbounds float, float* %9, i64 %27
%31 = load float, float* %30
%32 = getelementptr inbounds float, float* %12, i64 %27
%33 = load float, float* %32
%34 = fsub float %31, %33
%35 = tail call float @llvm.fmuladd.f32(float %34, float %34, float %28)
%36 = add nuw nsw i64 %27, 1
%37 = add i64 %29, 1
%38 = icmp eq i64 %37, %17
br i1 %38, label %39, label %26
39: ; preds = %21, %26, %5
%40 = phi float [ 0.000000e+00, %5 ], [ %22, %21 ], [ %35, %26 ]
%41 = icmp slt i32 %4, 2
br i1 %41, label %114, label %42
42: ; preds = %39
%43 = icmp sgt i32 %3, 0
%44 = sext i32 %2 to i64
%45 = getelementptr inbounds float*, float** %1, i64 %44
%46 = sext i32 %3 to i64
%47 = add nuw i32 %4, 1
%48 = zext i32 %47 to i64
br label %83
49: ; preds = %49, %19
%50 = phi i64 [ 1, %19 ], [ %80, %49 ]
%51 = phi float [ 0.000000e+00, %19 ], [ %79, %49 ]
%52 = phi i64 [ 0, %19 ], [ %81, %49 ]
%53 = getelementptr inbounds float, float* %9, i64 %50
%54 = load float, float* %53
%55 = getelementptr inbounds float, float* %12, i64 %50
%56 = load float, float* %55
%57 = fsub float %54, %56
%58 = tail call float @llvm.fmuladd.f32(float %57, float %57, float %51)
%59 = add nuw nsw i64 %50, 1
%60 = getelementptr inbounds float, float* %9, i64 %59
%61 = load float, float* %60
%62 = getelementptr inbounds float, float* %12, i64 %59
%63 = load float, float* %62
%64 = fsub float %61, %63
%65 = tail call float @llvm.fmuladd.f32(float %64, float %64, float %58)
%66 = add nuw nsw i64 %50, 2
%67 = getelementptr inbounds float, float* %9, i64 %66
%68 = load float, float* %67
%69 = getelementptr inbounds float, float* %12, i64 %66
%70 = load float, float* %69
%71 = fsub float %68, %70
%72 = tail call float @llvm.fmuladd.f32(float %71, float %71, float %65)
%73 = add nuw nsw i64 %50, 3
%74 = getelementptr inbounds float, float* %9, i64 %73
%75 = load float, float* %74
%76 = getelementptr inbounds float, float* %12, i64 %73
%77 = load float, float* %76
%78 = fsub float %75, %77
%79 = tail call float @llvm.fmuladd.f32(float %78, float %78, float %72)
%80 = add nuw nsw i64 %50, 4
%81 = add nuw nsw i64 %52, 4
%82 = icmp eq i64 %81, %20
br i1 %82, label %21, label %49
83: ; preds = %42, %106
%84 = phi i64 [ 2, %42 ], [ %112, %106 ]
%85 = phi float [ %40, %42 ], [ %111, %106 ]
%86 = phi i32 [ 1, %42 ], [ %110, %106 ]
%87 = fcmp oge float %85, 0.000000e+00
%88 = select i1 %43, i1 %87, i1 false
br i1 %88, label %89, label %106
89: ; preds = %83
%90 = getelementptr inbounds float*, float** %0, i64 %84
%91 = load float*, float** %90
%92 = load float*, float** %45
br label %93
93: ; preds = %89, %93
%94 = phi i64 [ 1, %89 ], [ %102, %93 ]
%95 = phi float [ 0.000000e+00, %89 ], [ %101, %93 ]
%96 = getelementptr inbounds float, float* %91, i64 %94
%97 = load float, float* %96
%98 = getelementptr inbounds float, float* %92, i64 %94
%99 = load float, float* %98
%100 = fsub float %97, %99
%101 = tail call float @llvm.fmuladd.f32(float %100, float %100, float %95)
%102 = add nuw nsw i64 %94, 1
%103 = icmp slt i64 %94, %46
%104 = fcmp ole float %101, %85
%105 = select i1 %103, i1 %104, i1 false
br i1 %105, label %93, label %106
106: ; preds = %93, %83
%107 = phi float [ 0.000000e+00, %83 ], [ %101, %93 ]
%108 = fcmp olt float %107, %85
%109 = trunc i64 %84 to i32
%110 = select i1 %108, i32 %109, i32 %86
%111 = select i1 %108, float %107, float %85
%112 = add nuw nsw i64 %84, 1
%113 = icmp eq i64 %112, %48
br i1 %113, label %114, label %83
114: ; preds = %106, %39
%115 = phi i32 [ 1, %39 ], [ %110, %106 ]
ret i32 %115
}