void cholsl(double *a, int n, double p[], double b[], double x[]) {
  int i, k;
  double sum;
  for (i = 0; i < n; i++) {
    sum = b[i];
    for (k = i - 1; k >= 0; k--)
      sum -= a[i * n + k] * x[k];
    x[i] = sum / p[i];
  }
  for (i = (n - 1); i >= 0; i--) {
    sum = x[i];
    for (k = i + 1; k < n; k++)
      sum -= a[k * n + i] * x[k];
    x[i] = sum / p[i];
  }
}


x86 assembly (clang, -O0):
<cholsl>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
movl   $0x0,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    11d6 <cholsl+0xd6>
mov    -0x20(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x2c(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x30(%rbp)
cmpl   $0x0,-0x30(%rbp)
jl     11a9 <cholsl+0xa9>
mov    -0x8(%rbp),%rax
mov    -0x2c(%rbp),%ecx
imul   -0xc(%rbp),%ecx
add    -0x30(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x28(%rbp),%rax
movslq -0x30(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x38(%rbp),%xmm1
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x30(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x30(%rbp)
jmp    1145 <cholsl+0x45>
movsd  -0x38(%rbp),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x2c(%rbp),%rcx
divsd  (%rax,%rcx,8),%xmm0
mov    -0x28(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    111e <cholsl+0x1e>
mov    -0xc(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x2c(%rbp)
cmpl   $0x0,-0x2c(%rbp)
jl     1297 <cholsl+0x197>
mov    -0x28(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    126a <cholsl+0x16a>
mov    -0x8(%rbp),%rax
mov    -0x30(%rbp),%ecx
imul   -0xc(%rbp),%ecx
add    -0x2c(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x28(%rbp),%rax
movslq -0x30(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x38(%rbp),%xmm1
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    1204 <cholsl+0x104>
movsd  -0x38(%rbp),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x2c(%rbp),%rcx
divsd  (%rax,%rcx,8),%xmm0
mov    -0x28(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x2c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x2c(%rbp)
jmp    11df <cholsl+0xdf>
pop    %rbp
ret

x86 assembly (clang, -O2):
<cholsl>:
push   %rbp
push   %r15
push   %r14
push   %r12
push   %rbx
test   %esi,%esi
jle    12c0 <cholsl+0x1c0>
mov    %esi,%r10d
lea    0x0(,%r10,8),%r9
xor    %r11d,%r11d
mov    %rdi,%rax
jmp    114c <cholsl+0x4c>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
divsd  (%rdx,%r11,8),%xmm0
movsd  %xmm0,(%r8,%r11,8)
add    $0x1,%r11
add    %r9,%rax
cmp    %r10,%r11
je     11da <cholsl+0xda>
movsd  (%rcx,%r11,8),%xmm0
test   %r11,%r11
je     1130 <cholsl+0x30>
test   $0x1,%r11b
jne    1170 <cholsl+0x70>
mov    %r11,%rbx
cmp    $0x1,%r11
je     1130 <cholsl+0x30>
jmp    1199 <cholsl+0x99>
nopl   0x0(%rax,%rax,1)
mov    %r11,%rbp
imul   %r10,%rbp
lea    -0x1(%r11),%rbx
add    %r11,%rbp
add    $0xffffffffffffffff,%rbp
movsd  (%rdi,%rbp,8),%xmm1
mov    %ebx,%ebp
mulsd  (%r8,%rbp,8),%xmm1
subsd  %xmm1,%xmm0
cmp    $0x1,%r11
je     1130 <cholsl+0x30>
add    $0xfffffffffffffffe,%rbx
nopl   (%rax)
lea    0x1(%rbx),%ebp
movsd  (%rax,%rbx,8),%xmm1
movsd  0x8(%rax,%rbx,8),%xmm2
mulsd  (%r8,%rbp,8),%xmm2
subsd  %xmm2,%xmm0
mov    %ebx,%ebp
mulsd  (%r8,%rbp,8),%xmm1
subsd  %xmm1,%xmm0
lea    -0x2(%rbx),%rbp
add    $0x2,%rbx
cmp    $0x2,%rbx
mov    %rbp,%rbx
jg     11a0 <cholsl+0xa0>
jmp    1130 <cholsl+0x30>
test   %esi,%esi
jle    12c0 <cholsl+0x1c0>
lea    -0x1(%r10),%r9
lea    (%r10,%r10,1),%rsi
xor    %r12d,%r12d
mov    %rdi,%r14
mov    %r10,%r11
jmp    121e <cholsl+0x11e>
cs nopw 0x0(%rax,%rax,1)
nop
divsd  (%rdx,%r11,8),%xmm0
movsd  %xmm0,(%r8,%r11,8)
add    $0x1,%r12d
add    $0xfffffffffffffff8,%r14
cmp    $0x1,%r15
jle    12c0 <cholsl+0x1c0>
mov    %r11,%r15
add    $0xffffffffffffffff,%r11
movsd  -0x8(%r8,%r15,8),%xmm0
cmp    %r10,%r15
jge    1200 <cholsl+0x100>
test   $0x1,%r12b
jne    1250 <cholsl+0x150>
mov    %r15,%rbx
cmp    $0x1,%r12d
je     1200 <cholsl+0x100>
jmp    1273 <cholsl+0x173>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
mov    %r15,%rax
imul   %r10,%rax
add    %r11,%rax
movsd  (%rdi,%rax,8),%xmm1
mulsd  (%r8,%r15,8),%xmm1
subsd  %xmm1,%xmm0
lea    0x1(%r15),%rbx
cmp    $0x1,%r12d
je     1200 <cholsl+0x100>
mov    %r10,%rax
imul   %rbx,%rax
lea    (%r14,%rax,8),%rax
lea    0x1(%rbx),%rcx
imul   %r10,%rcx
lea    (%r14,%rcx,8),%rcx
mov    %r9,%rbp
nopl   (%rax)
movsd  (%rax,%rbp,8),%xmm1
mulsd  (%r8,%rbx,8),%xmm1
subsd  %xmm1,%xmm0
movsd  (%rcx,%rbp,8),%xmm1
mulsd  0x8(%r8,%rbx,8),%xmm1
subsd  %xmm1,%xmm0
add    $0x2,%rbx
add    %rsi,%rbp
cmp    %ebx,%r10d
jne    1290 <cholsl+0x190>
jmp    1200 <cholsl+0x100>
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
pop    %rbp
ret

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

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