int lhsbnd_fill(double *lhsbnd, double *G, double *w, long *kk, int n, int nk) {
  long i, i4;
  int j, k;
  for (i = 0; i < n; ++i) {
    i4 = i * 4;
    for (k = 0; k < 4; ++k)
      for (j = k; j < 4; ++j)
        lhsbnd[nk * (j - k) + kk[i] + k] += w[i] * G[i4 + k] * G[i4 + j];
  }
  return 0;
}


x86 assembly (clang, -O0):
<lhsbnd_fill>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8d,-0x24(%rbp)
mov    %r9d,-0x28(%rbp)
movq   $0x0,-0x30(%rbp)
mov    -0x30(%rbp),%rax
movslq -0x24(%rbp),%rcx
cmp    %rcx,%rax
jge    1206 <lhsbnd_fill+0x106>
mov    -0x30(%rbp),%rax
shl    $0x2,%rax
mov    %rax,-0x38(%rbp)
movl   $0x0,-0x40(%rbp)
cmpl   $0x4,-0x40(%rbp)
jge    11f0 <lhsbnd_fill+0xf0>
mov    -0x40(%rbp),%eax
mov    %eax,-0x3c(%rbp)
cmpl   $0x4,-0x3c(%rbp)
jge    11dd <lhsbnd_fill+0xdd>
mov    -0x18(%rbp),%rax
mov    -0x30(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movslq -0x40(%rbp),%rdx
add    %rdx,%rcx
mulsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
movslq -0x3c(%rbp),%rdx
add    %rdx,%rcx
movsd  (%rax,%rcx,8),%xmm2
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%ecx
mov    -0x3c(%rbp),%edx
sub    -0x40(%rbp),%edx
imul   %edx,%ecx
movslq %ecx,%rcx
mov    -0x20(%rbp),%rdx
mov    -0x30(%rbp),%rsi
add    (%rdx,%rsi,8),%rcx
movslq -0x40(%rbp),%rdx
add    %rdx,%rcx
movsd  (%rax,%rcx,8),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
jmp    1158 <lhsbnd_fill+0x58>
jmp    11e2 <lhsbnd_fill+0xe2>
mov    -0x40(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x40(%rbp)
jmp    1148 <lhsbnd_fill+0x48>
jmp    11f5 <lhsbnd_fill+0xf5>
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    1124 <lhsbnd_fill+0x24>
xor    %eax,%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<lhsbnd_fill>:
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
test   %r8d,%r8d
jle    1284 <lhsbnd_fill+0x184>
movslq %r8d,%r8
movslq %r9d,%r12
lea    (%r12,%r12,1),%r9
lea    (%r12,%r12,2),%r10
lea    0x1(%r12),%r11
lea    (%r12,%r12,1),%r14
add    $0x1,%r14
lea    0x2(%r12),%r15
add    $0x18,%rsi
xor    %ebx,%ebx
nopl   0x0(%rax,%rax,1)
mov    (%rcx,%rbx,8),%rax
movsd  -0x18(%rsi),%xmm0
movsd  (%rdx,%rbx,8),%xmm1
mulsd  %xmm0,%xmm1
mulsd  %xmm0,%xmm1
addsd  (%rdi,%rax,8),%xmm1
movsd  %xmm1,(%rdi,%rax,8)
movsd  (%rdx,%rbx,8),%xmm0
mulsd  -0x18(%rsi),%xmm0
lea    (%rax,%r12,1),%r13
mulsd  -0x10(%rsi),%xmm0
addsd  (%rdi,%r13,8),%xmm0
movsd  %xmm0,(%rdi,%r13,8)
movsd  (%rdx,%rbx,8),%xmm0
mulsd  -0x18(%rsi),%xmm0
mulsd  -0x8(%rsi),%xmm0
lea    (%r9,%rax,1),%r13
addsd  (%rdi,%r13,8),%xmm0
movsd  %xmm0,(%rdi,%r13,8)
movsd  (%rdx,%rbx,8),%xmm0
mulsd  -0x18(%rsi),%xmm0
add    %r10,%rax
mulsd  (%rsi),%xmm0
addsd  (%rdi,%rax,8),%xmm0
movsd  %xmm0,(%rdi,%rax,8)
mov    (%rcx,%rbx,8),%rax
movsd  -0x10(%rsi),%xmm0
movsd  (%rdx,%rbx,8),%xmm1
mulsd  %xmm0,%xmm1
mulsd  %xmm0,%xmm1
addsd  0x8(%rdi,%rax,8),%xmm1
movsd  %xmm1,0x8(%rdi,%rax,8)
movsd  (%rdx,%rbx,8),%xmm0
mulsd  -0x10(%rsi),%xmm0
lea    (%r11,%rax,1),%r13
mulsd  -0x8(%rsi),%xmm0
addsd  (%rdi,%r13,8),%xmm0
movsd  %xmm0,(%rdi,%r13,8)
movsd  (%rdx,%rbx,8),%xmm0
mulsd  -0x10(%rsi),%xmm0
mulsd  (%rsi),%xmm0
add    %r14,%rax
addsd  (%rdi,%rax,8),%xmm0
movsd  %xmm0,(%rdi,%rax,8)
mov    (%rcx,%rbx,8),%rax
movsd  -0x8(%rsi),%xmm0
movsd  (%rdx,%rbx,8),%xmm1
mulsd  %xmm0,%xmm1
mulsd  %xmm0,%xmm1
addsd  0x10(%rdi,%rax,8),%xmm1
movsd  %xmm1,0x10(%rdi,%rax,8)
movsd  (%rdx,%rbx,8),%xmm0
mulsd  -0x8(%rsi),%xmm0
add    %r15,%rax
mulsd  (%rsi),%xmm0
addsd  (%rdi,%rax,8),%xmm0
movsd  %xmm0,(%rdi,%rax,8)
mov    (%rcx,%rbx,8),%rax
movsd  (%rsi),%xmm0
movsd  (%rdx,%rbx,8),%xmm1
mulsd  %xmm0,%xmm1
mulsd  %xmm0,%xmm1
addsd  0x18(%rdi,%rax,8),%xmm1
movsd  %xmm1,0x18(%rdi,%rax,8)
add    $0x1,%rbx
add    $0x20,%rsi
cmp    %rbx,%r8
jne    1140 <lhsbnd_fill+0x40>
xor    %eax,%eax
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
define i32 @lhsbnd_fill(double* %0, double* %1, double* %2, i64* %3, i32 %4, i32 %5) {
%7 = alloca double*
%8 = alloca double*
%9 = alloca double*
%10 = alloca i64*
%11 = alloca i32
%12 = alloca i32
%13 = alloca i64
%14 = alloca i64
%15 = alloca i32
%16 = alloca i32
store double* %0, double** %7
store double* %1, double** %8
store double* %2, double** %9
store i64* %3, i64** %10
store i32 %4, i32* %11
store i32 %5, i32* %12
store i64 0, i64* %13
br label %17
17: ; preds = %79, %6
%18 = load i64, i64* %13
%19 = load i32, i32* %11
%20 = sext i32 %19 to i64
%21 = icmp slt i64 %18, %20
br i1 %21, label %22, label %82
22: ; preds = %17
%23 = load i64, i64* %13
%24 = mul nsw i64 %23, 4
store i64 %24, i64* %14
store i32 0, i32* %16
br label %25
25: ; preds = %75, %22
%26 = load i32, i32* %16
%27 = icmp slt i32 %26, 4
br i1 %27, label %28, label %78
28: ; preds = %25
%29 = load i32, i32* %16
store i32 %29, i32* %15
br label %30
30: ; preds = %71, %28
%31 = load i32, i32* %15
%32 = icmp slt i32 %31, 4
br i1 %32, label %33, label %74
33: ; preds = %30
%34 = load double*, double** %9
%35 = load i64, i64* %13
%36 = getelementptr inbounds double, double* %34, i64 %35
%37 = load double, double* %36
%38 = load double*, double** %8
%39 = load i64, i64* %14
%40 = load i32, i32* %16
%41 = sext i32 %40 to i64
%42 = add nsw i64 %39, %41
%43 = getelementptr inbounds double, double* %38, i64 %42
%44 = load double, double* %43
%45 = fmul double %37, %44
%46 = load double*, double** %8
%47 = load i64, i64* %14
%48 = load i32, i32* %15
%49 = sext i32 %48 to i64
%50 = add nsw i64 %47, %49
%51 = getelementptr inbounds double, double* %46, i64 %50
%52 = load double, double* %51
%53 = load double*, double** %7
%54 = load i32, i32* %12
%55 = load i32, i32* %15
%56 = load i32, i32* %16
%57 = sub nsw i32 %55, %56
%58 = mul nsw i32 %54, %57
%59 = sext i32 %58 to i64
%60 = load i64*, i64** %10
%61 = load i64, i64* %13
%62 = getelementptr inbounds i64, i64* %60, i64 %61
%63 = load i64, i64* %62
%64 = add nsw i64 %59, %63
%65 = load i32, i32* %16
%66 = sext i32 %65 to i64
%67 = add nsw i64 %64, %66
%68 = getelementptr inbounds double, double* %53, i64 %67
%69 = load double, double* %68
%70 = call double @llvm.fmuladd.f64(double %45, double %52, double %69)
store double %70, double* %68
br label %71
71: ; preds = %33
%72 = load i32, i32* %15
%73 = add nsw i32 %72, 1
store i32 %73, i32* %15
br label %30
74: ; preds = %30
br label %75
75: ; preds = %74
%76 = load i32, i32* %16
%77 = add nsw i32 %76, 1
store i32 %77, i32* %16
br label %25
78: ; preds = %25
br label %79
79: ; preds = %78
%80 = load i64, i64* %13
%81 = add nsw i64 %80, 1
store i64 %81, i64* %13
br label %17
82: ; preds = %17
ret i32 0
}

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