#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
double sqrt(double);
int choldc(double **a, int n) {
  int i, j, k;
  double sum;
  for (i = 1; i <= n; i++) {
    for (j = i; j <= n; j++) {
      for (sum = a[i][j], k = i - 1; k >= 1; k--)
        sum -= a[i][k] * a[j][k];
      if (i == j) {
        if (sum <= 0.0)
          return (0);
        a[i][i] = sqrt(sum);
      } else
        a[j][i] = sum / a[i][i];
    }
  }
  for (i = 1; i <= n - 1; i++)
    for (j = i + 1; j <= n; j++)
      a[i][j] = 0.0;
  return (1);
}


x86 assembly (clang, -O0):
<choldc>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
movl   $0x1,-0x18(%rbp)
mov    -0x18(%rbp),%eax
cmp    -0x14(%rbp),%eax
jg     1271 <choldc+0x161>
mov    -0x18(%rbp),%eax
mov    %eax,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x14(%rbp),%eax
jg     125e <choldc+0x14e>
mov    -0x10(%rbp),%rax
movslq -0x18(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x1c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x28(%rbp)
mov    -0x18(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x20(%rbp)
cmpl   $0x1,-0x20(%rbp)
jl     11d2 <choldc+0xc2>
mov    -0x10(%rbp),%rax
movslq -0x18(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x28(%rbp),%xmm1
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x28(%rbp)
mov    -0x20(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x20(%rbp)
jmp    1167 <choldc+0x57>
mov    -0x18(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jne    121c <choldc+0x10c>
xorps  %xmm0,%xmm0
ucomisd -0x28(%rbp),%xmm0
jb     11f8 <choldc+0xe8>
movl   $0x0,-0x4(%rbp)
jmp    12de <choldc+0x1ce>
movsd  -0x28(%rbp),%xmm0
call   1030 <sqrt@plt>
mov    -0x10(%rbp),%rax
movslq -0x18(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x18(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
jmp    124b <choldc+0x13b>
movsd  -0x28(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x18(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x18(%rbp),%rcx
divsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x18(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
jmp    1250 <choldc+0x140>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1138 <choldc+0x28>
jmp    1263 <choldc+0x153>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    1126 <choldc+0x16>
movl   $0x1,-0x18(%rbp)
mov    -0x18(%rbp),%eax
mov    -0x14(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jg     12d7 <choldc+0x1c7>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x14(%rbp),%eax
jg     12c4 <choldc+0x1b4>
mov    -0x10(%rbp),%rax
movslq -0x18(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x1c(%rbp),%rcx
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1292 <choldc+0x182>
jmp    12c9 <choldc+0x1b9>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    1278 <choldc+0x168>
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<choldc>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
mov    $0x1,%ebx
test   %esi,%esi
jle    1258 <choldc+0x138>
mov    %rdi,%r13
mov    %rsi,0x8(%rsp)
lea    0x1(%rsi),%r12d
mov    $0x1,%r14d
xor    %ebx,%ebx
xorpd  %xmm2,%xmm2
jmp    1171 <choldc+0x51>
cs nopw 0x0(%rax,%rax,1)
nop
add    $0x1,%r14
add    $0x1,%rbx
cmp    %r12,%r14
je     1269 <choldc+0x149>
mov    0x0(%r13,%r14,8),%rax
lea    -0x1(%r14),%rcx
mov    %rcx,0x10(%rsp)
mov    %ecx,%r15d
mov    %r14,%rbp
jmp    11aa <choldc+0x8a>
nopw   0x0(%rax,%rax,1)
divsd  (%rax,%r14,8),%xmm0
mov    0x0(%r13,%rbp,8),%rcx
movsd  %xmm0,(%rcx,%r14,8)
add    $0x1,%rbp
cmp    %r12,%rbp
je     1160 <choldc+0x40>
movsd  (%rax,%rbp,8),%xmm0
cmp    $0x2,%r14
jb     121e <choldc+0xfe>
mov    0x0(%r13,%rbp,8),%rcx
test   $0x1,%bl
jne    11d0 <choldc+0xb0>
mov    %r14,%rdx
cmp    $0x1,%rbx
jne    11f0 <choldc+0xd0>
jmp    121e <choldc+0xfe>
nopw   0x0(%rax,%rax,1)
movsd  (%rax,%r15,8),%xmm1
mulsd  (%rcx,%r15,8),%xmm1
subsd  %xmm1,%xmm0
mov    0x10(%rsp),%rdx
cmp    $0x1,%rbx
je     121e <choldc+0xfe>
nopl   0x0(%rax,%rax,1)
lea    -0x1(%rdx),%esi
movsd  (%rax,%rsi,8),%xmm1
mulsd  (%rcx,%rsi,8),%xmm1
subsd  %xmm1,%xmm0
lea    -0x2(%rdx),%rsi
mov    %esi,%edi
movsd  (%rax,%rdi,8),%xmm1
mulsd  (%rcx,%rdi,8),%xmm1
subsd  %xmm1,%xmm0
cmp    $0x3,%rdx
mov    %rsi,%rdx
jg     11f0 <choldc+0xd0>
cmp    %rbp,%r14
jne    1190 <choldc+0x70>
ucomisd %xmm0,%xmm2
jae    1256 <choldc+0x136>
ucomisd %xmm2,%xmm0
jb     1240 <choldc+0x120>
sqrtsd %xmm0,%xmm0
jmp    1249 <choldc+0x129>
nopl   0x0(%rax)
call   1040 <sqrt@plt>
xorpd  %xmm2,%xmm2
mov    0x0(%r13,%r14,8),%rcx
mov    %rcx,%rax
jmp    119b <choldc+0x7b>
xor    %ebx,%ebx
mov    %ebx,%eax
add    $0x18,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
mov    0x8(%rsp),%rcx
cmp    $0x2,%ecx
jl     128a <choldc+0x16a>
lea    -0x1(%rcx),%r14d
cmp    $0x1,%r14d
jne    1291 <choldc+0x171>
mov    $0x1,%r12d
xor    %eax,%eax
jmp    130f <choldc+0x1ef>
mov    $0x1,%ebx
jmp    1258 <choldc+0x138>
lea    -0x3(%rcx),%ebx
mov    %r14d,%r15d
and    $0xfffffffe,%r15d
neg    %r15
mov    $0x1,%r12d
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
mov    %r12,%rbp
lea    0x1(%rbx),%eax
lea    0x8(,%rax,8),%rdx
mov    0x0(%r13,%r12,8),%rax
lea    (%rax,%r12,8),%rdi
add    $0x8,%rdi
xor    %esi,%esi
call   1030 <memset@plt>
add    $0x2,%r12
mov    %ebx,%eax
lea    0x8(,%rax,8),%rdx
mov    0x8(%r13,%rbp,8),%rax
lea    (%rax,%rbp,8),%rdi
add    $0x10,%rdi
xor    %esi,%esi
call   1030 <memset@plt>
add    $0xfffffffe,%ebx
lea    (%r15,%rbp,1),%rax
add    $0x2,%rax
cmp    $0x1,%rax
jne    12b0 <choldc+0x190>
lea    -0x1(%r12),%rax
mov    0x8(%rsp),%rcx
test   $0x1,%r14b
mov    $0x1,%ebx
je     1258 <choldc+0x138>
add    $0xfffffffe,%ecx
sub    %eax,%ecx
lea    0x8(,%rcx,8),%rdx
mov    0x0(%r13,%r12,8),%rcx
lea    (%rcx,%rax,8),%rdi
add    $0x10,%rdi
xor    %esi,%esi
call   1030 <memset@plt>
jmp    1258 <choldc+0x138>

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

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