void cholsl(double **a, int n, double *p, double *b, double *x) {
  int i, k;
  double sum;
  for (i = 0; i < n; i++) {
    for (sum = *(b + i), k = i - 1; k >= 0; --k) {
      sum -= a[i][k] * *(x + k);
    }
    *(x + i) = sum / *(p + i);
  }
  for (i = n - 1; i >= 0; --i) {
    for (sum = *(x + i), k = i + 1; k < n; ++k) {
      sum -= a[k][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    11d5 <cholsl+0xd5>
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     11a8 <cholsl+0xa8>
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x30(%rbp),%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     1295 <cholsl+0x195>
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    1268 <cholsl+0x168>
mov    -0x8(%rbp),%rax
movslq -0x30(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x2c(%rbp),%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    1203 <cholsl+0x103>
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    11de <cholsl+0xde>
pop    %rbp
ret

x86 assembly (clang, -O2):
<cholsl>:
push   %r14
push   %rbx
test   %esi,%esi
jle    1266 <cholsl+0x166>
mov    %esi,%r9d
xor    %r10d,%r10d
jmp    1139 <cholsl+0x39>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
divsd  (%rdx,%r10,8),%xmm0
movsd  %xmm0,(%r8,%r10,8)
add    $0x1,%r10
cmp    %r9,%r10
je     11b8 <cholsl+0xb8>
movsd  (%rcx,%r10,8),%xmm0
test   %r10,%r10
je     1120 <cholsl+0x20>
mov    (%rdi,%r10,8),%r11
test   $0x1,%r10b
jne    1160 <cholsl+0x60>
mov    %r10,%r14
cmp    $0x1,%r10
jne    1180 <cholsl+0x80>
jmp    1120 <cholsl+0x20>
nopl   0x0(%rax)
lea    -0x1(%r10),%r14
mov    %r14d,%ebx
movsd  (%r11,%rbx,8),%xmm1
mulsd  (%r8,%rbx,8),%xmm1
subsd  %xmm1,%xmm0
cmp    $0x1,%r10
je     1120 <cholsl+0x20>
nopl   (%rax)
lea    -0x1(%r14),%ebx
movsd  (%r11,%rbx,8),%xmm1
mulsd  (%r8,%rbx,8),%xmm1
subsd  %xmm1,%xmm0
lea    -0x2(%r14),%rbx
mov    %ebx,%eax
movsd  (%r11,%rax,8),%xmm1
mulsd  (%r8,%rax,8),%xmm1
subsd  %xmm1,%xmm0
cmp    $0x2,%r14
mov    %rbx,%r14
jg     1180 <cholsl+0x80>
jmp    1120 <cholsl+0x20>
test   %esi,%esi
jle    1266 <cholsl+0x166>
xor    %ecx,%ecx
mov    %r9,%r10
jmp    11e8 <cholsl+0xe8>
nopw   0x0(%rax,%rax,1)
divsd  (%rdx,%rax,8),%xmm0
movsd  %xmm0,(%r8,%rax,8)
add    $0x1,%ecx
cmp    $0x1,%r11
jle    1266 <cholsl+0x166>
mov    %r10,%r11
add    $0xffffffffffffffff,%r10
mov    %r10d,%eax
movsd  (%r8,%rax,8),%xmm0
cmp    %r9,%r11
jge    11d0 <cholsl+0xd0>
test   $0x1,%cl
jne    1210 <cholsl+0x110>
mov    %r11,%rsi
cmp    $0x1,%ecx
jne    1230 <cholsl+0x130>
jmp    11d0 <cholsl+0xd0>
nopl   0x0(%rax)
mov    (%rdi,%r11,8),%rsi
movsd  (%rsi,%rax,8),%xmm1
mulsd  (%r8,%r11,8),%xmm1
subsd  %xmm1,%xmm0
lea    0x1(%r11),%rsi
cmp    $0x1,%ecx
je     11d0 <cholsl+0xd0>
nopl   0x0(%rax)
mov    (%rdi,%rsi,8),%rbx
movsd  (%rbx,%rax,8),%xmm1
mulsd  (%r8,%rsi,8),%xmm1
mov    0x8(%rdi,%rsi,8),%rbx
movsd  (%rbx,%rax,8),%xmm2
mulsd  0x8(%r8,%rsi,8),%xmm2
subsd  %xmm1,%xmm0
subsd  %xmm2,%xmm0
add    $0x2,%rsi
cmp    %esi,%r9d
jne    1230 <cholsl+0x130>
jmp    11d0 <cholsl+0xd0>
pop    %rbx
pop    %r14
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 = sext i32 %31 to i64
%33 = getelementptr inbounds double*, double** %30, i64 %32
%34 = load double*, double** %33
%35 = load i32, i32* %12
%36 = sext i32 %35 to i64
%37 = getelementptr inbounds double, double* %34, 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 = sext i32 %85 to i64
%87 = getelementptr inbounds double*, double** %84, i64 %86
%88 = load double*, double** %87
%89 = load i32, i32* %11
%90 = sext i32 %89 to i64
%91 = getelementptr inbounds double, double* %88, 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 %123
7: ; preds = %5
%8 = zext i32 %1 to i64
br label %13
9: ; preds = %57
br i1 %6, label %10, label %123
10: ; preds = %9
%11 = zext i32 %1 to i64
%12 = zext i32 %1 to i64
br label %65
13: ; preds = %7, %57
%14 = phi i64 [ 0, %7 ], [ %63, %57 ]
%15 = getelementptr inbounds double, double* %3, i64 %14
%16 = load double, double* %15
%17 = icmp eq i64 %14, 0
br i1 %17, label %57, label %18
18: ; preds = %13
%19 = getelementptr inbounds double*, double** %0, i64 %14
%20 = load double*, double** %19
%21 = and i64 %14, 1
%22 = icmp eq i64 %21, 0
br i1 %22, label %32, label %23
23: ; preds = %18
%24 = add nsw i64 %14, -1
%25 = and i64 %24, 4294967295
%26 = getelementptr inbounds double, double* %20, i64 %25
%27 = load double, double* %26
%28 = getelementptr inbounds double, double* %4, i64 %25
%29 = load double, double* %28
%30 = fneg double %27
%31 = tail call double @llvm.fmuladd.f64(double %30, double %29, double %16)
br label %32
32: ; preds = %23, %18
%33 = phi i64 [ %14, %18 ], [ %24, %23 ]
%34 = phi double [ %16, %18 ], [ %31, %23 ]
%35 = phi double [ undef, %18 ], [ %31, %23 ]
%36 = icmp eq i64 %14, 1
br i1 %36, label %57, label %37
37: ; preds = %32, %37
%38 = phi i64 [ %48, %37 ], [ %33, %32 ]
%39 = phi double [ %55, %37 ], [ %34, %32 ]
%40 = add i64 %38, 4294967295
%41 = and i64 %40, 4294967295
%42 = getelementptr inbounds double, double* %20, i64 %41
%43 = load double, double* %42
%44 = getelementptr inbounds double, double* %4, i64 %41
%45 = load double, double* %44
%46 = fneg double %43
%47 = tail call double @llvm.fmuladd.f64(double %46, double %45, double %39)
%48 = add nsw i64 %38, -2
%49 = and i64 %48, 4294967295
%50 = getelementptr inbounds double, double* %20, i64 %49
%51 = load double, double* %50
%52 = getelementptr inbounds double, double* %4, i64 %49
%53 = load double, double* %52
%54 = fneg double %51
%55 = tail call double @llvm.fmuladd.f64(double %54, double %53, double %47)
%56 = icmp sgt i64 %38, 2
br i1 %56, label %37, label %57
57: ; preds = %32, %37, %13
%58 = phi double [ %16, %13 ], [ %35, %32 ], [ %55, %37 ]
%59 = getelementptr inbounds double, double* %2, i64 %14
%60 = load double, double* %59
%61 = fdiv double %58, %60
%62 = getelementptr inbounds double, double* %4, i64 %14
store double %61, double* %62
%63 = add nuw nsw i64 %14, 1
%64 = icmp eq i64 %63, %8
br i1 %64, label %9, label %13
65: ; preds = %10, %115
%66 = phi i32 [ 0, %10 ], [ %122, %115 ]
%67 = phi i64 [ %12, %10 ], [ %121, %115 ]
%68 = phi i64 [ %11, %10 ], [ %69, %115 ]
%69 = add nsw i64 %68, -1
%70 = and i64 %69, 4294967295
%71 = getelementptr inbounds double, double* %4, i64 %70
%72 = load double, double* %71
%73 = icmp slt i64 %67, %11
br i1 %73, label %74, label %115
74: ; preds = %65
%75 = and i32 %66, 1
%76 = icmp eq i32 %75, 0
br i1 %76, label %87, label %77
77: ; preds = %74
%78 = getelementptr inbounds double*, double** %0, i64 %68
%79 = load double*, double** %78
%80 = getelementptr inbounds double, double* %79, i64 %70
%81 = load double, double* %80
%82 = getelementptr inbounds double, double* %4, i64 %68
%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 %68, 1
br label %87
87: ; preds = %77, %74
%88 = phi double [ undef, %74 ], [ %85, %77 ]
%89 = phi i64 [ %68, %74 ], [ %86, %77 ]
%90 = phi double [ %72, %74 ], [ %85, %77 ]
%91 = icmp eq i32 %66, 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 = getelementptr inbounds double*, double** %0, i64 %93
%96 = load double*, double** %95
%97 = getelementptr inbounds double, double* %96, i64 %70
%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 = getelementptr inbounds double*, double** %0, i64 %103
%105 = load double*, double** %104
%106 = getelementptr inbounds double, double* %105, i64 %70
%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, %65
%116 = phi double [ %72, %65 ], [ %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 %67, 1
%121 = add nsw i64 %67, -1
%122 = add i32 %66, 1
br i1 %120, label %65, label %123
123: ; preds = %115, %5, %9
ret void
}