#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*/ exit(int);
double fabs(double);
int /*<<< orphan*/ fprintf(int /*<<< orphan*/, char *, char const *);
double pythagoras(double, double);
int /*<<< orphan*/ stderr;
void eigen_solution_of_triangular_matrix(double *d, double *e, int n,
                                         double **a, const char *prompt) {
  int i, k, l, m, iter;
  double b, c, f, g, p, r, s;
  static const double eps = 1e-6;
  for (i = 1; i < n; i++)
    e[i - 1] = e[i];
  e[n - 1] = 0;
  for (l = 0; l < n; l++) {
    iter = 0;
    while (1) {
      for (m = l; m < n - 1; m++)
        if (fabs(e[m]) <= eps * (fabs(d[m]) + fabs(d[m + 1])))
          break;
      if (m == l) {
        break;
      }
      iter++;
      if (iter == 1000) {
        fprintf(stderr,
                "%s: ERROR! Too many iterations while"
                " determining the eigensolution!\n",
                prompt);
        exit(1);
      }
      g = (d[l + 1] - d[l]) / (2 * e[l]);
      r = pythagoras(g, 1);
      g = d[m] - d[l] +
          e[l] / (g + (fabs(g) > 0 ? (g >= 0 ? fabs(r) : -fabs(r)) : r));
      s = c = 1;
      p = 0;
      for (i = m - 1; i >= l; i--) {
        f = s * e[i];
        b = c * e[i];
        e[i + 1] = r = pythagoras(f, g);
        if ((((r) != (r)) || ((0.) != (0.))
                 ? (((r) != (r)) && ((0.) != (0.)) ? 1 : 0)
                 : !(r < 0. || 0. < r))) {
          d[i + 1] -= p;
          e[m] = 0;
          break;
        }
        s = f / r;
        c = g / r;
        g = d[i + 1] - p;
        r = (d[i] - g) * s + 2 * c * b;
        p = s * r;
        d[i + 1] = g + p;
        g = c * r - b;
        for (k = 0; k < n; k++) {
          f = a[k][i + 1];
          a[k][i + 1] = s * a[k][i] + c * f;
          a[k][i] = c * a[k][i] - s * f;
        }
      }
      if ((((r) != (r)) || ((0.) != (0.))
               ? (((r) != (r)) && ((0.) != (0.)) ? 1 : 0)
               : !(r < 0. || 0. < r)) &&
          i >= l)
        continue;
      d[l] -= p;
      e[l] = g;
      e[m] = 0;
    }
  }
}


