float rms_plw(map, a, weights, data, ivars, total_units, samples)
float **map, **a, **data, *weights;
int ivars, total_units, samples;
{
  int i, j, winner, ma = ivars + 1;
  float rms_error, tmp;
  rms_error = 0;
  for (i = 1; i <= samples; i++) {
    winner = find_winnerw(map, data, weights, i, ivars, total_units);
    tmp = a[winner][1] - data[i][ma];
    for (j = 1; j <= ivars; j++)
      tmp += data[i][j] * a[winner][j + 1];
    rms_error += tmp * tmp;
  }
  rms_error = sqrt(rms_error / ((float)samples));
  return (rms_error);
}


x86 assembly (clang, -O0):
<rms_plw>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    0x10(%rbp),%eax
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8d,-0x24(%rbp)
mov    %r9d,-0x28(%rbp)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x38(%rbp)
xorps  %xmm0,%xmm0
movss  %xmm0,-0x3c(%rbp)
movl   $0x1,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    0x10(%rbp),%eax
jg     123f <rms_plw+0x11f>
mov    -0x8(%rbp),%rdi
mov    -0x20(%rbp),%rsi
mov    -0x18(%rbp),%rdx
mov    -0x2c(%rbp),%ecx
mov    -0x24(%rbp),%r8d
mov    -0x28(%rbp),%r9d
mov    $0x0,%al
call   1030 <find_winnerw@plt>
mov    %eax,-0x34(%rbp)
mov    -0x10(%rbp),%rax
movslq -0x34(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movss  0x4(%rax),%xmm0
mov    -0x20(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x38(%rbp),%rcx
subss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x40(%rbp)
movl   $0x1,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0x24(%rbp),%eax
jg     1215 <rms_plw+0xf5>
mov    -0x20(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x30(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x34(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    -0x30(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movss  (%rax,%rcx,4),%xmm2
movss  -0x40(%rbp),%xmm1
mulss  %xmm2,%xmm0
addss  %xmm1,%xmm0
movss  %xmm0,-0x40(%rbp)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    11ba <rms_plw+0x9a>
movss  -0x40(%rbp),%xmm0
movss  -0x40(%rbp),%xmm2
movss  -0x3c(%rbp),%xmm1
mulss  %xmm2,%xmm0
addss  %xmm1,%xmm0
movss  %xmm0,-0x3c(%rbp)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    115b <rms_plw+0x3b>
movss  -0x3c(%rbp),%xmm0
cvtsi2ssl 0x10(%rbp),%xmm1
divss  %xmm1,%xmm0
cvtss2sd %xmm0,%xmm0
call   1040 <sqrt@plt>
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,-0x3c(%rbp)
movss  -0x3c(%rbp),%xmm0
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<rms_plw>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x38,%rsp
mov    %r9d,0x4(%rsp)
mov    %rdx,0x30(%rsp)
mov    %rsi,0x28(%rsp)
mov    %rdi,0x20(%rsp)
mov    0x70(%rsp),%eax
xorps  %xmm0,%xmm0
mov    %rax,0x8(%rsp)
test   %eax,%eax
jle    129c <rms_plw+0x17c>
mov    %r8d,%ebx
mov    %rcx,%rbp
lea    0x1(%rbx),%ecx
movslq %ecx,%rax
mov    %rax,0x18(%rsp)
mov    0x8(%rsp),%rax
lea    0x1(%rax),%r12d
lea    -0x1(%rcx),%r15
add    $0xfffffffffffffffe,%rcx
mov    %rcx,0x10(%rsp)
mov    %r15d,%r13d
and    $0x3,%r13d
and    $0xfffffffffffffffc,%r15
xorps  %xmm0,%xmm0
mov    $0x1,%r14d
jmp    11ba <rms_plw+0x9a>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movss  (%rsp),%xmm0
mulss  %xmm4,%xmm4
addss  %xmm4,%xmm0
add    $0x1,%r14
cmp    %r12,%r14
je     129c <rms_plw+0x17c>
movss  %xmm0,(%rsp)
mov    0x20(%rsp),%rdi
mov    %rbp,%rsi
mov    0x30(%rsp),%rdx
mov    %r14d,%ecx
mov    %ebx,%r8d
mov    0x4(%rsp),%r9d
xor    %eax,%eax
call   1040 <find_winnerw@plt>
cltq
mov    0x28(%rsp),%rcx
mov    (%rcx,%rax,8),%rax
movss  0x4(%rax),%xmm4
mov    0x0(%rbp,%r14,8),%rcx
mov    0x18(%rsp),%rdx
subss  (%rcx,%rdx,4),%xmm4
test   %ebx,%ebx
jle    11a0 <rms_plw+0x80>
mov    $0x1,%edx
cmpq   $0x3,0x10(%rsp)
jb     125d <rms_plw+0x13d>
xor    %edx,%edx
movss  0x4(%rcx,%rdx,4),%xmm1
movss  0x8(%rcx,%rdx,4),%xmm2
mulss  0x8(%rax,%rdx,4),%xmm1
mulss  0xc(%rax,%rdx,4),%xmm2
addss  %xmm4,%xmm1
movss  0xc(%rcx,%rdx,4),%xmm3
mulss  0x10(%rax,%rdx,4),%xmm3
addss  %xmm1,%xmm2
movss  0x10(%rcx,%rdx,4),%xmm4
mulss  0x14(%rax,%rdx,4),%xmm4
addss  %xmm2,%xmm3
addss  %xmm3,%xmm4
add    $0x4,%rdx
cmp    %rdx,%r15
jne    1210 <rms_plw+0xf0>
add    $0x1,%rdx
movss  (%rsp),%xmm0
test   %r13,%r13
je     11a5 <rms_plw+0x85>
lea    (%rax,%rdx,4),%rax
add    $0x4,%rax
lea    (%rcx,%rdx,4),%rcx
xor    %edx,%edx
nopl   0x0(%rax)
movss  (%rcx,%rdx,4),%xmm1
mulss  (%rax,%rdx,4),%xmm1
addss  %xmm1,%xmm4
add    $0x1,%rdx
cmp    %rdx,%r13
jne    1280 <rms_plw+0x160>
jmp    11a5 <rms_plw+0x85>
xorps  %xmm1,%xmm1
cvtsi2ssl 0x8(%rsp),%xmm1
divss  %xmm1,%xmm0
ucomiss 0xd50(%rip),%xmm0
jb     12c5 <rms_plw+0x1a5>
sqrtss %xmm0,%xmm0
add    $0x38,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
add    $0x38,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
jmp    1030 <sqrtf@plt>

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

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