#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 **dmatrix(int, int);
double *dvector(int);
int /*<<< orphan*/ fprintf(int /*<<< orphan*/, char *);
int /*<<< orphan*/ free_dmatrix(double **, int, int);
int /*<<< orphan*/ free_dvector(double *);
int /*<<< orphan*/ free_ivector(int *);
int *ivector(int);
int /*<<< orphan*/ lubksb(double **, int, int *, double *);
scalar_t__ ludcmp(double **, int, int *, double *);
int /*<<< orphan*/ stderr;
int inverse(double *A[], double *inv_A[], int n) {
  double d, *col, **tmpA;
  int i, j, *indx;
  tmpA = dmatrix(n, n);
  for (j = 0; j < n; j++)
    for (i = 0; i < n; i++)
      tmpA[j][i] = A[j][i];
  col = dvector(n);
  indx = ivector(n);
  if (ludcmp(tmpA, n, indx, &d) != 0) {
    fprintf(stderr, "inverse: ludcmp error\n");
    return 1;
  }
  for (j = 0; j < n; j++) {
    for (i = 0; i < n; i++)
      col[i] = 0;
    col[j] = 1;
    lubksb(tmpA, n, indx, col);
    for (i = 0; i < n; i++)
      inv_A[i][j] = col[i];
  }
  free_dvector(col);
  free_ivector(indx);
  free_dmatrix(tmpA, n, n);
  return 0;
}


