#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*/ cov_mat(double *, double *, int, int);
int /*<<< orphan*/ denormF(double *, double *, double *);
int /*<<< orphan*/ free(double *);
int /*<<< orphan*/ lap_eig(double *, double *, int);
int /*<<< orphan*/ lin_fm(double const *, double *, int const *, int);
int /*<<< orphan*/ lin_fmN(double const *, double *, int const *, int, double *,
                           double *);
scalar_t__ malloc(int);
int /*<<< orphan*/ normu(double const *, int const *, int, double *, double *);
int /*<<< orphan*/ singulF(double *);
int /*<<< orphan*/ svduv(double *, double *, double *, int, double *, int);
int /*<<< orphan*/ trnm(double *, int);
void u2f(const double *u, const int *inl, int len, double *F, double *buffer) {
  double A1[3], A2[3];
  double *Z, V[9 * 9], U[8 * 8], D[9], *p;
  int i, j;
  if (buffer == NULL)
    Z = (double *)malloc(sizeof(double) * 9 * len);
  else
    Z = buffer;
  if (len > 8) {
    normu(u, inl, len, A1, A2);
    lin_fmN(u, Z, inl, len, A1, A2);
    cov_mat(V, Z, len, 9);
    lap_eig(V, D, 9);
    trnm(V, 9);
  } else {
    lin_fm(u, Z, inl, len);
    svduv(D, Z, V, 9, U, 8);
  }
  if (len > 8) {
    j = 0;
    for (i = 1; i < 9; i++)
      if (D[i] < D[j])
        j = i;
    p = V + j;
  } else
    p = V + 8;
  for (i = 0; i < 9; i++) {
    F[i] = *p;
    p += 9;
  }
  singulF(F);
  if (len > 8)
    denormF(F, A1, A2);
  if (buffer == NULL)
    free(Z);
}


