double weighted_mean(double *y, double *w, int n) {
  double yc;
  double sumw;
  int i;
  yc = sumw = 0;
  for (i = 0; i < n; i++)
    yc += w[i] * y[i];
  for (i = 0; i < n; i++)
    sumw += w[i];
  yc /= sumw;
  return yc;
}


x86 assembly (clang, -O0):
<weighted_mean>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x28(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x20(%rbp)
movl   $0x0,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    116c <weighted_mean+0x6c>
mov    -0x10(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x20(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x20(%rbp)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1126 <weighted_mean+0x26>
movl   $0x0,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    11a4 <weighted_mean+0xa4>
mov    -0x10(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
addsd  -0x28(%rbp),%xmm0
movsd  %xmm0,-0x28(%rbp)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1173 <weighted_mean+0x73>
movsd  -0x28(%rbp),%xmm1
movsd  -0x20(%rbp),%xmm0
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x20(%rbp)
movsd  -0x20(%rbp),%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<weighted_mean>:
test   %edx,%edx
jle    1120 <weighted_mean+0x20>
mov    %edx,%r9d
lea    -0x1(%r9),%r8
mov    %r9d,%r10d
and    $0x3,%r10d
cmp    $0x3,%r8
jae    1129 <weighted_mean+0x29>
xorpd  %xmm0,%xmm0
xor    %ecx,%ecx
jmp    1187 <weighted_mean+0x87>
xorpd  %xmm0,%xmm0
jmp    11cf <weighted_mean+0xcf>
mov    %r9d,%eax
and    $0xfffffffc,%eax
xorpd  %xmm0,%xmm0
xor    %ecx,%ecx
cs nopw 0x0(%rax,%rax,1)
nop
movsd  (%rsi,%rcx,8),%xmm1
movsd  0x8(%rsi,%rcx,8),%xmm2
mulsd  (%rdi,%rcx,8),%xmm1
mulsd  0x8(%rdi,%rcx,8),%xmm2
addsd  %xmm0,%xmm1
movsd  0x10(%rsi,%rcx,8),%xmm3
mulsd  0x10(%rdi,%rcx,8),%xmm3
addsd  %xmm1,%xmm2
movsd  0x18(%rsi,%rcx,8),%xmm0
mulsd  0x18(%rdi,%rcx,8),%xmm0
addsd  %xmm2,%xmm3
addsd  %xmm3,%xmm0
add    $0x4,%rcx
cmp    %rcx,%rax
jne    1140 <weighted_mean+0x40>
test   %r10,%r10
je     11b7 <weighted_mean+0xb7>
lea    (%rdi,%rcx,8),%rax
lea    (%rsi,%rcx,8),%rcx
xor    %edi,%edi
cs nopw 0x0(%rax,%rax,1)
movsd  (%rcx,%rdi,8),%xmm1
mulsd  (%rax,%rdi,8),%xmm1
addsd  %xmm1,%xmm0
add    $0x1,%rdi
cmp    %rdi,%r10
jne    11a0 <weighted_mean+0xa0>
test   %edx,%edx
jle    11cf <weighted_mean+0xcf>
mov    %r9d,%eax
and    $0x7,%eax
cmp    $0x7,%r8
jae    11d8 <weighted_mean+0xd8>
xorpd  %xmm1,%xmm1
xor    %ecx,%ecx
jmp    1228 <weighted_mean+0x128>
xorpd  %xmm1,%xmm1
divsd  %xmm1,%xmm0
ret
and    $0xfffffff8,%r9d
xorpd  %xmm1,%xmm1
xor    %ecx,%ecx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
addsd  (%rsi,%rcx,8),%xmm1
addsd  0x8(%rsi,%rcx,8),%xmm1
addsd  0x10(%rsi,%rcx,8),%xmm1
addsd  0x18(%rsi,%rcx,8),%xmm1
addsd  0x20(%rsi,%rcx,8),%xmm1
addsd  0x28(%rsi,%rcx,8),%xmm1
addsd  0x30(%rsi,%rcx,8),%xmm1
addsd  0x38(%rsi,%rcx,8),%xmm1
add    $0x8,%rcx
cmp    %rcx,%r9
jne    11f0 <weighted_mean+0xf0>
test   %rax,%rax
je     124e <weighted_mean+0x14e>
lea    (%rsi,%rcx,8),%rcx
xor    %edx,%edx
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
addsd  (%rcx,%rdx,8),%xmm1
add    $0x1,%rdx
cmp    %rdx,%rax
jne    1240 <weighted_mean+0x140>
divsd  %xmm1,%xmm0
ret

LLVM IR (-O0):
define double @weighted_mean(double* %0, double* %1, i32 %2) {
%4 = alloca double*
%5 = alloca double*
%6 = alloca i32
%7 = alloca double
%8 = alloca double
%9 = alloca i32
store double* %0, double** %4
store double* %1, double** %5
store i32 %2, i32* %6
store double 0.000000e+00, double* %8
store double 0.000000e+00, double* %7
store i32 0, i32* %9
br label %10
10: ; preds = %27, %3
%11 = load i32, i32* %9
%12 = load i32, i32* %6
%13 = icmp slt i32 %11, %12
br i1 %13, label %14, label %30
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** %4
%21 = load i32, i32* %9
%22 = sext i32 %21 to i64
%23 = getelementptr inbounds double, double* %20, i64 %22
%24 = load double, double* %23
%25 = load double, double* %7
%26 = call double @llvm.fmuladd.f64(double %19, double %24, double %25)
store double %26, double* %7
br label %27
27: ; preds = %14
%28 = load i32, i32* %9
%29 = add nsw i32 %28, 1
store i32 %29, i32* %9
br label %10
30: ; preds = %10
store i32 0, i32* %9
br label %31
31: ; preds = %43, %30
%32 = load i32, i32* %9
%33 = load i32, i32* %6
%34 = icmp slt i32 %32, %33
br i1 %34, label %35, label %46
35: ; preds = %31
%36 = load double*, double** %5
%37 = load i32, i32* %9
%38 = sext i32 %37 to i64
%39 = getelementptr inbounds double, double* %36, i64 %38
%40 = load double, double* %39
%41 = load double, double* %8
%42 = fadd double %41, %40
store double %42, double* %8
br label %43
43: ; preds = %35
%44 = load i32, i32* %9
%45 = add nsw i32 %44, 1
store i32 %45, i32* %9
br label %31
46: ; preds = %31
%47 = load double, double* %8
%48 = load double, double* %7
%49 = fdiv double %48, %47
store double %49, double* %7
%50 = load double, double* %7
ret double %50
}

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