#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 */
int /*<<< orphan*/ printmat(char *, double **, int);
int trianglize(double **, int);
double det(double *in, int n) {
  double *m[n];
  m[0] = in;
  int i;
  for (i = 1; i < n; i++)
    m[i] = m[i - 1] + n;
  printmat("Matrix", m, n);
  int sign = trianglize(m, n);
  if (!sign)
    return 0;
  printmat("Upper triangle", m, n);
  double p = 1;
  i = 0;
  for (i = 0; i < n; i++)
    p *= m[i][i];
  return p * sign;
}


x86 assembly (clang, -O0):
<det>:
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
mov    -0x14(%rbp),%eax
mov    %eax,%ecx
mov    %rsp,%rax
mov    %rax,-0x20(%rbp)
lea    0xf(,%rcx,8),%rdx
and    $0xfffffffffffffff0,%rdx
mov    %rsp,%rax
sub    %rdx,%rax
mov    %rax,-0x48(%rbp)
mov    %rax,%rsp
mov    %rcx,-0x28(%rbp)
mov    -0x10(%rbp),%rcx
mov    %rcx,(%rax)
movl   $0x1,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    11a4 <det+0x84>
mov    -0x48(%rbp),%rax
mov    -0x2c(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rdx
movslq -0x14(%rbp),%rcx
shl    $0x3,%rcx
add    %rcx,%rdx
movslq -0x2c(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1166 <det+0x46>
mov    -0x48(%rbp),%rsi
mov    -0x14(%rbp),%edx
lea    0xe56(%rip),%rdi
call   1030 <printmat@plt>
mov    -0x48(%rbp),%rdi
mov    -0x14(%rbp),%esi
call   1040 <trianglize@plt>
mov    %eax,-0x30(%rbp)
cmpl   $0x0,-0x30(%rbp)
jne    11e4 <det+0xc4>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x8(%rbp)
movl   $0x1,-0x34(%rbp)
jmp    1265 <det+0x145>
mov    -0x48(%rbp),%rsi
mov    -0x14(%rbp),%edx
lea    0xe1d(%rip),%rdi
call   1030 <printmat@plt>
movsd  0xe01(%rip),%xmm0
movsd  %xmm0,-0x40(%rbp)
movl   $0x0,-0x2c(%rbp)
movl   $0x0,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    124b <det+0x12b>
mov    -0x48(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x2c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mulsd  -0x40(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1212 <det+0xf2>
movsd  -0x40(%rbp),%xmm0
cvtsi2sdl -0x30(%rbp),%xmm1
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x8(%rbp)
movl   $0x1,-0x34(%rbp)
mov    -0x20(%rbp),%rax
mov    %rax,%rsp
movsd  -0x8(%rbp),%xmm0
mov    %rbp,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<det>:
push   %rbp
mov    %rsp,%rbp
push   %r15
push   %r14
push   %r12
push   %rbx
mov    %esi,%r14d
mov    %esi,%r12d
mov    %rsp,%rax
lea    0xf(,%r12,8),%rcx
and    $0xfffffffffffffff0,%rcx
mov    %rax,%rbx
sub    %rcx,%rbx
mov    %rbx,%rsp
neg    %rcx
mov    %rdi,(%rax,%rcx,1)
cmp    $0x2,%esi
jl     1210 <det+0xf0>
lea    -0x1(%r12),%rdx
lea    -0x2(%r12),%rax
mov    %edx,%r9d
and    $0x7,%r9d
mov    $0x1,%ecx
cmp    $0x7,%rax
jb     11e6 <det+0xc6>
and    $0xfffffffffffffff8,%rdx
mov    %r12,%r8
shl    $0x6,%r8
lea    0x0(,%r12,8),%rsi
xor    %ecx,%ecx
nopw   0x0(%rax,%rax,1)
mov    %rdi,%rax
add    %rsi,%rdi
mov    %rdi,0x8(%rbx,%rcx,8)
add    %rsi,%rdi
mov    %rdi,0x10(%rbx,%rcx,8)
add    %rsi,%rdi
mov    %rdi,0x18(%rbx,%rcx,8)
add    %rsi,%rdi
mov    %rdi,0x20(%rbx,%rcx,8)
add    %rsi,%rdi
mov    %rdi,0x28(%rbx,%rcx,8)
add    %rsi,%rdi
mov    %rdi,0x30(%rbx,%rcx,8)
add    %rsi,%rdi
mov    %rdi,0x38(%rbx,%rcx,8)
add    %rsi,%rdi
mov    %rdi,0x40(%rbx,%rcx,8)
add    $0x8,%rcx
cmp    %rcx,%rdx
jne    1190 <det+0x70>
add    %r8,%rax
add    $0x1,%rcx
mov    %rax,%rdi
test   %r9,%r9
je     1210 <det+0xf0>
lea    (%rdi,%r12,8),%rax
lea    0x0(,%r12,8),%rdx
lea    (%rbx,%rcx,8),%rcx
xor    %esi,%esi
nopl   (%rax)
mov    %rax,(%rcx,%rsi,8)
add    $0x1,%rsi
add    %rdx,%rax
cmp    %rsi,%r9
jne    1200 <det+0xe0>
lea    0xdf1(%rip),%rdi
mov    %rbx,%rsi
mov    %r14d,%edx
call   1030 <printmat@plt>
mov    %rbx,%rdi
mov    %r14d,%esi
call   1040 <trianglize@plt>
test   %eax,%eax
je     1268 <det+0x148>
mov    %eax,%r15d
lea    0xdd4(%rip),%rdi
mov    %rbx,%rsi
mov    %r14d,%edx
call   1030 <printmat@plt>
test   %r14d,%r14d
jle    126e <det+0x14e>
lea    -0x1(%r12),%rcx
mov    %r12d,%eax
and    $0x3,%eax
cmp    $0x3,%rcx
jae    1278 <det+0x158>
movsd  0xd9c(%rip),%xmm1
xor    %ecx,%ecx
jmp    12c3 <det+0x1a3>
xorpd  %xmm0,%xmm0
jmp    12ec <det+0x1cc>
movsd  0xd8a(%rip),%xmm1
jmp    12e3 <det+0x1c3>
and    $0xfffffffc,%r12d
movsd  0xd7c(%rip),%xmm1
xor    %ecx,%ecx
cs nopw 0x0(%rax,%rax,1)
mov    (%rbx,%rcx,8),%rdx
mov    0x8(%rbx,%rcx,8),%rsi
mulsd  (%rdx,%rcx,8),%xmm1
mulsd  0x8(%rsi,%rcx,8),%xmm1
mov    0x10(%rbx,%rcx,8),%rdx
mulsd  0x10(%rdx,%rcx,8),%xmm1
mov    0x18(%rbx,%rcx,8),%rdx
mulsd  0x18(%rdx,%rcx,8),%xmm1
add    $0x4,%rcx
cmp    %rcx,%r12
jne    1290 <det+0x170>
test   %rax,%rax
je     12e3 <det+0x1c3>
nopl   0x0(%rax,%rax,1)
mov    (%rbx,%rcx,8),%rdx
mulsd  (%rdx,%rcx,8),%xmm1
add    $0x1,%rcx
add    $0xffffffffffffffff,%rax
jne    12d0 <det+0x1b0>
cvtsi2sd %r15d,%xmm0
mulsd  %xmm1,%xmm0
lea    -0x20(%rbp),%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [7 x i8] c"Matrix\00"
@.str.1 = [15 x i8] c"Upper triangle\00"
define double @det(double* %0, i32 %1) {
%3 = alloca double
%4 = alloca double*
%5 = alloca i32
%6 = alloca i8*
%7 = alloca i64
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32
%11 = alloca double
store double* %0, double** %4
store i32 %1, i32* %5
%12 = load i32, i32* %5
%13 = zext i32 %12 to i64
%14 = call i8* @llvm.stacksave()
store i8* %14, i8** %6
%15 = alloca double*, i64 %13
store i64 %13, i64* %7
%16 = load double*, double** %4
%17 = getelementptr inbounds double*, double** %15, i64 0
store double* %16, double** %17
store i32 1, i32* %8
br label %18
18: ; preds = %34, %2
%19 = load i32, i32* %8
%20 = load i32, i32* %5
%21 = icmp slt i32 %19, %20
br i1 %21, label %22, label %37
22: ; preds = %18
%23 = load i32, i32* %8
%24 = sub nsw i32 %23, 1
%25 = sext i32 %24 to i64
%26 = getelementptr inbounds double*, double** %15, i64 %25
%27 = load double*, double** %26
%28 = load i32, i32* %5
%29 = sext i32 %28 to i64
%30 = getelementptr inbounds double, double* %27, i64 %29
%31 = load i32, i32* %8
%32 = sext i32 %31 to i64
%33 = getelementptr inbounds double*, double** %15, i64 %32
store double* %30, double** %33
br label %34
34: ; preds = %22
%35 = load i32, i32* %8
%36 = add nsw i32 %35, 1
store i32 %36, i32* %8
br label %18
37: ; preds = %18
%38 = load i32, i32* %5
%39 = call i32 @printmat(i8* getelementptr inbounds ([7 x i8], [7 x i8]* @.str, i64 0, i64 0), double** %15, i32 %38)
%40 = load i32, i32* %5
%41 = call i32 @trianglize(double** %15, i32 %40)
store i32 %41, i32* %9
%42 = load i32, i32* %9
%43 = icmp ne i32 %42, 0
br i1 %43, label %45, label %44
44: ; preds = %37
store double 0.000000e+00, double* %3
store i32 1, i32* %10
br label %71
45: ; preds = %37
%46 = load i32, i32* %5
%47 = call i32 @printmat(i8* getelementptr inbounds ([15 x i8], [15 x i8]* @.str.1, i64 0, i64 0), double** %15, i32 %46)
store double 1.000000e+00, double* %11
store i32 0, i32* %8
store i32 0, i32* %8
br label %48
48: ; preds = %63, %45
%49 = load i32, i32* %8
%50 = load i32, i32* %5
%51 = icmp slt i32 %49, %50
br i1 %51, label %52, label %66
52: ; preds = %48
%53 = load i32, i32* %8
%54 = sext i32 %53 to i64
%55 = getelementptr inbounds double*, double** %15, i64 %54
%56 = load double*, double** %55
%57 = load i32, i32* %8
%58 = sext i32 %57 to i64
%59 = getelementptr inbounds double, double* %56, i64 %58
%60 = load double, double* %59
%61 = load double, double* %11
%62 = fmul double %61, %60
store double %62, double* %11
br label %63
63: ; preds = %52
%64 = load i32, i32* %8
%65 = add nsw i32 %64, 1
store i32 %65, i32* %8
br label %48
66: ; preds = %48
%67 = load double, double* %11
%68 = load i32, i32* %9
%69 = sitofp i32 %68 to double
%70 = fmul double %67, %69
store double %70, double* %3
store i32 1, i32* %10
br label %71
71: ; preds = %66, %44
%72 = load i8*, i8** %6
%73 = load double, double* %3
ret double %73
}

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