x86 assembly (clang, -O0):
<u2f>:
push   %rbp
mov    %rsp,%rbp
sub    $0x550,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
cmpq   $0x0,-0x28(%rbp)
jne    11f1 <u2f+0x41>
movslq -0x14(%rbp),%rax
imul   $0x48,%rax,%rax
mov    %eax,%edi
call   1090 <malloc@plt>
mov    %rax,-0x68(%rbp)
jmp    11f9 <u2f+0x49>
mov    -0x28(%rbp),%rax
mov    %rax,-0x68(%rbp)
cmpl   $0x8,-0x14(%rbp)
jle    127d <u2f+0xcd>
mov    -0x8(%rbp),%rdi
mov    -0x10(%rbp),%rsi
mov    -0x14(%rbp),%edx
lea    -0x40(%rbp),%rcx
lea    -0x60(%rbp),%r8
call   10b0 <normu@plt>
mov    -0x8(%rbp),%rdi
mov    -0x68(%rbp),%rsi
mov    -0x10(%rbp),%rdx
mov    -0x14(%rbp),%ecx
lea    -0x40(%rbp),%r8
lea    -0x60(%rbp),%r9
call   1050 <lin_fmN@plt>
lea    -0x2f0(%rbp),%rdi
mov    -0x68(%rbp),%rsi
mov    -0x14(%rbp),%edx
mov    $0x9,%ecx
call   10d0 <cov_mat@plt>
lea    -0x2f0(%rbp),%rdi
lea    -0x540(%rbp),%rsi
mov    $0x9,%edx
call   1070 <lap_eig@plt>
lea    -0x2f0(%rbp),%rdi
mov    $0x9,%esi
call   1060 <trnm@plt>
jmp    12ba <u2f+0x10a>
mov    -0x8(%rbp),%rdi
mov    -0x68(%rbp),%rsi
mov    -0x10(%rbp),%rdx
mov    -0x14(%rbp),%ecx
call   10c0 <lin_fm@plt>
lea    -0x540(%rbp),%rdi
mov    -0x68(%rbp),%rsi
lea    -0x2f0(%rbp),%rdx
lea    -0x4f0(%rbp),%r8
mov    $0x9,%ecx
mov    $0x8,%r9d
call   1080 <svduv@plt>
cmpl   $0x8,-0x14(%rbp)
jle    1355 <u2f+0x1a5>
movl   $0x0,-0x550(%rbp)
movl   $0x1,-0x54c(%rbp)
cmpl   $0x9,-0x54c(%rbp)
jge    1334 <u2f+0x184>
movslq -0x54c(%rbp),%rax
movsd  -0x540(%rbp,%rax,8),%xmm1
ff ff
movslq -0x550(%rbp),%rax
movsd  -0x540(%rbp,%rax,8),%xmm0
ff ff
ucomisd %xmm1,%xmm0
jbe    131b <u2f+0x16b>
mov    -0x54c(%rbp),%eax
mov    %eax,-0x550(%rbp)
jmp    1320 <u2f+0x170>
mov    -0x54c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x54c(%rbp)
jmp    12d8 <u2f+0x128>
lea    -0x2f0(%rbp),%rax
movslq -0x550(%rbp),%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    %rax,-0x548(%rbp)
jmp    1367 <u2f+0x1b7>
lea    -0x2f0(%rbp),%rax
add    $0x40,%rax
mov    %rax,-0x548(%rbp)
movl   $0x0,-0x54c(%rbp)
cmpl   $0x9,-0x54c(%rbp)
jge    13bf <u2f+0x20f>
mov    -0x548(%rbp),%rax
movsd  (%rax),%xmm0
mov    -0x20(%rbp),%rax
movslq -0x54c(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x548(%rbp),%rax
add    $0x48,%rax
mov    %rax,-0x548(%rbp)
mov    -0x54c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x54c(%rbp)
jmp    1371 <u2f+0x1c1>
mov    -0x20(%rbp),%rdi
call   10a0 <singulF@plt>
cmpl   $0x8,-0x14(%rbp)
jle    13e3 <u2f+0x233>
mov    -0x20(%rbp),%rdi
lea    -0x40(%rbp),%rsi
lea    -0x60(%rbp),%rdx
call   1040 <denormF@plt>
cmpq   $0x0,-0x28(%rbp)
jne    13f7 <u2f+0x247>
mov    -0x68(%rbp),%rdi
call   1030 <free@plt>
add    $0x550,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<u2f>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x528,%rsp
mov    %r8,%r14
mov    %rcx,%rbx
mov    %edx,%r12d
mov    %rsi,%r13
mov    %rdi,%rbp
mov    %r8,%r15
test   %r8,%r8
je     12e9 <u2f+0x139>
cmp    $0x9,%r12d
jl     1306 <u2f+0x156>
lea    0x70(%rsp),%rcx
lea    0x50(%rsp),%r8
mov    %rbp,%rdi
mov    %r13,%rsi
mov    %r12d,%edx
call   10b0 <normu@plt>
mov    %rbp,%rdi
mov    %r15,%rsi
mov    %r13,%rdx
mov    %r12d,%ecx
lea    0x70(%rsp),%r8
lea    0x50(%rsp),%r9
call   1050 <lin_fmN@plt>
lea    0x90(%rsp),%rbp
mov    %rbp,%rdi
mov    %r15,%rsi
mov    %r12d,%edx
mov    $0x9,%ecx
call   10d0 <cov_mat@plt>
mov    %rsp,%rsi
mov    %rbp,%rdi
mov    $0x9,%edx
call   1070 <lap_eig@plt>
mov    %rbp,%rdi
mov    $0x9,%esi
call   1060 <trnm@plt>
movsd  (%rsp),%xmm0
xor    %eax,%eax
ucomisd 0x8(%rsp),%xmm0
seta   %al
movsd  (%rsp,%rax,8),%xmm0
ucomisd 0x10(%rsp),%xmm0
mov    $0x2,%ecx
cmovbe %eax,%ecx
movsd  (%rsp,%rcx,8),%xmm0
ucomisd 0x18(%rsp),%xmm0
mov    $0x3,%eax
cmovbe %ecx,%eax
movsd  (%rsp,%rax,8),%xmm0
ucomisd 0x20(%rsp),%xmm0
mov    $0x4,%ecx
cmovbe %eax,%ecx
movsd  (%rsp,%rcx,8),%xmm0
ucomisd 0x28(%rsp),%xmm0
mov    $0x5,%eax
cmovbe %ecx,%eax
movsd  (%rsp,%rax,8),%xmm0
ucomisd 0x30(%rsp),%xmm0
mov    $0x6,%ecx
cmovbe %eax,%ecx
movsd  (%rsp,%rcx,8),%xmm0
ucomisd 0x38(%rsp),%xmm0
mov    $0x7,%edx
cmovbe %ecx,%edx
movsd  (%rsp,%rdx,8),%xmm0
ucomisd 0x40(%rsp),%xmm0
mov    $0x8,%eax
cmovbe %rdx,%rax
jmp    1342 <u2f+0x192>
lea    0x0(,%r12,8),%eax
lea    (%rax,%rax,8),%edi
call   1090 <malloc@plt>
mov    %rax,%r15
cmp    $0x9,%r12d
jge    11e6 <u2f+0x36>
mov    %rbp,%rdi
mov    %r15,%rsi
mov    %r13,%rdx
mov    %r12d,%ecx
call   10c0 <lin_fm@plt>
mov    %rsp,%rdi
lea    0x90(%rsp),%rdx
lea    0x320(%rsp),%r8
mov    %r15,%rsi
mov    $0x9,%ecx
mov    $0x8,%r9d
call   1080 <svduv@plt>
mov    $0x8,%eax
movsd  0x90(%rsp,%rax,8),%xmm0
movsd  %xmm0,(%rbx)
movsd  0xd8(%rsp,%rax,8),%xmm0
movsd  %xmm0,0x8(%rbx)
movsd  0x120(%rsp,%rax,8),%xmm0
movsd  %xmm0,0x10(%rbx)
movsd  0x168(%rsp,%rax,8),%xmm0
movsd  %xmm0,0x18(%rbx)
movsd  0x1b0(%rsp,%rax,8),%xmm0
movsd  %xmm0,0x20(%rbx)
movsd  0x1f8(%rsp,%rax,8),%xmm0
movsd  %xmm0,0x28(%rbx)
movsd  0x240(%rsp,%rax,8),%xmm0
movsd  %xmm0,0x30(%rbx)
movsd  0x288(%rsp,%rax,8),%xmm0
movsd  %xmm0,0x38(%rbx)
movsd  0x2d0(%rsp,%rax,8),%xmm0
movsd  %xmm0,0x40(%rbx)
mov    %rbx,%rdi
call   10a0 <singulF@plt>
cmp    $0x9,%r12d
jl     13df <u2f+0x22f>
lea    0x70(%rsp),%rsi
lea    0x50(%rsp),%rdx
mov    %rbx,%rdi
call   1040 <denormF@plt>
test   %r14,%r14
jne    13ec <u2f+0x23c>
mov    %r15,%rdi
call   1030 <free@plt>
add    $0x528,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @u2f(double* %0, i32* %1, i32 %2, double* %3, double* %4) {
%6 = alloca double*
%7 = alloca i32*
%8 = alloca i32
%9 = alloca double*
%10 = alloca double*
%11 = alloca [3 x double]
%12 = alloca [3 x double]
%13 = alloca double*
%14 = alloca [81 x double]
%15 = alloca [64 x double]
%16 = alloca [9 x double]
%17 = alloca double*
%18 = alloca i32
%19 = alloca i32
store double* %0, double** %6
store i32* %1, i32** %7
store i32 %2, i32* %8
store double* %3, double** %9
store double* %4, double** %10
%20 = load double*, double** %10
%21 = icmp eq double* %20, null
br i1 %21, label %22, label %29
22: ; preds = %5
%23 = load i32, i32* %8
%24 = sext i32 %23 to i64
%25 = mul i64 72, %24
%26 = trunc i64 %25 to i32
%27 = call i64 @malloc(i32 %26)
%28 = inttoptr i64 %27 to double*
store double* %28, double** %13
br label %31
29: ; preds = %5
%30 = load double*, double** %10
store double* %30, double** %13
br label %31
31: ; preds = %29, %22
%32 = load i32, i32* %8
%33 = icmp sgt i32 %32, 8
br i1 %33, label %34, label %57
34: ; preds = %31
%35 = load double*, double** %6
%36 = load i32*, i32** %7
%37 = load i32, i32* %8
%38 = getelementptr inbounds [3 x double], [3 x double]* %11, i64 0, i64 0
%39 = getelementptr inbounds [3 x double], [3 x double]* %12, i64 0, i64 0
%40 = call i32 @normu(double* %35, i32* %36, i32 %37, double* %38, double* %39)
%41 = load double*, double** %6
%42 = load double*, double** %13
%43 = load i32*, i32** %7
%44 = load i32, i32* %8
%45 = getelementptr inbounds [3 x double], [3 x double]* %11, i64 0, i64 0
%46 = getelementptr inbounds [3 x double], [3 x double]* %12, i64 0, i64 0
%47 = call i32 @lin_fmN(double* %41, double* %42, i32* %43, i32 %44, double* %45, double* %46)
%48 = getelementptr inbounds [81 x double], [81 x double]* %14, i64 0, i64 0
%49 = load double*, double** %13
%50 = load i32, i32* %8
%51 = call i32 @cov_mat(double* %48, double* %49, i32 %50, i32 9)
%52 = getelementptr inbounds [81 x double], [81 x double]* %14, i64 0, i64 0
%53 = getelementptr inbounds [9 x double], [9 x double]* %16, i64 0, i64 0
%54 = call i32 @lap_eig(double* %52, double* %53, i32 9)
%55 = getelementptr inbounds [81 x double], [81 x double]* %14, i64 0, i64 0
%56 = call i32 @trnm(double* %55, i32 9)
br label %68
57: ; preds = %31
%58 = load double*, double** %6
%59 = load double*, double** %13
%60 = load i32*, i32** %7
%61 = load i32, i32* %8
%62 = call i32 @lin_fm(double* %58, double* %59, i32* %60, i32 %61)
%63 = getelementptr inbounds [9 x double], [9 x double]* %16, i64 0, i64 0
%64 = load double*, double** %13
%65 = getelementptr inbounds [81 x double], [81 x double]* %14, i64 0, i64 0
%66 = getelementptr inbounds [64 x double], [64 x double]* %15, i64 0, i64 0
%67 = call i32 @svduv(double* %63, double* %64, double* %65, i32 9, double* %66, i32 8)
br label %68
68: ; preds = %57, %34
%69 = load i32, i32* %8
%70 = icmp sgt i32 %69, 8
br i1 %70, label %71, label %96
71: ; preds = %68
store i32 0, i32* %19
store i32 1, i32* %18
br label %72
72: ; preds = %88, %71
%73 = load i32, i32* %18
%74 = icmp slt i32 %73, 9
br i1 %74, label %75, label %91
75: ; preds = %72
%76 = load i32, i32* %18
%77 = sext i32 %76 to i64
%78 = getelementptr inbounds [9 x double], [9 x double]* %16, i64 0, i64 %77
%79 = load double, double* %78
%80 = load i32, i32* %19
%81 = sext i32 %80 to i64
%82 = getelementptr inbounds [9 x double], [9 x double]* %16, i64 0, i64 %81
%83 = load double, double* %82
%84 = fcmp olt double %79, %83
br i1 %84, label %85, label %87
85: ; preds = %75
%86 = load i32, i32* %18
store i32 %86, i32* %19
br label %87
87: ; preds = %85, %75
br label %88
88: ; preds = %87
%89 = load i32, i32* %18
%90 = add nsw i32 %89, 1
store i32 %90, i32* %18
br label %72
91: ; preds = %72
%92 = getelementptr inbounds [81 x double], [81 x double]* %14, i64 0, i64 0
%93 = load i32, i32* %19
%94 = sext i32 %93 to i64
%95 = getelementptr inbounds double, double* %92, i64 %94
store double* %95, double** %17
br label %99
96: ; preds = %68
%97 = getelementptr inbounds [81 x double], [81 x double]* %14, i64 0, i64 0
%98 = getelementptr inbounds double, double* %97, i64 8
store double* %98, double** %17
br label %99
99: ; preds = %96, %91
store i32 0, i32* %18
br label %100
100: ; preds = %112, %99
%101 = load i32, i32* %18
%102 = icmp slt i32 %101, 9
br i1 %102, label %103, label %115
103: ; preds = %100
%104 = load double*, double** %17
%105 = load double, double* %104
%106 = load double*, double** %9
%107 = load i32, i32* %18
%108 = sext i32 %107 to i64
%109 = getelementptr inbounds double, double* %106, i64 %108
store double %105, double* %109
%110 = load double*, double** %17
%111 = getelementptr inbounds double, double* %110, i64 9
store double* %111, double** %17
br label %112
112: ; preds = %103
%113 = load i32, i32* %18
%114 = add nsw i32 %113, 1
store i32 %114, i32* %18
br label %100
115: ; preds = %100
%116 = load double*, double** %9
%117 = call i32 @singulF(double* %116)
%118 = load i32, i32* %8
%119 = icmp sgt i32 %118, 8
br i1 %119, label %120, label %125
120: ; preds = %115
%121 = load double*, double** %9
%122 = getelementptr inbounds [3 x double], [3 x double]* %11, i64 0, i64 0
%123 = getelementptr inbounds [3 x double], [3 x double]* %12, i64 0, i64 0
%124 = call i32 @denormF(double* %121, double* %122, double* %123)
br label %125
125: ; preds = %120, %115
%126 = load double*, double** %10
%127 = icmp eq double* %126, null
br i1 %127, label %128, label %131
128: ; preds = %125
%129 = load double*, double** %13
%130 = call i32 @free(double* %129)
br label %131
131: ; preds = %128, %125
ret void
}

LLVM IR (-O2):
define void @u2f(double* %0, i32* %1, i32 %2, double* %3, double* %4) {
%6 = alloca [3 x double]
%7 = alloca [3 x double]
%8 = alloca [81 x double]
%9 = alloca [64 x double]
%10 = alloca [9 x double]
%11 = bitcast [3 x double]* %6 to i8*
%12 = bitcast [3 x double]* %7 to i8*
%13 = bitcast [81 x double]* %8 to i8*
%14 = bitcast [64 x double]* %9 to i8*
%15 = bitcast [9 x double]* %10 to i8*
%16 = icmp eq double* %4, null
br i1 %16, label %17, label %21
17: ; preds = %5
%18 = mul i32 %2, 72
%19 = tail call i64 @malloc(i32 %18)
%20 = inttoptr i64 %19 to double*
br label %21
21: ; preds = %5, %17
%22 = phi double* [ %20, %17 ], [ %4, %5 ]
%23 = icmp sgt i32 %2, 8
br i1 %23, label %24, label %89
24: ; preds = %21
%25 = getelementptr inbounds [3 x double], [3 x double]* %6, i64 0, i64 0
%26 = getelementptr inbounds [3 x double], [3 x double]* %7, i64 0, i64 0
%27 = call i32 @normu(double* %0, i32* %1, i32 %2, double* %25, double* %26)
%28 = call i32 @lin_fmN(double* %0, double* %22, i32* %1, i32 %2, double* %25, double* %26)
%29 = getelementptr inbounds [81 x double], [81 x double]* %8, i64 0, i64 0
%30 = call i32 @cov_mat(double* %29, double* %22, i32 %2, i32 9)
%31 = getelementptr inbounds [9 x double], [9 x double]* %10, i64 0, i64 0
%32 = call i32 @lap_eig(double* %29, double* %31, i32 9)
%33 = call i32 @trnm(double* %29, i32 9)
%34 = getelementptr inbounds [9 x double], [9 x double]* %10, i64 0, i64 1
%35 = load double, double* %34
%36 = load double, double* %31
%37 = fcmp olt double %35, %36
%38 = zext i1 %37 to i32
%39 = getelementptr inbounds [9 x double], [9 x double]* %10, i64 0, i64 2
%40 = load double, double* %39
%41 = zext i1 %37 to i64
%42 = getelementptr inbounds [9 x double], [9 x double]* %10, i64 0, i64 %41
%43 = load double, double* %42
%44 = fcmp olt double %40, %43
%45 = select i1 %44, i32 2, i32 %38
%46 = getelementptr inbounds [9 x double], [9 x double]* %10, i64 0, i64 3
%47 = load double, double* %46
%48 = zext i32 %45 to i64
%49 = getelementptr inbounds [9 x double], [9 x double]* %10, i64 0, i64 %48
%50 = load double, double* %49
%51 = fcmp olt double %47, %50
%52 = select i1 %51, i32 3, i32 %45
%53 = getelementptr inbounds [9 x double], [9 x double]* %10, i64 0, i64 4
%54 = load double, double* %53
%55 = zext i32 %52 to i64
%56 = getelementptr inbounds [9 x double], [9 x double]* %10, i64 0, i64 %55
%57 = load double, double* %56
%58 = fcmp olt double %54, %57
%59 = select i1 %58, i32 4, i32 %52
%60 = getelementptr inbounds [9 x double], [9 x double]* %10, i64 0, i64 5
%61 = load double, double* %60
%62 = zext i32 %59 to i64
%63 = getelementptr inbounds [9 x double], [9 x double]* %10, i64 0, i64 %62
%64 = load double, double* %63
%65 = fcmp olt double %61, %64
%66 = select i1 %65, i32 5, i32 %59
%67 = getelementptr inbounds [9 x double], [9 x double]* %10, i64 0, i64 6
%68 = load double, double* %67
%69 = zext i32 %66 to i64
%70 = getelementptr inbounds [9 x double], [9 x double]* %10, i64 0, i64 %69
%71 = load double, double* %70
%72 = fcmp olt double %68, %71
%73 = select i1 %72, i32 6, i32 %66
%74 = getelementptr inbounds [9 x double], [9 x double]* %10, i64 0, i64 7
%75 = load double, double* %74
%76 = zext i32 %73 to i64
%77 = getelementptr inbounds [9 x double], [9 x double]* %10, i64 0, i64 %76
%78 = load double, double* %77
%79 = fcmp olt double %75, %78
%80 = select i1 %79, i32 7, i32 %73
%81 = getelementptr inbounds [9 x double], [9 x double]* %10, i64 0, i64 8
%82 = load double, double* %81
%83 = zext i32 %80 to i64
%84 = getelementptr inbounds [9 x double], [9 x double]* %10, i64 0, i64 %83
%85 = load double, double* %84
%86 = fcmp olt double %82, %85
%87 = zext i32 %80 to i64
%88 = select i1 %86, i64 8, i64 %87
br label %95
89: ; preds = %21
%90 = tail call i32 @lin_fm(double* %0, double* %22, i32* %1, i32 %2)
%91 = getelementptr inbounds [9 x double], [9 x double]* %10, i64 0, i64 0
%92 = getelementptr inbounds [81 x double], [81 x double]* %8, i64 0, i64 0
%93 = getelementptr inbounds [64 x double], [64 x double]* %9, i64 0, i64 0
%94 = call i32 @svduv(double* %91, double* %22, double* %92, i32 9, double* %93, i32 8)
br label %95
95: ; preds = %89, %24
%96 = phi i64 [ 8, %89 ], [ %88, %24 ]
%97 = getelementptr inbounds [81 x double], [81 x double]* %8, i64 0, i64 %96
%98 = load double, double* %97
store double %98, double* %3
%99 = getelementptr inbounds double, double* %97, i64 9
%100 = load double, double* %99
%101 = getelementptr inbounds double, double* %3, i64 1
store double %100, double* %101
%102 = getelementptr inbounds double, double* %97, i64 18
%103 = load double, double* %102
%104 = getelementptr inbounds double, double* %3, i64 2
store double %103, double* %104
%105 = getelementptr inbounds double, double* %97, i64 27
%106 = load double, double* %105
%107 = getelementptr inbounds double, double* %3, i64 3
store double %106, double* %107
%108 = getelementptr inbounds double, double* %97, i64 36
%109 = load double, double* %108
%110 = getelementptr inbounds double, double* %3, i64 4
store double %109, double* %110
%111 = getelementptr inbounds double, double* %97, i64 45
%112 = load double, double* %111
%113 = getelementptr inbounds double, double* %3, i64 5
store double %112, double* %113
%114 = getelementptr inbounds double, double* %97, i64 54
%115 = load double, double* %114
%116 = getelementptr inbounds double, double* %3, i64 6
store double %115, double* %116
%117 = getelementptr inbounds double, double* %97, i64 63
%118 = load double, double* %117
%119 = getelementptr inbounds double, double* %3, i64 7
store double %118, double* %119
%120 = getelementptr inbounds double, double* %97, i64 72
%121 = load double, double* %120
%122 = getelementptr inbounds double, double* %3, i64 8
store double %121, double* %122
%123 = call i32 @singulF(double* %3)
br i1 %23, label %124, label %128
124: ; preds = %95
%125 = getelementptr inbounds [3 x double], [3 x double]* %6, i64 0, i64 0
%126 = getelementptr inbounds [3 x double], [3 x double]* %7, i64 0, i64 0
%127 = call i32 @denormF(double* %3, double* %125, double* %126)
br label %128
128: ; preds = %124, %95
br i1 %16, label %129, label %131
129: ; preds = %128
%130 = call i32 @free(double* %22)
br label %131
131: ; preds = %129, %128
ret void
}