void step_regress(r_bar, theta_bar, beta, ivars) float *r_bar, *theta_bar,
    *beta;
int ivars;
{
  int i, k, next_r;
  for (i = ivars; i <= 1; i--) {
    beta[i] = theta_bar[i];
    next_r = (i - 1) * (2 * ivars - i) / 2 + 1;
    for (k = i + 1; k <= ivars; k++) {
      beta[i] = beta[i] - r_bar[next_r] * beta[k];
      next_r++;
    }
  }
}


x86 assembly (clang, -O0):
<step_regress>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
mov    %eax,-0x20(%rbp)
cmpl   $0x1,-0x20(%rbp)
jg     11e5 <step_regress+0xe5>
mov    -0x10(%rbp),%rax
movslq -0x20(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x20(%rbp),%eax
sub    $0x1,%eax
mov    -0x1c(%rbp),%ecx
shl    $0x1,%ecx
sub    -0x20(%rbp),%ecx
imul   %ecx,%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jg     11d2 <step_regress+0xd2>
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm1
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x24(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm2
movd   %xmm0,%eax
xor    $0x80000000,%eax
movd   %eax,%xmm0
mulss  %xmm2,%xmm0
addss  %xmm1,%xmm0
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1166 <step_regress+0x66>
jmp    11d7 <step_regress+0xd7>
mov    -0x20(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x20(%rbp)
jmp    1119 <step_regress+0x19>
pop    %rbp
ret

x86 assembly (clang, -O2):
<step_regress>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
cmp    $0x1,%ecx
jg     11f8 <step_regress+0xf8>
lea    (%rcx,%rcx,1),%r8d
movslq %ecx,%r11
lea    0x8(%rdi),%r9
lea    0x8(%rdx),%r10
xor    %r15d,%r15d
mov    %r11,%r13
jmp    1137 <step_regress+0x37>
nopw   0x0(%rax,%rax,1)
add    $0x1,%r15d
mov    %r14,%r13
movss  (%rsi,%r13,4),%xmm0
movss  %xmm0,(%rdx,%r13,4)
lea    -0x1(%r13),%r14
cmp    %r11,%r13
jge    1130 <step_regress+0x30>
mov    %r8d,%eax
sub    %r13d,%eax
mov    %r14d,%ebx
imul   %eax,%ebx
mov    %ebx,%eax
shr    $0x1f,%eax
add    %ebx,%eax
sar    %eax
cltq
test   $0x1,%r15b
jne    1180 <step_regress+0x80>
mov    %r13,%rbx
cmp    $0x1,%r15d
je     1130 <step_regress+0x30>
jmp    11a5 <step_regress+0xa5>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
lea    0x1(%r13),%rbx
movss  0x4(%rdi,%rax,4),%xmm1
add    $0x1,%rax
mulss  0x4(%rdx,%r13,4),%xmm1
subss  %xmm1,%xmm0
movss  %xmm0,(%rdx,%r13,4)
cmp    $0x1,%r15d
je     1130 <step_regress+0x30>
lea    (%r9,%rax,4),%rax
mov    %ecx,%r12d
sub    %ebx,%r12d
lea    (%r10,%rbx,4),%rbx
xor    %ebp,%ebp
cs nopw 0x0(%rax,%rax,1)
nop
movss  -0x4(%rax,%rbp,4),%xmm1
mulss  -0x4(%rbx,%rbp,4),%xmm1
subss  %xmm1,%xmm0
movss  %xmm0,(%rdx,%r13,4)
movss  (%rax,%rbp,4),%xmm1
mulss  (%rbx,%rbp,4),%xmm1
subss  %xmm1,%xmm0
movss  %xmm0,(%rdx,%r13,4)
add    $0x2,%rbp
cmp    %ebp,%r12d
jne    11c0 <step_regress+0xc0>
jmp    1130 <step_regress+0x30>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define void @step_regress(float* nocapture %0, float* nocapture %1, float* nocapture %2, i32 %3) {
%5 = icmp slt i32 %3, 2
br i1 %5, label %6, label %64
6: ; preds = %4
%7 = shl nsw i32 %3, 1
%8 = sext i32 %3 to i64
br label %9
9: ; preds = %17, %6
%10 = phi i32 [ %18, %17 ], [ 0, %6 ]
%11 = phi i64 [ %15, %17 ], [ %8, %6 ]
%12 = getelementptr inbounds float, float* %1, i64 %11
%13 = load float, float* %12
%14 = getelementptr inbounds float, float* %2, i64 %11
store float %13, float* %14
%15 = add i64 %11, -1
%16 = icmp slt i64 %11, %8
br i1 %16, label %19, label %17
17: ; preds = %37, %42, %9
%18 = add i32 %10, 1
br label %9
19: ; preds = %9
%20 = trunc i64 %11 to i32
%21 = sub nsw i32 %7, %20
%22 = trunc i64 %15 to i32
%23 = mul nsw i32 %21, %22
%24 = sdiv i32 %23, 2
%25 = sext i32 %24 to i64
%26 = and i32 %10, 1
%27 = icmp eq i32 %26, 0
br i1 %27, label %37, label %28
28: ; preds = %19
%29 = add nsw i64 %25, 1
%30 = add nsw i64 %11, 1
%31 = getelementptr inbounds float, float* %0, i64 %29
%32 = load float, float* %31
%33 = getelementptr inbounds float, float* %2, i64 %30
%34 = load float, float* %33
%35 = fneg float %32
%36 = tail call float @llvm.fmuladd.f32(float %35, float %34, float %13)
store float %36, float* %14
br label %37
37: ; preds = %28, %19
%38 = phi float [ %13, %19 ], [ %36, %28 ]
%39 = phi i64 [ %25, %19 ], [ %29, %28 ]
%40 = phi i64 [ %11, %19 ], [ %30, %28 ]
%41 = icmp eq i32 %10, 1
br i1 %41, label %17, label %42
42: ; preds = %37, %42
%43 = phi float [ %61, %42 ], [ %38, %37 ]
%44 = phi i64 [ %54, %42 ], [ %39, %37 ]
%45 = phi i64 [ %55, %42 ], [ %40, %37 ]
%46 = add nsw i64 %44, 1
%47 = add nsw i64 %45, 1
%48 = getelementptr inbounds float, float* %0, i64 %46
%49 = load float, float* %48
%50 = getelementptr inbounds float, float* %2, i64 %47
%51 = load float, float* %50
%52 = fneg float %49
%53 = tail call float @llvm.fmuladd.f32(float %52, float %51, float %43)
store float %53, float* %14
%54 = add nsw i64 %44, 2
%55 = add nsw i64 %45, 2
%56 = getelementptr inbounds float, float* %0, i64 %54
%57 = load float, float* %56
%58 = getelementptr inbounds float, float* %2, i64 %55
%59 = load float, float* %58
%60 = fneg float %57
%61 = tail call float @llvm.fmuladd.f32(float %60, float %59, float %53)
store float %61, float* %14
%62 = trunc i64 %55 to i32
%63 = icmp eq i32 %62, %3
br i1 %63, label %17, label %42
64: ; preds = %4
ret void
}