x86 assembly (clang, -O0):
<eigen_solution_of_triangular_matrix>:
push   %rbp
mov    %rsp,%rbp
sub    $0xa0,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
movl   $0x1,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    118e <eigen_solution_of_triangular_matrix+0x5e>
mov    -0x10(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x2c(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1155 <eigen_solution_of_triangular_matrix+0x25>
mov    -0x10(%rbp),%rax
mov    -0x14(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
movl   $0x0,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    17e8 <eigen_solution_of_triangular_matrix+0x6b8>
movl   $0x0,-0x3c(%rbp)
mov    -0x34(%rbp),%eax
mov    %eax,-0x38(%rbp)
mov    -0x38(%rbp),%eax
mov    -0x14(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jge    1253 <eigen_solution_of_triangular_matrix+0x123>
mov    -0x10(%rbp),%rax
movslq -0x38(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
movaps 0xe38(%rip),%xmm0
pand   %xmm0,%xmm1
mov    -0x8(%rbp),%rax
movslq -0x38(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
movaps 0xe20(%rip),%xmm0
pand   %xmm0,%xmm2
mov    -0x8(%rbp),%rax
mov    -0x38(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movaps 0xe03(%rip),%xmm3
pand   %xmm3,%xmm0
addsd  %xmm0,%xmm2
movsd  0xdd3(%rip),%xmm0
mulsd  %xmm2,%xmm0
ucomisd %xmm1,%xmm0
jb     1240 <eigen_solution_of_triangular_matrix+0x110>
jmp    1253 <eigen_solution_of_triangular_matrix+0x123>
jmp    1245 <eigen_solution_of_triangular_matrix+0x115>
mov    -0x38(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x38(%rbp)
jmp    11c3 <eigen_solution_of_triangular_matrix+0x93>
mov    -0x38(%rbp),%eax
cmp    -0x34(%rbp),%eax
jne    1264 <eigen_solution_of_triangular_matrix+0x134>
jmp    17d5 <eigen_solution_of_triangular_matrix+0x6a5>
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
cmpl   $0x3e8,-0x3c(%rbp)
jne    129d <eigen_solution_of_triangular_matrix+0x16d>
mov    0x2d5f(%rip),%rax
mov    (%rax),%edi
mov    -0x28(%rbp),%rdx
lea    0xdaa(%rip),%rsi
call   1030 <fprintf@plt>
mov    $0x1,%edi
call   1040 <exit@plt>
mov    -0x8(%rbp),%rax
mov    -0x34(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x34(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  0xd44(%rip),%xmm1
mulsd  (%rax,%rcx,8),%xmm1
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x60(%rbp)
movsd  -0x60(%rbp),%xmm0
movsd  0xd21(%rip),%xmm1
call   1050 <pythagoras@plt>
movsd  %xmm0,-0x70(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x38(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x34(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x90(%rbp)
ff
mov    -0x10(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x88(%rbp)
ff
movsd  -0x60(%rbp),%xmm0
movsd  %xmm0,-0x80(%rbp)
movsd  -0x60(%rbp),%xmm0
movaps 0xce2(%rip),%xmm1
pand   %xmm1,%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jbe    13c2 <eigen_solution_of_triangular_matrix+0x292>
movsd  -0x60(%rbp),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jb     137e <eigen_solution_of_triangular_matrix+0x24e>
movsd  -0x70(%rbp),%xmm0
movaps 0xcb3(%rip),%xmm1
pand   %xmm1,%xmm0
movsd  %xmm0,-0x98(%rbp)
ff
jmp    13ad <eigen_solution_of_triangular_matrix+0x27d>
movsd  -0x70(%rbp),%xmm0
movaps 0xc96(%rip),%xmm1
pand   %xmm1,%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x98(%rbp)
ff
movsd  -0x98(%rbp),%xmm0
ff
movsd  %xmm0,-0xa0(%rbp)
ff
jmp    13cf <eigen_solution_of_triangular_matrix+0x29f>
movsd  -0x70(%rbp),%xmm0
movsd  %xmm0,-0xa0(%rbp)
ff
movsd  -0x90(%rbp),%xmm0
ff
movsd  -0x88(%rbp),%xmm1
ff
movsd  -0x80(%rbp),%xmm2
movsd  -0xa0(%rbp),%xmm3
ff
addsd  %xmm3,%xmm2
divsd  %xmm2,%xmm1
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x60(%rbp)
movsd  0xc03(%rip),%xmm0
movsd  %xmm0,-0x50(%rbp)
movsd  0xbf6(%rip),%xmm0
movsd  %xmm0,-0x78(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x68(%rbp)
mov    -0x38(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x34(%rbp),%eax
jl     16ff <eigen_solution_of_triangular_matrix+0x5cf>
movsd  -0x78(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mulsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x58(%rbp)
movsd  -0x50(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mulsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x48(%rbp)
movsd  -0x58(%rbp),%xmm0
movsd  -0x60(%rbp),%xmm1
call   1050 <pythagoras@plt>
movsd  %xmm0,-0x70(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x2c(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x70(%rbp),%xmm0
ucomisd -0x70(%rbp),%xmm0
jne    14a3 <eigen_solution_of_triangular_matrix+0x373>
jp     14a3 <eigen_solution_of_triangular_matrix+0x373>
jmp    14eb <eigen_solution_of_triangular_matrix+0x3bb>
movsd  -0x70(%rbp),%xmm0
ucomisd -0x70(%rbp),%xmm0
jne    14be <eigen_solution_of_triangular_matrix+0x38e>
jp     14be <eigen_solution_of_triangular_matrix+0x38e>
jmp    14dc <eigen_solution_of_triangular_matrix+0x3ac>
xor    %eax,%eax
test   $0x1,%al
jne    14cd <eigen_solution_of_triangular_matrix+0x39d>
jmp    14dc <eigen_solution_of_triangular_matrix+0x3ac>
mov    $0x1,%al
test   $0x1,%al
jne    150b <eigen_solution_of_triangular_matrix+0x3db>
jmp    1540 <eigen_solution_of_triangular_matrix+0x410>
xor    %eax,%eax
test   $0x1,%al
jne    150b <eigen_solution_of_triangular_matrix+0x3db>
jmp    1540 <eigen_solution_of_triangular_matrix+0x410>
xorps  %xmm0,%xmm0
ucomisd -0x70(%rbp),%xmm0
ja     1540 <eigen_solution_of_triangular_matrix+0x410>
movsd  -0x70(%rbp),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
ja     1540 <eigen_solution_of_triangular_matrix+0x410>
movsd  -0x68(%rbp),%xmm1
mov    -0x8(%rbp),%rax
mov    -0x2c(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
subsd  %xmm1,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x10(%rbp),%rax
movslq -0x38(%rbp),%rcx
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
jmp    16ff <eigen_solution_of_triangular_matrix+0x5cf>
movsd  -0x58(%rbp),%xmm0
divsd  -0x70(%rbp),%xmm0
movsd  %xmm0,-0x78(%rbp)
movsd  -0x60(%rbp),%xmm0
divsd  -0x70(%rbp),%xmm0
movsd  %xmm0,-0x50(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x2c(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
subsd  -0x68(%rbp),%xmm0
movsd  %xmm0,-0x60(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
subsd  -0x60(%rbp),%xmm0
movsd  -0x78(%rbp),%xmm2
movsd  0xa77(%rip),%xmm1
mulsd  -0x50(%rbp),%xmm1
mulsd  -0x48(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x70(%rbp)
movsd  -0x78(%rbp),%xmm0
mulsd  -0x70(%rbp),%xmm0
movsd  %xmm0,-0x68(%rbp)
movsd  -0x60(%rbp),%xmm0
addsd  -0x68(%rbp),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x2c(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x50(%rbp),%xmm0
movsd  -0x70(%rbp),%xmm2
movsd  -0x48(%rbp),%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x60(%rbp)
movl   $0x0,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    16ec <eigen_solution_of_triangular_matrix+0x5bc>
mov    -0x20(%rbp),%rax
movslq -0x30(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    -0x2c(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x58(%rbp)
movsd  -0x78(%rbp),%xmm0
mov    -0x20(%rbp),%rax
movslq -0x30(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x2c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x50(%rbp),%xmm1
mulsd  -0x58(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x20(%rbp),%rax
movslq -0x30(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    -0x2c(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x50(%rbp),%xmm0
mov    -0x20(%rbp),%rax
movslq -0x30(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x2c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x78(%rbp),%xmm1
mulsd  -0x58(%rbp),%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x20(%rbp),%rax
movslq -0x30(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x2c(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    1615 <eigen_solution_of_triangular_matrix+0x4e5>
jmp    16f1 <eigen_solution_of_triangular_matrix+0x5c1>
mov    -0x2c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x2c(%rbp)
jmp    1428 <eigen_solution_of_triangular_matrix+0x2f8>
movsd  -0x70(%rbp),%xmm0
ucomisd -0x70(%rbp),%xmm0
jne    171a <eigen_solution_of_triangular_matrix+0x5ea>
jp     171a <eigen_solution_of_triangular_matrix+0x5ea>
jmp    1762 <eigen_solution_of_triangular_matrix+0x632>
movsd  -0x70(%rbp),%xmm0
ucomisd -0x70(%rbp),%xmm0
jne    1735 <eigen_solution_of_triangular_matrix+0x605>
jp     1735 <eigen_solution_of_triangular_matrix+0x605>
jmp    1753 <eigen_solution_of_triangular_matrix+0x623>
xor    %eax,%eax
test   $0x1,%al
jne    1744 <eigen_solution_of_triangular_matrix+0x614>
jmp    1753 <eigen_solution_of_triangular_matrix+0x623>
mov    $0x1,%al
test   $0x1,%al
jne    1782 <eigen_solution_of_triangular_matrix+0x652>
jmp    1793 <eigen_solution_of_triangular_matrix+0x663>
xor    %eax,%eax
test   $0x1,%al
jne    1782 <eigen_solution_of_triangular_matrix+0x652>
jmp    1793 <eigen_solution_of_triangular_matrix+0x663>
xorps  %xmm0,%xmm0
ucomisd -0x70(%rbp),%xmm0
ja     1793 <eigen_solution_of_triangular_matrix+0x663>
movsd  -0x70(%rbp),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
ja     1793 <eigen_solution_of_triangular_matrix+0x663>
mov    -0x2c(%rbp),%eax
cmp    -0x34(%rbp),%eax
jl     1793 <eigen_solution_of_triangular_matrix+0x663>
jmp    11bd <eigen_solution_of_triangular_matrix+0x8d>
movsd  -0x68(%rbp),%xmm1
mov    -0x8(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
subsd  %xmm1,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x60(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x10(%rbp),%rax
movslq -0x38(%rbp),%rcx
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
jmp    11bd <eigen_solution_of_triangular_matrix+0x8d>
jmp    17da <eigen_solution_of_triangular_matrix+0x6aa>
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    11aa <eigen_solution_of_triangular_matrix+0x7a>
add    $0xa0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<eigen_solution_of_triangular_matrix>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x98,%rsp
mov    %rcx,%rbx
mov    %rsi,%r12
mov    %rdi,%r13
cmp    $0x2,%edx
mov    %r8,0x50(%rsp)
mov    %rdx,0x30(%rsp)
jl     1190 <eigen_solution_of_triangular_matrix+0x50>
lea    0x8(%r12),%rsi
lea    -0x1(%rdx),%ebp
lea    0x0(,%rbp,8),%rdx
mov    %r12,%rdi
call   1040 <memmove@plt>
mov    %rbp,0x10(%rsp)
movq   $0x0,(%r12,%rbp,8)
jmp    11ac <eigen_solution_of_triangular_matrix+0x6c>
movslq %edx,%rax
movq   $0x0,-0x8(%r12,%rax,8)
xor    %eax,%eax
mov    %rax,0x10(%rsp)
cmp    $0x1,%edx
jne    1559 <eigen_solution_of_triangular_matrix+0x419>
mov    0x30(%rsp),%r14d
mov    %r14,0x38(%rsp)
and    $0xfffffffe,%r14d
movq   $0xffffffffffffffff,0x28(%rsp)
ff ff
xor    %ebp,%ebp
movdqa 0xe33(%rip),%xmm3
movsd  0xe4b(%rip),%xmm4
jmp    11f9 <eigen_solution_of_triangular_matrix+0xb9>
nopw   0x0(%rax,%rax,1)
addq   $0x1,0x28(%rsp)
mov    0x20(%rsp),%rax
mov    %rax,%rbp
cmp    0x38(%rsp),%rax
je     1559 <eigen_solution_of_triangular_matrix+0x419>
mov    0x10(%rsp),%rax
cmp    %eax,%ebp
cmovg  %ebp,%eax
mov    %rax,0x58(%rsp)
mov    %rax,%rdx
neg    %rdx
lea    0x1(%rbp),%rax
mov    %rax,0x20(%rsp)
xor    %r15d,%r15d
mov    %rdx,0x18(%rsp)
jmp    126e <eigen_solution_of_triangular_matrix+0x12e>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsd  0x0(%r13,%rbp,8),%xmm0
subsd  %xmm6,%xmm0
movsd  %xmm0,0x0(%r13,%rbp,8)
movsd  %xmm1,(%r12,%rbp,8)
mov    (%rsp),%rax
movq   $0x0,(%r12,%rax,8)
movdqa 0xda4(%rip),%xmm3
movsd  0xdbc(%rip),%xmm4
mov    0x18(%rsp),%rdx
mov    0xc(%rsp),%r15d
mov    0x28(%rsp),%rax
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
lea    (%rdx,%rax,1),%rcx
cmp    $0xffffffffffffffff,%rcx
je     12d0 <eigen_solution_of_triangular_matrix+0x190>
movq   0x8(%r12,%rax,8),%xmm0
pand   %xmm3,%xmm0
movdqu 0x8(%r13,%rax,8),%xmm1
pand   %xmm3,%xmm1
pshufd $0xee,%xmm1,%xmm2
addsd  %xmm1,%xmm2
mulsd  %xmm4,%xmm2
add    $0x1,%rax
ucomisd %xmm0,%xmm2
jb     1280 <eigen_solution_of_triangular_matrix+0x140>
mov    %eax,%eax
cmp    %rbp,%rax
jne    12de <eigen_solution_of_triangular_matrix+0x19e>
jmp    11e0 <eigen_solution_of_triangular_matrix+0xa0>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
mov    0x58(%rsp),%rax
cmp    %rbp,%rax
je     11e0 <eigen_solution_of_triangular_matrix+0xa0>
add    $0x1,%r15d
cmp    $0x3e8,%r15d
je     156b <eigen_solution_of_triangular_matrix+0x42b>
mov    %rax,(%rsp)
mov    0x20(%rsp),%rax
movsd  0x0(%r13,%rax,8),%xmm0
subsd  0x0(%r13,%rbp,8),%xmm0
movsd  (%r12,%rbp,8),%xmm1
addsd  %xmm1,%xmm1
divsd  %xmm1,%xmm0
movsd  %xmm0,0x40(%rsp)
movsd  0xd06(%rip),%xmm1
call   1060 <pythagoras@plt>
movsd  0x40(%rsp),%xmm3
ucomisd 0xcfb(%rip),%xmm3
je     1349 <eigen_solution_of_triangular_matrix+0x209>
andpd  0xcc1(%rip),%xmm0
jae    1349 <eigen_solution_of_triangular_matrix+0x209>
xorpd  0xcc7(%rip),%xmm0
mov    (%rsp),%rax
movsd  0x0(%r13,%rax,8),%xmm2
subsd  0x0(%r13,%rbp,8),%xmm2
movsd  (%r12,%rbp,8),%xmm1
addsd  %xmm0,%xmm3
divsd  %xmm3,%xmm1
addsd  %xmm2,%xmm1
xorpd  %xmm6,%xmm6
cmp    %rbp,%rax
mov    %r15d,0xc(%rsp)
jbe    1230 <eigen_solution_of_triangular_matrix+0xf0>
xorpd  %xmm6,%xmm6
movsd  0xc9d(%rip),%xmm2
movapd %xmm2,%xmm0
movapd %xmm2,%xmm5
jmp    13b2 <eigen_solution_of_triangular_matrix+0x272>
cs nopw 0x0(%rax,%rax,1)
nop
mulsd  %xmm5,%xmm1
subsd  %xmm8,%xmm1
cmp    %rbp,%rax
jle    1230 <eigen_solution_of_triangular_matrix+0xf0>
movapd %xmm1,0x80(%rsp)
movsd  %xmm5,0x68(%rsp)
movapd %xmm6,0x40(%rsp)
mov    %rax,%r15
movsd  -0x8(%r12,%rax,8),%xmm2
movsd  %xmm2,0x60(%rsp)
mulsd  %xmm2,%xmm0
movapd %xmm0,0x70(%rsp)
call   1060 <pythagoras@plt>
movsd  %xmm0,(%r12,%r15,8)
ucomisd 0xc3c(%rip),%xmm0
jne    13fc <eigen_solution_of_triangular_matrix+0x2bc>
jnp    1540 <eigen_solution_of_triangular_matrix+0x400>
lea    -0x1(%r15),%rax
movsd  0x68(%rsp),%xmm8
mulsd  0x60(%rsp),%xmm8
movapd 0x80(%rsp),%xmm5
unpcklpd 0x70(%rsp),%xmm5
unpcklpd %xmm0,%xmm0
divpd  %xmm0,%xmm5
movsd  0x0(%r13,%r15,8),%xmm3
subsd  0x40(%rsp),%xmm3
movsd  0x0(%r13,%rax,8),%xmm1
subsd  %xmm3,%xmm1
movapd %xmm5,%xmm2
addsd  %xmm5,%xmm2
mulsd  %xmm8,%xmm2
movapd %xmm5,%xmm0
unpckhpd %xmm5,%xmm0
mulsd  %xmm0,%xmm1
addsd  %xmm2,%xmm1
movapd %xmm0,%xmm6
mulsd  %xmm1,%xmm6
addsd  %xmm6,%xmm3
movsd  %xmm3,0x0(%r13,%r15,8)
movapd %xmm0,%xmm7
xorpd  0xb97(%rip),%xmm7
cmpl   $0x1,0x30(%rsp)
jne    1490 <eigen_solution_of_triangular_matrix+0x350>
xor    %ecx,%ecx
jmp    14fa <eigen_solution_of_triangular_matrix+0x3ba>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movapd %xmm7,%xmm2
unpcklpd %xmm5,%xmm2
xor    %ecx,%ecx
nopw   0x0(%rax,%rax,1)
mov    (%rbx,%rcx,8),%rdx
movsd  (%rdx,%r15,8),%xmm3
unpcklpd %xmm3,%xmm3
mulpd  %xmm2,%xmm3
movsd  (%rdx,%rax,8),%xmm4
unpcklpd %xmm4,%xmm4
mulpd  %xmm5,%xmm4
addpd  %xmm3,%xmm4
movupd %xmm4,(%rdx,%rax,8)
mov    0x8(%rbx,%rcx,8),%rdx
movsd  (%rdx,%r15,8),%xmm3
unpcklpd %xmm3,%xmm3
mulpd  %xmm2,%xmm3
movsd  (%rdx,%rax,8),%xmm4
unpcklpd %xmm4,%xmm4
mulpd  %xmm5,%xmm4
addpd  %xmm3,%xmm4
movupd %xmm4,(%rdx,%rax,8)
add    $0x2,%rcx
cmp    %rcx,%r14
jne    14a0 <eigen_solution_of_triangular_matrix+0x360>
testb  $0x1,0x38(%rsp)
je     13a0 <eigen_solution_of_triangular_matrix+0x260>
mov    (%rbx,%rcx,8),%rcx
movsd  (%rcx,%r15,8),%xmm2
unpcklpd %xmm2,%xmm2
unpcklpd %xmm5,%xmm7
mulpd  %xmm2,%xmm7
movsd  (%rcx,%rax,8),%xmm2
unpcklpd %xmm2,%xmm2
mulpd  %xmm5,%xmm2
addpd  %xmm7,%xmm2
movupd %xmm2,(%rcx,%rax,8)
jmp    13a0 <eigen_solution_of_triangular_matrix+0x260>
cs nopw 0x0(%rax,%rax,1)
movsd  0x0(%r13,%r15,8),%xmm0
subsd  0x40(%rsp),%xmm0
movsd  %xmm0,0x0(%r13,%r15,8)
jmp    1248 <eigen_solution_of_triangular_matrix+0x108>
add    $0x98,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
mov    0x2a6e(%rip),%rax
mov    (%rax),%edi
lea    0xabd(%rip),%rsi
mov    0x50(%rsp),%rdx
call   1030 <fprintf@plt>
mov    $0x1,%edi
call   1050 <exit@plt>

LLVM IR (-O0):
@eigen_solution_of_triangular_matrix.eps = internal constant double 0x3EB0C6F7A0B5ED8D
@stderr = global i32 0
@.str = [69 x i8] c"%s: ERROR! Too many iterations while determining the eigensolution!\0A\00"
define void @eigen_solution_of_triangular_matrix(double* %0, double* %1, i32 %2, double** %3, i8* %4) {
%6 = alloca double*
%7 = alloca double*
%8 = alloca i32
%9 = alloca double**
%10 = alloca i8*
%11 = alloca i32
%12 = alloca i32
%13 = alloca i32
%14 = alloca i32
%15 = alloca i32
%16 = alloca double
%17 = alloca double
%18 = alloca double
%19 = alloca double
%20 = alloca double
%21 = alloca double
%22 = alloca double
store double* %0, double** %6
store double* %1, double** %7
store i32 %2, i32* %8
store double** %3, double*** %9
store i8* %4, i8** %10
store i32 1, i32* %11
br label %23
23: ; preds = %38, %5
%24 = load i32, i32* %11
%25 = load i32, i32* %8
%26 = icmp slt i32 %24, %25
br i1 %26, label %27, label %41
27: ; preds = %23
%28 = load double*, double** %7
%29 = load i32, i32* %11
%30 = sext i32 %29 to i64
%31 = getelementptr inbounds double, double* %28, i64 %30
%32 = load double, double* %31
%33 = load double*, double** %7
%34 = load i32, i32* %11
%35 = sub nsw i32 %34, 1
%36 = sext i32 %35 to i64
%37 = getelementptr inbounds double, double* %33, i64 %36
store double %32, double* %37
br label %38
38: ; preds = %27
%39 = load i32, i32* %11
%40 = add nsw i32 %39, 1
store i32 %40, i32* %11
br label %23
41: ; preds = %23
%42 = load double*, double** %7
%43 = load i32, i32* %8
%44 = sub nsw i32 %43, 1
%45 = sext i32 %44 to i64
%46 = getelementptr inbounds double, double* %42, i64 %45
store double 0.000000e+00, double* %46
store i32 0, i32* %13
br label %47
47: ; preds = %373, %41
%48 = load i32, i32* %13
%49 = load i32, i32* %8
%50 = icmp slt i32 %48, %49
br i1 %50, label %51, label %376
51: ; preds = %47
store i32 0, i32* %15
br label %52
52: ; preds = %51, %354, %355
%53 = load i32, i32* %13
store i32 %53, i32* %14
br label %54
54: ; preds = %84, %52
%55 = load i32, i32* %14
%56 = load i32, i32* %8
%57 = sub nsw i32 %56, 1
%58 = icmp slt i32 %55, %57
br i1 %58, label %59, label %87
59: ; preds = %54
%60 = load double*, double** %7
%61 = load i32, i32* %14
%62 = sext i32 %61 to i64
%63 = getelementptr inbounds double, double* %60, i64 %62
%64 = load double, double* %63
%65 = call double @llvm.fabs.f64(double %64)
%66 = load double*, double** %6
%67 = load i32, i32* %14
%68 = sext i32 %67 to i64
%69 = getelementptr inbounds double, double* %66, i64 %68
%70 = load double, double* %69
%71 = call double @llvm.fabs.f64(double %70)
%72 = load double*, double** %6
%73 = load i32, i32* %14
%74 = add nsw i32 %73, 1
%75 = sext i32 %74 to i64
%76 = getelementptr inbounds double, double* %72, i64 %75
%77 = load double, double* %76
%78 = call double @llvm.fabs.f64(double %77)
%79 = fadd double %71, %78
%80 = fmul double 0x3EB0C6F7A0B5ED8D, %79
%81 = fcmp ole double %65, %80
br i1 %81, label %82, label %83
82: ; preds = %59
br label %87
83: ; preds = %59
br label %84
84: ; preds = %83
%85 = load i32, i32* %14
%86 = add nsw i32 %85, 1
store i32 %86, i32* %14
br label %54
87: ; preds = %82, %54
%88 = load i32, i32* %14
%89 = load i32, i32* %13
%90 = icmp eq i32 %88, %89
br i1 %90, label %91, label %92
91: ; preds = %87
br label %372
92: ; preds = %87
%93 = load i32, i32* %15
%94 = add nsw i32 %93, 1
store i32 %94, i32* %15
%95 = load i32, i32* %15
%96 = icmp eq i32 %95, 1000
br i1 %96, label %97, label %102
97: ; preds = %92
%98 = load i32, i32* @stderr
%99 = load i8*, i8** %10
%100 = call i32 @fprintf(i32 %98, i8* getelementptr inbounds ([69 x i8], [69 x i8]* @.str, i64 0, i64 0), i8* %99)
%101 = call i32 @exit(i32 1)
unreachable
102: ; preds = %92
%103 = load double*, double** %6
%104 = load i32, i32* %13
%105 = add nsw i32 %104, 1
%106 = sext i32 %105 to i64
%107 = getelementptr inbounds double, double* %103, i64 %106
%108 = load double, double* %107
%109 = load double*, double** %6
%110 = load i32, i32* %13
%111 = sext i32 %110 to i64
%112 = getelementptr inbounds double, double* %109, i64 %111
%113 = load double, double* %112
%114 = fsub double %108, %113
%115 = load double*, double** %7
%116 = load i32, i32* %13
%117 = sext i32 %116 to i64
%118 = getelementptr inbounds double, double* %115, i64 %117
%119 = load double, double* %118
%120 = fmul double 2.000000e+00, %119
%121 = fdiv double %114, %120
store double %121, double* %19
%122 = load double, double* %19
%123 = call double @pythagoras(double %122, double 1.000000e+00)
store double %123, double* %21
%124 = load double*, double** %6
%125 = load i32, i32* %14
%126 = sext i32 %125 to i64
%127 = getelementptr inbounds double, double* %124, i64 %126
%128 = load double, double* %127
%129 = load double*, double** %6
%130 = load i32, i32* %13
%131 = sext i32 %130 to i64
%132 = getelementptr inbounds double, double* %129, i64 %131
%133 = load double, double* %132
%134 = fsub double %128, %133
%135 = load double*, double** %7
%136 = load i32, i32* %13
%137 = sext i32 %136 to i64
%138 = getelementptr inbounds double, double* %135, i64 %137
%139 = load double, double* %138
%140 = load double, double* %19
%141 = load double, double* %19
%142 = call double @llvm.fabs.f64(double %141)
%143 = fcmp ogt double %142, 0.000000e+00
br i1 %143, label %144, label %156
144: ; preds = %102
%145 = load double, double* %19
%146 = fcmp oge double %145, 0.000000e+00
br i1 %146, label %147, label %150
147: ; preds = %144
%148 = load double, double* %21
%149 = call double @llvm.fabs.f64(double %148)
br label %154
150: ; preds = %144
%151 = load double, double* %21
%152 = call double @llvm.fabs.f64(double %151)
%153 = fneg double %152
br label %154
154: ; preds = %150, %147
%155 = phi double [ %149, %147 ], [ %153, %150 ]
br label %158
156: ; preds = %102
%157 = load double, double* %21
br label %158
158: ; preds = %156, %154
%159 = phi double [ %155, %154 ], [ %157, %156 ]
%160 = fadd double %140, %159
%161 = fdiv double %139, %160
%162 = fadd double %134, %161
store double %162, double* %19
store double 1.000000e+00, double* %17
store double 1.000000e+00, double* %22
store double 0.000000e+00, double* %20
%163 = load i32, i32* %14
%164 = sub nsw i32 %163, 1
store i32 %164, i32* %11
br label %165
165: ; preds = %330, %158
%166 = load i32, i32* %11
%167 = load i32, i32* %13
%168 = icmp sge i32 %166, %167
br i1 %168, label %169, label %333
169: ; preds = %165
%170 = load double, double* %22
%171 = load double*, double** %7
%172 = load i32, i32* %11
%173 = sext i32 %172 to i64
%174 = getelementptr inbounds double, double* %171, i64 %173
%175 = load double, double* %174
%176 = fmul double %170, %175
store double %176, double* %18
%177 = load double, double* %17
%178 = load double*, double** %7
%179 = load i32, i32* %11
%180 = sext i32 %179 to i64
%181 = getelementptr inbounds double, double* %178, i64 %180
%182 = load double, double* %181
%183 = fmul double %177, %182
store double %183, double* %16
%184 = load double, double* %18
%185 = load double, double* %19
%186 = call double @pythagoras(double %184, double %185)
store double %186, double* %21
%187 = load double*, double** %7
%188 = load i32, i32* %11
%189 = add nsw i32 %188, 1
%190 = sext i32 %189 to i64
%191 = getelementptr inbounds double, double* %187, i64 %190
store double %186, double* %191
%192 = load double, double* %21
%193 = load double, double* %21
%194 = fcmp une double %192, %193
br i1 %194, label %195, label %202
195: ; preds = %169
%196 = load double, double* %21
%197 = load double, double* %21
%198 = fcmp une double %196, %197
br i1 %198, label %199, label %201
199: ; preds = %195
br i1 false, label %200, label %201
200: ; preds = %199
br i1 true, label %208, label %221
201: ; preds = %199, %195
br i1 false, label %208, label %221
202: ; preds = %169
%203 = load double, double* %21
%204 = fcmp olt double %203, 0.000000e+00
br i1 %204, label %221, label %205
205: ; preds = %202
%206 = load double, double* %21
%207 = fcmp olt double 0.000000e+00, %206
br i1 %207, label %221, label %208
208: ; preds = %205, %201, %200
%209 = load double, double* %20
%210 = load double*, double** %6
%211 = load i32, i32* %11
%212 = add nsw i32 %211, 1
%213 = sext i32 %212 to i64
%214 = getelementptr inbounds double, double* %210, i64 %213
%215 = load double, double* %214
%216 = fsub double %215, %209
store double %216, double* %214
%217 = load double*, double** %7
%218 = load i32, i32* %14
%219 = sext i32 %218 to i64
%220 = getelementptr inbounds double, double* %217, i64 %219
store double 0.000000e+00, double* %220
br label %333
221: ; preds = %205, %202, %201, %200
%222 = load double, double* %18
%223 = load double, double* %21
%224 = fdiv double %222, %223
store double %224, double* %22
%225 = load double, double* %19
%226 = load double, double* %21
%227 = fdiv double %225, %226
store double %227, double* %17
%228 = load double*, double** %6
%229 = load i32, i32* %11
%230 = add nsw i32 %229, 1
%231 = sext i32 %230 to i64
%232 = getelementptr inbounds double, double* %228, i64 %231
%233 = load double, double* %232
%234 = load double, double* %20
%235 = fsub double %233, %234
store double %235, double* %19
%236 = load double*, double** %6
%237 = load i32, i32* %11
%238 = sext i32 %237 to i64
%239 = getelementptr inbounds double, double* %236, i64 %238
%240 = load double, double* %239
%241 = load double, double* %19
%242 = fsub double %240, %241
%243 = load double, double* %22
%244 = load double, double* %17
%245 = fmul double 2.000000e+00, %244
%246 = load double, double* %16
%247 = fmul double %245, %246
%248 = call double @llvm.fmuladd.f64(double %242, double %243, double %247)
store double %248, double* %21
%249 = load double, double* %22
%250 = load double, double* %21
%251 = fmul double %249, %250
store double %251, double* %20
%252 = load double, double* %19
%253 = load double, double* %20
%254 = fadd double %252, %253
%255 = load double*, double** %6
%256 = load i32, i32* %11
%257 = add nsw i32 %256, 1
%258 = sext i32 %257 to i64
%259 = getelementptr inbounds double, double* %255, i64 %258
store double %254, double* %259
%260 = load double, double* %17
%261 = load double, double* %21
%262 = load double, double* %16
%263 = fneg double %262
%264 = call double @llvm.fmuladd.f64(double %260, double %261, double %263)
store double %264, double* %19
store i32 0, i32* %12
br label %265
265: ; preds = %326, %221
%266 = load i32, i32* %12
%267 = load i32, i32* %8
%268 = icmp slt i32 %266, %267
br i1 %268, label %269, label %329
269: ; preds = %265
%270 = load double**, double*** %9
%271 = load i32, i32* %12
%272 = sext i32 %271 to i64
%273 = getelementptr inbounds double*, double** %270, i64 %272
%274 = load double*, double** %273
%275 = load i32, i32* %11
%276 = add nsw i32 %275, 1
%277 = sext i32 %276 to i64
%278 = getelementptr inbounds double, double* %274, i64 %277
%279 = load double, double* %278
store double %279, double* %18
%280 = load double, double* %22
%281 = load double**, double*** %9
%282 = load i32, i32* %12
%283 = sext i32 %282 to i64
%284 = getelementptr inbounds double*, double** %281, i64 %283
%285 = load double*, double** %284
%286 = load i32, i32* %11
%287 = sext i32 %286 to i64
%288 = getelementptr inbounds double, double* %285, i64 %287
%289 = load double, double* %288
%290 = load double, double* %17
%291 = load double, double* %18
%292 = fmul double %290, %291
%293 = call double @llvm.fmuladd.f64(double %280, double %289, double %292)
%294 = load double**, double*** %9
%295 = load i32, i32* %12
%296 = sext i32 %295 to i64
%297 = getelementptr inbounds double*, double** %294, i64 %296
%298 = load double*, double** %297
%299 = load i32, i32* %11
%300 = add nsw i32 %299, 1
%301 = sext i32 %300 to i64
%302 = getelementptr inbounds double, double* %298, i64 %301
store double %293, double* %302
%303 = load double, double* %17
%304 = load double**, double*** %9
%305 = load i32, i32* %12
%306 = sext i32 %305 to i64
%307 = getelementptr inbounds double*, double** %304, i64 %306
%308 = load double*, double** %307
%309 = load i32, i32* %11
%310 = sext i32 %309 to i64
%311 = getelementptr inbounds double, double* %308, i64 %310
%312 = load double, double* %311
%313 = load double, double* %22
%314 = load double, double* %18
%315 = fmul double %313, %314
%316 = fneg double %315
%317 = call double @llvm.fmuladd.f64(double %303, double %312, double %316)
%318 = load double**, double*** %9
%319 = load i32, i32* %12
%320 = sext i32 %319 to i64
%321 = getelementptr inbounds double*, double** %318, i64 %320
%322 = load double*, double** %321
%323 = load i32, i32* %11
%324 = sext i32 %323 to i64
%325 = getelementptr inbounds double, double* %322, i64 %324
store double %317, double* %325
br label %326
326: ; preds = %269
%327 = load i32, i32* %12
%328 = add nsw i32 %327, 1
store i32 %328, i32* %12
br label %265
329: ; preds = %265
br label %330
330: ; preds = %329
%331 = load i32, i32* %11
%332 = add nsw i32 %331, -1
store i32 %332, i32* %11
br label %165
333: ; preds = %208, %165
%334 = load double, double* %21
%335 = load double, double* %21
%336 = fcmp une double %334, %335
br i1 %336, label %337, label %344
337: ; preds = %333
%338 = load double, double* %21
%339 = load double, double* %21
%340 = fcmp une double %338, %339
br i1 %340, label %341, label %343
341: ; preds = %337
br i1 false, label %342, label %343
342: ; preds = %341
br i1 true, label %350, label %355
343: ; preds = %341, %337
br i1 false, label %350, label %355
344: ; preds = %333
%345 = load double, double* %21
%346 = fcmp olt double %345, 0.000000e+00
br i1 %346, label %355, label %347
347: ; preds = %344
%348 = load double, double* %21
%349 = fcmp olt double 0.000000e+00, %348
br i1 %349, label %355, label %350
350: ; preds = %347, %343, %342
%351 = load i32, i32* %11
%352 = load i32, i32* %13
%353 = icmp sge i32 %351, %352
br i1 %353, label %354, label %355
354: ; preds = %350
br label %52
355: ; preds = %350, %347, %344, %343, %342
%356 = load double, double* %20
%357 = load double*, double** %6
%358 = load i32, i32* %13
%359 = sext i32 %358 to i64
%360 = getelementptr inbounds double, double* %357, i64 %359
%361 = load double, double* %360
%362 = fsub double %361, %356
store double %362, double* %360
%363 = load double, double* %19
%364 = load double*, double** %7
%365 = load i32, i32* %13
%366 = sext i32 %365 to i64
%367 = getelementptr inbounds double, double* %364, i64 %366
store double %363, double* %367
%368 = load double*, double** %7
%369 = load i32, i32* %14
%370 = sext i32 %369 to i64
%371 = getelementptr inbounds double, double* %368, i64 %370
store double 0.000000e+00, double* %371
br label %52
372: ; preds = %91
br label %373
373: ; preds = %372
%374 = load i32, i32* %13
%375 = add nsw i32 %374, 1
store i32 %375, i32* %13
br label %47
376: ; preds = %47
ret void
}

LLVM IR (-O2):
@stderr = global i32 0
@.str = [69 x i8] c"%s: ERROR! Too many iterations while determining the eigensolution!\0A\00"
define void @eigen_solution_of_triangular_matrix(double* nocapture %0, double* nocapture %1, i32 %2, double** nocapture %3, i8* %4) {
%6 = icmp sgt i32 %2, 1
br i1 %6, label %7, label %16
7: ; preds = %5
%8 = bitcast double* %1 to i8*
%9 = getelementptr double, double* %1, i64 1
%10 = bitcast double* %9 to i8*
%11 = add nsw i32 %2, -1
%12 = zext i32 %11 to i64
%13 = shl nuw nsw i64 %12, 3
%14 = zext i32 %11 to i64
%15 = getelementptr inbounds double, double* %1, i64 %14
store double 0.000000e+00, double* %15
br label %21
16: ; preds = %5
%17 = add nsw i32 %2, -1
%18 = sext i32 %17 to i64
%19 = getelementptr inbounds double, double* %1, i64 %18
store double 0.000000e+00, double* %19
%20 = icmp eq i32 %2, 1
br i1 %20, label %21, label %198
21: ; preds = %7, %16
%22 = phi i32 [ %11, %7 ], [ 0, %16 ]
%23 = zext i32 %2 to i64
%24 = and i64 %23, 1
%25 = icmp eq i32 %2, 1
%26 = and i64 %23, 4294967294
%27 = icmp eq i64 %24, 0
br label %28
28: ; preds = %21, %196
%29 = phi i64 [ 0, %21 ], [ %32, %196 ]
%30 = trunc i64 %29 to i32
%31 = call i32 @llvm.smax.i32(i32 %30, i32 %22)
%32 = add nuw nsw i64 %29, 1
%33 = getelementptr inbounds double, double* %0, i64 %32
%34 = getelementptr inbounds double, double* %0, i64 %29
%35 = getelementptr inbounds double, double* %1, i64 %29
%36 = zext i32 %31 to i64
br label %37
37: ; preds = %194, %28
%38 = phi i32 [ 0, %28 ], [ %62, %194 ]
br label %39
39: ; preds = %42, %37
%40 = phi i64 [ %47, %42 ], [ %29, %37 ]
%41 = icmp eq i64 %40, %36
br i1 %41, label %58, label %42
42: ; preds = %39
%43 = getelementptr inbounds double, double* %1, i64 %40
%44 = load double, double* %43
%45 = tail call double @llvm.fabs.f64(double %44)
%46 = getelementptr inbounds double, double* %0, i64 %40
%47 = add nuw nsw i64 %40, 1
%48 = bitcast double* %46 to <2 x double>*
%49 = load <2 x double>, <2 x double>* %48
%50 = call <2 x double> @llvm.fabs.v2f64(<2 x double> %49)
%51 = shufflevector <2 x double> %50, <2 x double> poison, <2 x i32> <i32 1, i32 undef>
%52 = fadd <2 x double> %50, %51
%53 = extractelement <2 x double> %52, i64 0
%54 = fmul double %53, 0x3EB0C6F7A0B5ED8D
%55 = fcmp ugt double %45, %54
br i1 %55, label %39, label %56
56: ; preds = %42
%57 = and i64 %40, 4294967295
br label %58
58: ; preds = %39, %56
%59 = phi i64 [ %57, %56 ], [ %36, %39 ]
%60 = icmp eq i64 %59, %29
br i1 %60, label %196, label %61
61: ; preds = %58
%62 = add nuw nsw i32 %38, 1
%63 = icmp eq i32 %62, 1000
br i1 %63, label %64, label %68
64: ; preds = %61
%65 = load i32, i32* @stderr
%66 = tail call i32 @fprintf(i32 %65, i8* getelementptr inbounds ([69 x i8], [69 x i8]* @.str, i64 0, i64 0), i8* %4)
%67 = tail call i32 @exit(i32 1)
unreachable
68: ; preds = %61
%69 = load double, double* %33
%70 = load double, double* %34
%71 = fsub double %69, %70
%72 = load double, double* %35
%73 = fmul double %72, 2.000000e+00
%74 = fdiv double %71, %73
%75 = tail call double @pythagoras(double %74, double 1.000000e+00)
%76 = getelementptr inbounds double, double* %0, i64 %59
%77 = load double, double* %76
%78 = load double, double* %34
%79 = fsub double %77, %78
%80 = load double, double* %35
%81 = fcmp ueq double %74, 0.000000e+00
br i1 %81, label %87, label %82
82: ; preds = %68
%83 = fcmp ult double %74, 0.000000e+00
%84 = tail call double @llvm.fabs.f64(double %75)
br i1 %83, label %85, label %87
85: ; preds = %82
%86 = fneg double %84
br label %87
87: ; preds = %82, %68, %85
%88 = phi double [ %86, %85 ], [ %75, %68 ], [ %84, %82 ]
%89 = fadd double %74, %88
%90 = fdiv double %80, %89
%91 = fadd double %79, %90
%92 = icmp ugt i64 %59, %29
br i1 %92, label %112, label %189
93: ; preds = %152, %126
%94 = phi i64 [ 0, %126 ], [ %182, %152 ]
br i1 %27, label %110, label %95
95: ; preds = %93
%96 = getelementptr inbounds double*, double** %3, i64 %94
%97 = load double*, double** %96
%98 = getelementptr inbounds double, double* %97, i64 %113
%99 = load double, double* %98
%100 = getelementptr inbounds double, double* %97, i64 %118
%101 = load double, double* %100
%102 = insertelement <2 x double> poison, double %99, i64 0
%103 = shufflevector <2 x double> %102, <2 x double> poison, <2 x i32> zeroinitializer
%104 = shufflevector <2 x double> %148, <2 x double> %131, <2 x i32> <i32 0, i32 2>
%105 = fmul <2 x double> %103, %104
%106 = insertelement <2 x double> poison, double %101, i64 0
%107 = shufflevector <2 x double> %106, <2 x double> poison, <2 x i32> zeroinitializer
%108 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %131, <2 x double> %107, <2 x double> %105)
%109 = bitcast double* %100 to <2 x double>*
store <2 x double> %108, <2 x double>* %109
br label %110
110: ; preds = %93, %95
%111 = icmp sgt i64 %118, %29
br i1 %111, label %112, label %189
112: ; preds = %87, %110
%113 = phi i64 [ %118, %110 ], [ %59, %87 ]
%114 = phi double [ %141, %110 ], [ 1.000000e+00, %87 ]
%115 = phi double [ %143, %110 ], [ 0.000000e+00, %87 ]
%116 = phi double [ %146, %110 ], [ %91, %87 ]
%117 = phi double [ %138, %110 ], [ 1.000000e+00, %87 ]
%118 = add nsw i64 %113, -1
%119 = getelementptr inbounds double, double* %1, i64 %118
%120 = load double, double* %119
%121 = fmul double %114, %120
%122 = fmul double %117, %120
%123 = tail call double @pythagoras(double %121, double %116)
%124 = getelementptr inbounds double, double* %1, i64 %113
store double %123, double* %124
%125 = fcmp oeq double %123, 0.000000e+00
br i1 %125, label %185, label %126
126: ; preds = %112
%127 = insertelement <2 x double> poison, double %116, i64 0
%128 = insertelement <2 x double> %127, double %121, i64 1
%129 = insertelement <2 x double> poison, double %123, i64 0
%130 = shufflevector <2 x double> %129, <2 x double> poison, <2 x i32> zeroinitializer
%131 = fdiv <2 x double> %128, %130
%132 = getelementptr inbounds double, double* %0, i64 %113
%133 = load double, double* %132
%134 = fsub double %133, %115
%135 = getelementptr inbounds double, double* %0, i64 %118
%136 = load double, double* %135
%137 = fsub double %136, %134
%138 = extractelement <2 x double> %131, i64 0
%139 = fmul double %138, 2.000000e+00
%140 = fmul double %122, %139
%141 = extractelement <2 x double> %131, i64 1
%142 = tail call double @llvm.fmuladd.f64(double %137, double %141, double %140)
%143 = fmul double %141, %142
%144 = fadd double %134, %143
store double %144, double* %132
%145 = fneg double %122
%146 = tail call double @llvm.fmuladd.f64(double %138, double %142, double %145)
%147 = fneg double %141
%148 = insertelement <2 x double> poison, double %147, i64 0
br i1 %25, label %93, label %149
149: ; preds = %126
%150 = shufflevector <2 x double> %148, <2 x double> %131, <2 x i32> <i32 0, i32 2>
%151 = shufflevector <2 x double> %148, <2 x double> %131, <2 x i32> <i32 0, i32 2>
br label %152
152: ; preds = %152, %149
%153 = phi i64 [ 0, %149 ], [ %182, %152 ]
%154 = phi i64 [ 0, %149 ], [ %183, %152 ]
%155 = getelementptr inbounds double*, double** %3, i64 %153
%156 = load double*, double** %155
%157 = getelementptr inbounds double, double* %156, i64 %113
%158 = load double, double* %157
%159 = getelementptr inbounds double, double* %156, i64 %118
%160 = load double, double* %159
%161 = insertelement <2 x double> poison, double %158, i64 0
%162 = shufflevector <2 x double> %161, <2 x double> poison, <2 x i32> zeroinitializer
%163 = fmul <2 x double> %162, %150
%164 = insertelement <2 x double> poison, double %160, i64 0
%165 = shufflevector <2 x double> %164, <2 x double> poison, <2 x i32> zeroinitializer
%166 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %131, <2 x double> %165, <2 x double> %163)
%167 = bitcast double* %159 to <2 x double>*
store <2 x double> %166, <2 x double>* %167
%168 = or i64 %153, 1
%169 = getelementptr inbounds double*, double** %3, i64 %168
%170 = load double*, double** %169
%171 = getelementptr inbounds double, double* %170, i64 %113
%172 = load double, double* %171
%173 = getelementptr inbounds double, double* %170, i64 %118
%174 = load double, double* %173
%175 = insertelement <2 x double> poison, double %172, i64 0
%176 = shufflevector <2 x double> %175, <2 x double> poison, <2 x i32> zeroinitializer
%177 = fmul <2 x double> %176, %151
%178 = insertelement <2 x double> poison, double %174, i64 0
%179 = shufflevector <2 x double> %178, <2 x double> poison, <2 x i32> zeroinitializer
%180 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %131, <2 x double> %179, <2 x double> %177)
%181 = bitcast double* %173 to <2 x double>*
store <2 x double> %180, <2 x double>* %181
%182 = add nuw nsw i64 %153, 2
%183 = add i64 %154, 2
%184 = icmp eq i64 %183, %26
br i1 %184, label %93, label %152
185: ; preds = %112
%186 = getelementptr inbounds double, double* %0, i64 %113
%187 = load double, double* %186
%188 = fsub double %187, %115
store double %188, double* %186
br label %194
189: ; preds = %110, %87
%190 = phi double [ %91, %87 ], [ %146, %110 ]
%191 = phi double [ 0.000000e+00, %87 ], [ %143, %110 ]
%192 = load double, double* %34
%193 = fsub double %192, %191
store double %193, double* %34
store double %190, double* %35
br label %194
194: ; preds = %185, %189
%195 = getelementptr inbounds double, double* %1, i64 %59
store double 0.000000e+00, double* %195
br label %37
196: ; preds = %58
%197 = icmp eq i64 %32, %23
br i1 %197, label %198, label %28
198: ; preds = %196, %16
ret void
}