x86 assembly (clang, -O0):
<inverse>:
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
mov    -0x1c(%rbp),%edi
mov    -0x1c(%rbp),%esi
call   1040 <dmatrix@plt>
mov    %rax,-0x38(%rbp)
movl   $0x0,-0x40(%rbp)
mov    -0x40(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    1223 <inverse+0x93>
movl   $0x0,-0x3c(%rbp)
mov    -0x3c(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    1210 <inverse+0x80>
mov    -0x10(%rbp),%rax
movslq -0x40(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x3c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x38(%rbp),%rax
movslq -0x40(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x3c(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
jmp    11cc <inverse+0x3c>
jmp    1215 <inverse+0x85>
mov    -0x40(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x40(%rbp)
jmp    11b9 <inverse+0x29>
mov    -0x1c(%rbp),%edi
call   1070 <dvector@plt>
mov    %rax,-0x30(%rbp)
mov    -0x1c(%rbp),%edi
call   10a0 <ivector@plt>
mov    %rax,-0x48(%rbp)
mov    -0x38(%rbp),%rdi
mov    -0x1c(%rbp),%esi
mov    -0x48(%rbp),%rdx
lea    -0x28(%rbp),%rcx
call   1030 <ludcmp@plt>
cmp    $0x0,%rax
je     127a <inverse+0xea>
mov    0x2d80(%rip),%rax
mov    (%rax),%edi
lea    0xd9f(%rip),%rsi
call   1050 <fprintf@plt>
movl   $0x1,-0x4(%rbp)
jmp    1365 <inverse+0x1d5>
movl   $0x0,-0x40(%rbp)
mov    -0x40(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    133d <inverse+0x1ad>
movl   $0x0,-0x3c(%rbp)
mov    -0x3c(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    12be <inverse+0x12e>
mov    -0x30(%rbp),%rax
movslq -0x3c(%rbp),%rcx
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
jmp    1294 <inverse+0x104>
mov    -0x30(%rbp),%rax
movslq -0x40(%rbp),%rcx
movsd  0xd32(%rip),%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x38(%rbp),%rdi
mov    -0x1c(%rbp),%esi
mov    -0x48(%rbp),%rdx
mov    -0x30(%rbp),%rcx
call   1060 <lubksb@plt>
movl   $0x0,-0x3c(%rbp)
mov    -0x3c(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    132a <inverse+0x19a>
mov    -0x30(%rbp),%rax
movslq -0x3c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x40(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
jmp    12ee <inverse+0x15e>
jmp    132f <inverse+0x19f>
mov    -0x40(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x40(%rbp)
jmp    1281 <inverse+0xf1>
mov    -0x30(%rbp),%rdi
call   1090 <free_dvector@plt>
mov    -0x48(%rbp),%rdi
call   1080 <free_ivector@plt>
mov    -0x38(%rbp),%rdi
mov    -0x1c(%rbp),%esi
mov    -0x1c(%rbp),%edx
call   10b0 <free_dmatrix@plt>
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x50,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<inverse>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x38,%rsp
mov    %edx,%r12d
mov    %rsi,%rbx
mov    %rdi,%r15
mov    %edx,%edi
mov    %edx,%esi
call   1050 <dmatrix@plt>
test   %r12d,%r12d
jle    138d <inverse+0x1ed>
mov    %r12d,%r11d
mov    %r11d,%r10d
and    $0xfffffffc,%r10d
lea    -0x4(%r10),%rcx
mov    %rcx,0x10(%rsp)
shr    $0x2,%rcx
add    $0x1,%rcx
mov    %ecx,%r13d
and    $0x3,%r13d
and    $0xfffffffffffffffc,%rcx
mov    %rcx,0x18(%rsp)
mov    %r11d,%r8d
and    $0x3,%r8d
mov    %r13,0x8(%rsp)
shl    $0x5,%r13
xor    %r9d,%r9d
jmp    121d <inverse+0x7d>
nopl   0x0(%rax)
add    $0x1,%r9
cmp    %r11,%r9
je     138d <inverse+0x1ed>
mov    (%r15,%r9,8),%rsi
mov    (%rax,%r9,8),%rcx
cmp    $0x4,%r12d
jb     1241 <inverse+0xa1>
lea    (%rsi,%r11,8),%rdx
cmp    %rdx,%rcx
jae    12c0 <inverse+0x120>
lea    (%rcx,%r11,8),%rdx
cmp    %rdx,%rsi
jae    12c0 <inverse+0x120>
xor    %ebp,%ebp
mov    %rbp,%rdi
not    %rdi
add    %r11,%rdi
test   %r8,%r8
je     1274 <inverse+0xd4>
mov    %r8,%r14
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movsd  (%rsi,%rbp,8),%xmm0
movsd  %xmm0,(%rcx,%rbp,8)
add    $0x1,%rbp
add    $0xffffffffffffffff,%r14
jne    1260 <inverse+0xc0>
cmp    $0x3,%rdi
jb     1210 <inverse+0x70>
nopw   0x0(%rax,%rax,1)
movsd  (%rsi,%rbp,8),%xmm0
movsd  %xmm0,(%rcx,%rbp,8)
movsd  0x8(%rsi,%rbp,8),%xmm0
movsd  %xmm0,0x8(%rcx,%rbp,8)
movsd  0x10(%rsi,%rbp,8),%xmm0
movsd  %xmm0,0x10(%rcx,%rbp,8)
movsd  0x18(%rsi,%rbp,8),%xmm0
movsd  %xmm0,0x18(%rcx,%rbp,8)
add    $0x4,%rbp
cmp    %rbp,%r11
jne    1280 <inverse+0xe0>
jmp    1210 <inverse+0x70>
nopl   0x0(%rax)
cmpq   $0xc,0x10(%rsp)
jae    12cc <inverse+0x12c>
xor    %ebp,%ebp
jmp    1338 <inverse+0x198>
mov    0x18(%rsp),%rdi
xor    %ebp,%ebp
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movups (%rsi,%rbp,8),%xmm0
movups 0x10(%rsi,%rbp,8),%xmm1
movups %xmm0,(%rcx,%rbp,8)
movups %xmm1,0x10(%rcx,%rbp,8)
movups 0x20(%rsi,%rbp,8),%xmm0
movups 0x30(%rsi,%rbp,8),%xmm1
movups %xmm0,0x20(%rcx,%rbp,8)
movups %xmm1,0x30(%rcx,%rbp,8)
movups 0x40(%rsi,%rbp,8),%xmm0
movups 0x50(%rsi,%rbp,8),%xmm1
movups %xmm0,0x40(%rcx,%rbp,8)
movups %xmm1,0x50(%rcx,%rbp,8)
movups 0x60(%rsi,%rbp,8),%xmm0
movups 0x70(%rsi,%rbp,8),%xmm1
movups %xmm0,0x60(%rcx,%rbp,8)
movups %xmm1,0x70(%rcx,%rbp,8)
add    $0x10,%rbp
add    $0xfffffffffffffffc,%rdi
jne    12e0 <inverse+0x140>
cmpq   $0x0,0x8(%rsp)
je     137c <inverse+0x1dc>
lea    (%rcx,%rbp,8),%rdi
add    $0x10,%rdi
lea    (%rsi,%rbp,8),%rbp
add    $0x10,%rbp
xor    %edx,%edx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movups -0x10(%rbp,%rdx,1),%xmm0
movups 0x0(%rbp,%rdx,1),%xmm1
movups %xmm0,-0x10(%rdi,%rdx,1)
movups %xmm1,(%rdi,%rdx,1)
add    $0x20,%rdx
cmp    %rdx,%r13
jne    1360 <inverse+0x1c0>
mov    %r10,%rbp
cmp    %r11,%r10
je     1210 <inverse+0x70>
jmp    1243 <inverse+0xa3>
mov    %r12d,%edi
mov    %rax,%r14
call   1080 <dvector@plt>
mov    %rax,%rbp
mov    %r12d,%edi
call   10b0 <ivector@plt>
mov    %rax,%r15
lea    0x30(%rsp),%rcx
mov    %r14,%rdi
mov    %r12d,%esi
mov    %rax,%rdx
call   1030 <ludcmp@plt>
test   %rax,%rax
je     13dd <inverse+0x23d>
mov    0x2c1b(%rip),%rax
mov    (%rax),%edi
lea    0xc32(%rip),%rsi
call   1060 <fprintf@plt>
mov    $0x1,%eax
jmp    1531 <inverse+0x391>
mov    %r15,0x8(%rsp)
mov    %r14,0x10(%rsp)
test   %r12d,%r12d
jle    150d <inverse+0x36d>
mov    %r12d,%r15d
lea    0x0(,%r15,8),%rax
mov    %rax,0x28(%rsp)
lea    -0x1(%r15),%rax
mov    %rax,0x20(%rsp)
mov    %r15d,%r13d
and    $0x3,%r13d
mov    %r15,0x18(%rsp)
and    $0xfffffffc,%r15d
xor    %r14d,%r14d
jmp    142f <inverse+0x28f>
xchg   %ax,%ax
add    $0x1,%r14
cmp    0x18(%rsp),%r14
je     150d <inverse+0x36d>
mov    %rbp,%rdi
xor    %esi,%esi
mov    0x28(%rsp),%rdx
call   1040 <memset@plt>
movabs $0x3ff0000000000000,%rax
mov    %rax,0x0(%rbp,%r14,8)
mov    0x10(%rsp),%rdi
mov    %r12d,%esi
mov    0x8(%rsp),%rdx
mov    %rbp,%rcx
call   1070 <lubksb@plt>
cmpq   $0x3,0x20(%rsp)
jae    1470 <inverse+0x2d0>
xor    %eax,%eax
jmp    14cc <inverse+0x32c>
xchg   %ax,%ax
xor    %eax,%eax
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movsd  0x0(%rbp,%rax,8),%xmm0
mov    (%rbx,%rax,8),%rcx
movsd  %xmm0,(%rcx,%r14,8)
movsd  0x8(%rbp,%rax,8),%xmm0
mov    0x8(%rbx,%rax,8),%rcx
movsd  %xmm0,(%rcx,%r14,8)
movsd  0x10(%rbp,%rax,8),%xmm0
mov    0x10(%rbx,%rax,8),%rcx
movsd  %xmm0,(%rcx,%r14,8)
movsd  0x18(%rbp,%rax,8),%xmm0
mov    0x18(%rbx,%rax,8),%rcx
movsd  %xmm0,(%rcx,%r14,8)
add    $0x4,%rax
cmp    %rax,%r15
jne    1480 <inverse+0x2e0>
test   %r13,%r13
je     1420 <inverse+0x280>
lea    (%rbx,%rax,8),%rcx
lea    0x0(,%rax,8),%rax
add    %rbp,%rax
xor    %edx,%edx
cs nopw 0x0(%rax,%rax,1)
movsd  (%rax,%rdx,8),%xmm0
mov    (%rcx,%rdx,8),%rsi
movsd  %xmm0,(%rsi,%r14,8)
add    $0x1,%rdx
cmp    %rdx,%r13
jne    14f0 <inverse+0x350>
jmp    1420 <inverse+0x280>
mov    %rbp,%rdi
call   10a0 <free_dvector@plt>
mov    0x8(%rsp),%rdi
call   1090 <free_ivector@plt>
mov    0x10(%rsp),%rdi
mov    %r12d,%esi
mov    %r12d,%edx
call   10c0 <free_dmatrix@plt>
xor    %eax,%eax
add    $0x38,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
@stderr = global i32 0
@.str = [23 x i8] c"inverse: ludcmp error\0A\00"
define i32 @inverse(double** nocapture %0, double** nocapture %1, i32 %2) {
%4 = alloca double
%5 = bitcast double* %4 to i8*
%6 = tail call double** @dmatrix(i32 %2, i32 %2)
%7 = icmp sgt i32 %2, 0
br i1 %7, label %8, label %142
8: ; preds = %3
%9 = zext i32 %2 to i64
%10 = and i64 %9, 4294967292
%11 = add nsw i64 %10, -4
%12 = lshr exact i64 %11, 2
%13 = add nuw nsw i64 %12, 1
%14 = icmp ult i32 %2, 4
%15 = and i64 %9, 4294967292
%16 = and i64 %13, 3
%17 = icmp ult i64 %11, 12
%18 = and i64 %13, 9223372036854775804
%19 = icmp eq i64 %16, 0
%20 = icmp eq i64 %15, %9
%21 = and i64 %9, 3
%22 = icmp eq i64 %21, 0
br label %23
23: ; preds = %139, %8
%24 = phi i64 [ 0, %8 ], [ %140, %139 ]
%25 = getelementptr inbounds double*, double** %0, i64 %24
%26 = load double*, double** %25
%27 = getelementptr inbounds double*, double** %6, i64 %24
%28 = load double*, double** %27
br i1 %14, label %104, label %29
29: ; preds = %23
%30 = getelementptr double, double* %28, i64 %9
%31 = getelementptr double, double* %26, i64 %9
%32 = icmp ult double* %28, %31
%33 = icmp ult double* %26, %30
%34 = and i1 %32, %33
br i1 %34, label %104, label %35
35: ; preds = %29
br i1 %17, label %85, label %36
36: ; preds = %35, %36
%37 = phi i64 [ %82, %36 ], [ 0, %35 ]
%38 = phi i64 [ %83, %36 ], [ 0, %35 ]
%39 = getelementptr inbounds double, double* %26, i64 %37
%40 = bitcast double* %39 to <2 x double>*
%41 = load <2 x double>, <2 x double>* %40
%42 = getelementptr inbounds double, double* %39, i64 2
%43 = bitcast double* %42 to <2 x double>*
%44 = load <2 x double>, <2 x double>* %43
%45 = getelementptr inbounds double, double* %28, i64 %37
%46 = bitcast double* %45 to <2 x double>*
store <2 x double> %41, <2 x double>* %46
%47 = getelementptr inbounds double, double* %45, i64 2
%48 = bitcast double* %47 to <2 x double>*
store <2 x double> %44, <2 x double>* %48
%49 = or i64 %37, 4
%50 = getelementptr inbounds double, double* %26, i64 %49
%51 = bitcast double* %50 to <2 x double>*
%52 = load <2 x double>, <2 x double>* %51
%53 = getelementptr inbounds double, double* %50, i64 2
%54 = bitcast double* %53 to <2 x double>*
%55 = load <2 x double>, <2 x double>* %54
%56 = getelementptr inbounds double, double* %28, i64 %49
%57 = bitcast double* %56 to <2 x double>*
store <2 x double> %52, <2 x double>* %57
%58 = getelementptr inbounds double, double* %56, i64 2
%59 = bitcast double* %58 to <2 x double>*
store <2 x double> %55, <2 x double>* %59
%60 = or i64 %37, 8
%61 = getelementptr inbounds double, double* %26, i64 %60
%62 = bitcast double* %61 to <2 x double>*
%63 = load <2 x double>, <2 x double>* %62
%64 = getelementptr inbounds double, double* %61, i64 2
%65 = bitcast double* %64 to <2 x double>*
%66 = load <2 x double>, <2 x double>* %65
%67 = getelementptr inbounds double, double* %28, i64 %60
%68 = bitcast double* %67 to <2 x double>*
store <2 x double> %63, <2 x double>* %68
%69 = getelementptr inbounds double, double* %67, i64 2
%70 = bitcast double* %69 to <2 x double>*
store <2 x double> %66, <2 x double>* %70
%71 = or i64 %37, 12
%72 = getelementptr inbounds double, double* %26, i64 %71
%73 = bitcast double* %72 to <2 x double>*
%74 = load <2 x double>, <2 x double>* %73
%75 = getelementptr inbounds double, double* %72, i64 2
%76 = bitcast double* %75 to <2 x double>*
%77 = load <2 x double>, <2 x double>* %76
%78 = getelementptr inbounds double, double* %28, i64 %71
%79 = bitcast double* %78 to <2 x double>*
store <2 x double> %74, <2 x double>* %79
%80 = getelementptr inbounds double, double* %78, i64 2
%81 = bitcast double* %80 to <2 x double>*
store <2 x double> %77, <2 x double>* %81
%82 = add nuw i64 %37, 16
%83 = add nuw i64 %38, 4
%84 = icmp eq i64 %83, %18
br i1 %84, label %85, label %36
85: ; preds = %36, %35
%86 = phi i64 [ 0, %35 ], [ %82, %36 ]
br i1 %19, label %103, label %87
87: ; preds = %85, %87
%88 = phi i64 [ %100, %87 ], [ %86, %85 ]
%89 = phi i64 [ %101, %87 ], [ 0, %85 ]
%90 = getelementptr inbounds double, double* %26, i64 %88
%91 = bitcast double* %90 to <2 x double>*
%92 = load <2 x double>, <2 x double>* %91
%93 = getelementptr inbounds double, double* %90, i64 2
%94 = bitcast double* %93 to <2 x double>*
%95 = load <2 x double>, <2 x double>* %94
%96 = getelementptr inbounds double, double* %28, i64 %88
%97 = bitcast double* %96 to <2 x double>*
store <2 x double> %92, <2 x double>* %97
%98 = getelementptr inbounds double, double* %96, i64 2
%99 = bitcast double* %98 to <2 x double>*
store <2 x double> %95, <2 x double>* %99
%100 = add nuw i64 %88, 4
%101 = add i64 %89, 1
%102 = icmp eq i64 %101, %16
br i1 %102, label %103, label %87
103: ; preds = %87, %85
br i1 %20, label %139, label %104
104: ; preds = %29, %23, %103
%105 = phi i64 [ 0, %29 ], [ 0, %23 ], [ %15, %103 ]
%106 = xor i64 %105, -1
%107 = add nsw i64 %106, %9
br i1 %22, label %117, label %108
108: ; preds = %104, %108
%109 = phi i64 [ %114, %108 ], [ %105, %104 ]
%110 = phi i64 [ %115, %108 ], [ 0, %104 ]
%111 = getelementptr inbounds double, double* %26, i64 %109
%112 = load double, double* %111
%113 = getelementptr inbounds double, double* %28, i64 %109
store double %112, double* %113
%114 = add nuw nsw i64 %109, 1
%115 = add i64 %110, 1
%116 = icmp eq i64 %115, %21
br i1 %116, label %117, label %108
117: ; preds = %108, %104
%118 = phi i64 [ %105, %104 ], [ %114, %108 ]
%119 = icmp ult i64 %107, 3
br i1 %119, label %139, label %120
120: ; preds = %117, %120
%121 = phi i64 [ %137, %120 ], [ %118, %117 ]
%122 = getelementptr inbounds double, double* %26, i64 %121
%123 = load double, double* %122
%124 = getelementptr inbounds double, double* %28, i64 %121
store double %123, double* %124
%125 = add nuw nsw i64 %121, 1
%126 = getelementptr inbounds double, double* %26, i64 %125
%127 = load double, double* %126
%128 = getelementptr inbounds double, double* %28, i64 %125
store double %127, double* %128
%129 = add nuw nsw i64 %121, 2
%130 = getelementptr inbounds double, double* %26, i64 %129
%131 = load double, double* %130
%132 = getelementptr inbounds double, double* %28, i64 %129
store double %131, double* %132
%133 = add nuw nsw i64 %121, 3
%134 = getelementptr inbounds double, double* %26, i64 %133
%135 = load double, double* %134
%136 = getelementptr inbounds double, double* %28, i64 %133
store double %135, double* %136
%137 = add nuw nsw i64 %121, 4
%138 = icmp eq i64 %137, %9
br i1 %138, label %139, label %120
139: ; preds = %117, %120, %103
%140 = add nuw nsw i64 %24, 1
%141 = icmp eq i64 %140, %9
br i1 %141, label %142, label %23
142: ; preds = %139, %3
%143 = tail call double* @dvector(i32 %2)
%144 = bitcast double* %143 to i8*
%145 = tail call i32* @ivector(i32 %2)
%146 = call i64 @ludcmp(double** %6, i32 %2, i32* %145, double* %4)
%147 = icmp eq i64 %146, 0
br i1 %147, label %148, label %157
148: ; preds = %142
br i1 %7, label %149, label %209
149: ; preds = %148
%150 = zext i32 %2 to i64
%151 = shl nuw nsw i64 %150, 3
%152 = add nsw i64 %150, -1
%153 = and i64 %150, 3
%154 = icmp ult i64 %152, 3
%155 = and i64 %150, 4294967292
%156 = icmp eq i64 %153, 0
br label %160
157: ; preds = %142
%158 = load i32, i32* @stderr
%159 = call i32 @fprintf(i32 %158, i8* getelementptr inbounds ([23 x i8], [23 x i8]* @.str, i64 0, i64 0))
br label %213
160: ; preds = %206, %149
%161 = phi i64 [ 0, %149 ], [ %207, %206 ]
%162 = getelementptr inbounds double, double* %143, i64 %161
store double 1.000000e+00, double* %162
%163 = call i32 @lubksb(double** %6, i32 %2, i32* %145, double* %143)
br i1 %154, label %193, label %164
164: ; preds = %160, %164
%165 = phi i64 [ %190, %164 ], [ 0, %160 ]
%166 = phi i64 [ %191, %164 ], [ 0, %160 ]
%167 = getelementptr inbounds double, double* %143, i64 %165
%168 = load double, double* %167
%169 = getelementptr inbounds double*, double** %1, i64 %165
%170 = load double*, double** %169
%171 = getelementptr inbounds double, double* %170, i64 %161
store double %168, double* %171
%172 = or i64 %165, 1
%173 = getelementptr inbounds double, double* %143, i64 %172
%174 = load double, double* %173
%175 = getelementptr inbounds double*, double** %1, i64 %172
%176 = load double*, double** %175
%177 = getelementptr inbounds double, double* %176, i64 %161
store double %174, double* %177
%178 = or i64 %165, 2
%179 = getelementptr inbounds double, double* %143, i64 %178
%180 = load double, double* %179
%181 = getelementptr inbounds double*, double** %1, i64 %178
%182 = load double*, double** %181
%183 = getelementptr inbounds double, double* %182, i64 %161
store double %180, double* %183
%184 = or i64 %165, 3
%185 = getelementptr inbounds double, double* %143, i64 %184
%186 = load double, double* %185
%187 = getelementptr inbounds double*, double** %1, i64 %184
%188 = load double*, double** %187
%189 = getelementptr inbounds double, double* %188, i64 %161
store double %186, double* %189
%190 = add nuw nsw i64 %165, 4
%191 = add i64 %166, 4
%192 = icmp eq i64 %191, %155
br i1 %192, label %193, label %164
193: ; preds = %164, %160
%194 = phi i64 [ 0, %160 ], [ %190, %164 ]
br i1 %156, label %206, label %195
195: ; preds = %193, %195
%196 = phi i64 [ %203, %195 ], [ %194, %193 ]
%197 = phi i64 [ %204, %195 ], [ 0, %193 ]
%198 = getelementptr inbounds double, double* %143, i64 %196
%199 = load double, double* %198
%200 = getelementptr inbounds double*, double** %1, i64 %196
%201 = load double*, double** %200
%202 = getelementptr inbounds double, double* %201, i64 %161
store double %199, double* %202
%203 = add nuw nsw i64 %196, 1
%204 = add i64 %197, 1
%205 = icmp eq i64 %204, %153
br i1 %205, label %206, label %195
206: ; preds = %195, %193
%207 = add nuw nsw i64 %161, 1
%208 = icmp eq i64 %207, %150
br i1 %208, label %209, label %160
209: ; preds = %206, %148
%210 = call i32 @free_dvector(double* %143)
%211 = call i32 @free_ivector(i32* %145)
%212 = call i32 @free_dmatrix(double** %6, i32 %2, i32 %2)
br label %213
213: ; preds = %209, %157
%214 = phi i32 [ 1, %157 ], [ 0, %209 ]
ret i32 %214
}