void eigens(A, RR, E, N) double A[], RR[], E[];
int N;
{
  int IND, L, LL, LM, M, MM, MQ, I, J, IA, LQ;
  int IQ, IM, IL, NLI, NMI;
  double ANORM, ANORMX, AIA, THR, ALM, ALL, AMM, X, Y;
  double SINX, SINX2, COSX, COSX2, SINCS, AIL, AIM;
  double RLI, RMI;
  static double RANGE = 1.0e-10;
  for (J = 0; J < N * N; J++)
    RR[J] = 0.0;
  MM = 0;
  for (J = 0; J < N; J++) {
    RR[MM + J] = 1.0;
    MM += N;
  }
  ANORM = 0.0;
  for (I = 0; I < N; I++) {
    for (J = 0; J < N; J++) {
      if (I != J) {
        IA = I + (J * J + J) / 2;
        AIA = A[IA];
        ANORM += AIA * AIA;
      }
    }
  }
  if (ANORM <= 0.0)
    goto done;
  ANORM = sqrt(ANORM + ANORM);
  ANORMX = ANORM * RANGE / N;
  THR = ANORM;
  while (THR > ANORMX) {
    THR = THR / N;
    do {
      IND = 0;
      for (L = 0; L < N - 1; L++) {
        for (M = L + 1; M < N; M++) {
          MQ = (M * M + M) / 2;
          LM = L + MQ;
          ALM = A[LM];
          if (fabs(ALM) < THR)
            continue;
          IND = 1;
          LQ = (L * L + L) / 2;
          LL = L + LQ;
          MM = M + MQ;
          ALL = A[LL];
          AMM = A[MM];
          X = (ALL - AMM) / 2.0;
          Y = -ALM / sqrt(ALM * ALM + X * X);
          if (X < 0.0)
            Y = -Y;
          SINX = Y / sqrt(2.0 * (1.0 + sqrt(1.0 - Y * Y)));
          SINX2 = SINX * SINX;
          COSX = sqrt(1.0 - SINX2);
          COSX2 = COSX * COSX;
          SINCS = SINX * COSX;
          for (I = 0; I < N; I++) {
            IQ = (I * I + I) / 2;
            if ((I != M) && (I != L)) {
              if (I > M)
                IM = M + IQ;
              else
                IM = I + MQ;
              if (I >= L)
                IL = L + IQ;
              else
                IL = I + LQ;
              AIL = A[IL];
              AIM = A[IM];
              X = AIL * COSX - AIM * SINX;
              A[IM] = AIL * SINX + AIM * COSX;
              A[IL] = X;
            }
            NLI = N * L + I;
            NMI = N * M + I;
            RLI = RR[NLI];
            RMI = RR[NMI];
            RR[NLI] = RLI * COSX - RMI * SINX;
            RR[NMI] = RLI * SINX + RMI * COSX;
          }
          X = 2.0 * ALM * SINCS;
          A[LL] = ALL * COSX2 + AMM * SINX2 - X;
          A[MM] = ALL * SINX2 + AMM * COSX2 + X;
          A[LM] = (ALL - AMM) * SINCS + ALM * (COSX2 - SINX2);
        }
      }
    } while (IND != 0);
  }
done:;
  L = 0;
  for (J = 1; J <= N; J++) {
    L = L + J;
    E[J - 1] = A[L - 1];
  }
}


x86 assembly (clang, -O0):
<eigens>:
push   %rbp
mov    %rsp,%rbp
sub    $0x110,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
movl   $0x0,-0x40(%rbp)
mov    -0x40(%rbp),%eax
mov    -0x1c(%rbp),%ecx
imul   -0x1c(%rbp),%ecx
cmp    %ecx,%eax
jge    1161 <eigens+0x51>
mov    -0x10(%rbp),%rax
movslq -0x40(%rbp),%rcx
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x40(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x40(%rbp)
jmp    1131 <eigens+0x21>
movl   $0x0,-0x34(%rbp)
movl   $0x0,-0x40(%rbp)
mov    -0x40(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    11ac <eigens+0x9c>
mov    -0x10(%rbp),%rax
mov    -0x34(%rbp),%ecx
add    -0x40(%rbp),%ecx
movslq %ecx,%rcx
movsd  0xe88(%rip),%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x1c(%rbp),%eax
add    -0x34(%rbp),%eax
mov    %eax,-0x34(%rbp)
mov    -0x40(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x40(%rbp)
jmp    116f <eigens+0x5f>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x68(%rbp)
movl   $0x0,-0x3c(%rbp)
mov    -0x3c(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    1262 <eigens+0x152>
movl   $0x0,-0x40(%rbp)
mov    -0x40(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    124f <eigens+0x13f>
mov    -0x3c(%rbp),%eax
cmp    -0x40(%rbp),%eax
je     123c <eigens+0x12c>
mov    -0x3c(%rbp),%eax
mov    %eax,-0xf4(%rbp)
mov    -0x40(%rbp),%eax
imul   -0x40(%rbp),%eax
add    -0x40(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0xf4(%rbp),%eax
add    %ecx,%eax
mov    %eax,-0x44(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x44(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x78(%rbp)
movsd  -0x78(%rbp),%xmm0
movsd  -0x78(%rbp),%xmm2
movsd  -0x68(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x68(%rbp)
jmp    1241 <eigens+0x131>
mov    -0x40(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x40(%rbp)
jmp    11ce <eigens+0xbe>
jmp    1254 <eigens+0x144>
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
jmp    11bb <eigens+0xab>
xorps  %xmm0,%xmm0
ucomisd -0x68(%rbp),%xmm0
jb     1275 <eigens+0x165>
jmp    1894 <eigens+0x784>
movsd  -0x68(%rbp),%xmm0
addsd  -0x68(%rbp),%xmm0
call   1030 <sqrt@plt>
movsd  %xmm0,-0x68(%rbp)
movsd  -0x68(%rbp),%xmm0
mulsd  0x2d92(%rip),%xmm0
cvtsi2sdl -0x1c(%rbp),%xmm1
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x70(%rbp)
movsd  -0x68(%rbp),%xmm0
movsd  %xmm0,-0x80(%rbp)
movsd  -0x80(%rbp),%xmm0
ucomisd -0x70(%rbp),%xmm0
jbe    188f <eigens+0x77f>
movsd  -0x80(%rbp),%xmm0
cvtsi2sdl -0x1c(%rbp),%xmm1
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x80(%rbp)
movl   $0x0,-0x20(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
mov    -0x1c(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jge    187b <eigens+0x76b>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    1868 <eigens+0x758>
mov    -0x30(%rbp),%eax
imul   -0x30(%rbp),%eax
add    -0x30(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,-0x38(%rbp)
mov    -0x24(%rbp),%eax
add    -0x38(%rbp),%eax
mov    %eax,-0x2c(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x88(%rbp)
ff
movsd  -0x88(%rbp),%xmm1
ff
movaps 0xcb9(%rip),%xmm0
pand   %xmm0,%xmm1
movsd  -0x80(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jbe    135f <eigens+0x24f>
jmp    185a <eigens+0x74a>
movl   $0x1,-0x20(%rbp)
mov    -0x24(%rbp),%eax
imul   -0x24(%rbp),%eax
add    -0x24(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,-0x48(%rbp)
mov    -0x24(%rbp),%eax
add    -0x48(%rbp),%eax
mov    %eax,-0x28(%rbp)
mov    -0x30(%rbp),%eax
add    -0x38(%rbp),%eax
mov    %eax,-0x34(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x90(%rbp)
ff
mov    -0x8(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x98(%rbp)
ff
movsd  -0x90(%rbp),%xmm0
ff
subsd  -0x98(%rbp),%xmm0
ff
movsd  0xc41(%rip),%xmm1
divsd  %xmm1,%xmm0
movsd  %xmm0,-0xa0(%rbp)
ff
movsd  -0x88(%rbp),%xmm0
ff
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x100(%rbp)
ff
movsd  -0x88(%rbp),%xmm0
ff
movsd  -0x88(%rbp),%xmm2
ff
movsd  -0xa0(%rbp),%xmm1
ff
mulsd  -0xa0(%rbp),%xmm1
ff
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
call   1030 <sqrt@plt>
movaps %xmm0,%xmm1
movsd  -0x100(%rbp),%xmm0
ff
divsd  %xmm1,%xmm0
movsd  %xmm0,-0xa8(%rbp)
ff
xorps  %xmm0,%xmm0
ucomisd -0xa0(%rbp),%xmm0
ff
jbe    147e <eigens+0x36e>
movsd  -0xa8(%rbp),%xmm0
ff
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0xa8(%rbp)
ff
movsd  -0xa8(%rbp),%xmm0
ff
movsd  %xmm0,-0x108(%rbp)
ff
movsd  -0xa8(%rbp),%xmm0
ff
movsd  -0xa8(%rbp),%xmm1
ff
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
mulsd  %xmm1,%xmm0
movsd  0xb57(%rip),%xmm1
addsd  %xmm1,%xmm0
call   1030 <sqrt@plt>
movsd  0xb46(%rip),%xmm1
addsd  %xmm0,%xmm1
movsd  0xb32(%rip),%xmm0
mulsd  %xmm1,%xmm0
call   1030 <sqrt@plt>
movaps %xmm0,%xmm1
movsd  -0x108(%rbp),%xmm0
ff
divsd  %xmm1,%xmm0
movsd  %xmm0,-0xb0(%rbp)
ff
movsd  -0xb0(%rbp),%xmm0
ff
mulsd  -0xb0(%rbp),%xmm0
ff
movsd  %xmm0,-0xb8(%rbp)
ff
movsd  0xafa(%rip),%xmm0
subsd  -0xb8(%rbp),%xmm0
ff
call   1030 <sqrt@plt>
movsd  %xmm0,-0xc0(%rbp)
ff
movsd  -0xc0(%rbp),%xmm0
ff
mulsd  -0xc0(%rbp),%xmm0
ff
movsd  %xmm0,-0xc8(%rbp)
ff
movsd  -0xb0(%rbp),%xmm0
ff
mulsd  -0xc0(%rbp),%xmm0
ff
movsd  %xmm0,-0xd0(%rbp)
ff
movl   $0x0,-0x3c(%rbp)
mov    -0x3c(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    1777 <eigens+0x667>
mov    -0x3c(%rbp),%eax
imul   -0x3c(%rbp),%eax
add    -0x3c(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,-0x4c(%rbp)
mov    -0x3c(%rbp),%eax
cmp    -0x30(%rbp),%eax
je     16a4 <eigens+0x594>
mov    -0x3c(%rbp),%eax
cmp    -0x24(%rbp),%eax
je     16a4 <eigens+0x594>
mov    -0x3c(%rbp),%eax
cmp    -0x30(%rbp),%eax
jle    15bd <eigens+0x4ad>
mov    -0x30(%rbp),%eax
add    -0x4c(%rbp),%eax
mov    %eax,-0x50(%rbp)
jmp    15c6 <eigens+0x4b6>
mov    -0x3c(%rbp),%eax
add    -0x38(%rbp),%eax
mov    %eax,-0x50(%rbp)
mov    -0x3c(%rbp),%eax
cmp    -0x24(%rbp),%eax
jl     15e0 <eigens+0x4d0>
mov    -0x24(%rbp),%eax
add    -0x4c(%rbp),%eax
mov    %eax,-0x54(%rbp)
jmp    15e9 <eigens+0x4d9>
mov    -0x3c(%rbp),%eax
add    -0x48(%rbp),%eax
mov    %eax,-0x54(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x54(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0xd8(%rbp)
ff
mov    -0x8(%rbp),%rax
movslq -0x50(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0xe0(%rbp)
ff
movsd  -0xd8(%rbp),%xmm0
ff
movsd  -0xc0(%rbp),%xmm2
ff
movsd  -0xe0(%rbp),%xmm1
ff
mulsd  -0xb0(%rbp),%xmm1
ff
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0xa0(%rbp)
ff
movsd  -0xd8(%rbp),%xmm0
ff
movsd  -0xb0(%rbp),%xmm2
ff
movsd  -0xe0(%rbp),%xmm1
ff
mulsd  -0xc0(%rbp),%xmm1
ff
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x8(%rbp),%rax
movslq -0x50(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0xa0(%rbp),%xmm0
ff
mov    -0x8(%rbp),%rax
movslq -0x54(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x1c(%rbp),%eax
imul   -0x24(%rbp),%eax
add    -0x3c(%rbp),%eax
mov    %eax,-0x58(%rbp)
mov    -0x1c(%rbp),%eax
imul   -0x30(%rbp),%eax
add    -0x3c(%rbp),%eax
mov    %eax,-0x5c(%rbp)
mov    -0x10(%rbp),%rax
movslq -0x58(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0xe8(%rbp)
ff
mov    -0x10(%rbp),%rax
movslq -0x5c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0xf0(%rbp)
ff
movsd  -0xe8(%rbp),%xmm0
ff
movsd  -0xc0(%rbp),%xmm2
ff
movsd  -0xf0(%rbp),%xmm1
ff
mulsd  -0xb0(%rbp),%xmm1
ff
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x10(%rbp),%rax
movslq -0x58(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0xe8(%rbp),%xmm0
ff
movsd  -0xb0(%rbp),%xmm2
ff
movsd  -0xf0(%rbp),%xmm1
ff
mulsd  -0xc0(%rbp),%xmm1
ff
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x10(%rbp),%rax
movslq -0x5c(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
jmp    156a <eigens+0x45a>
movsd  0x891(%rip),%xmm0
mulsd  -0x88(%rbp),%xmm0
ff
mulsd  -0xd0(%rbp),%xmm0
ff
movsd  %xmm0,-0xa0(%rbp)
ff
movsd  -0x90(%rbp),%xmm0
ff
movsd  -0xc8(%rbp),%xmm2
ff
movsd  -0x98(%rbp),%xmm1
ff
mulsd  -0xb8(%rbp),%xmm1
ff
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
subsd  -0xa0(%rbp),%xmm0
ff
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x90(%rbp),%xmm0
ff
movsd  -0xb8(%rbp),%xmm2
ff
movsd  -0x98(%rbp),%xmm1
ff
mulsd  -0xc8(%rbp),%xmm1
ff
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
addsd  -0xa0(%rbp),%xmm0
ff
mov    -0x8(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x90(%rbp),%xmm0
ff
subsd  -0x98(%rbp),%xmm0
ff
movsd  -0xd0(%rbp),%xmm2
ff
movsd  -0x88(%rbp),%xmm1
ff
movsd  -0xc8(%rbp),%xmm3
ff
subsd  -0xb8(%rbp),%xmm3
ff
mulsd  %xmm3,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    12f9 <eigens+0x1e9>
jmp    186d <eigens+0x75d>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    12df <eigens+0x1cf>
jmp    1880 <eigens+0x770>
cmpl   $0x0,-0x20(%rbp)
jne    12d1 <eigens+0x1c1>
jmp    12ae <eigens+0x19e>
jmp    1894 <eigens+0x784>
movl   $0x0,-0x24(%rbp)
movl   $0x1,-0x40(%rbp)
mov    -0x40(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jg     18e9 <eigens+0x7d9>
mov    -0x24(%rbp),%eax
add    -0x40(%rbp),%eax
mov    %eax,-0x24(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x24(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x40(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x40(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x40(%rbp)
jmp    18a2 <eigens+0x792>
add    $0x110,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<eigens>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0xe8,%rsp
mov    %rdx,%r14
mov    %rsi,%rbp
mov    %rdi,0x18(%rsp)
mov    %ecx,%eax
imul   %ecx,%eax
test   %eax,%eax
mov    %rcx,0x8(%rsp)
je     115f <eigens+0x3f>
mov    %eax,%edx
shl    $0x3,%rdx
mov    %rbp,%rdi
xor    %esi,%esi
call   1030 <memset@plt>
mov    0x8(%rsp),%rcx
test   %ecx,%ecx
jle    1860 <eigens+0x740>
mov    %ecx,%r11d
lea    -0x1(%r11),%rdx
mov    %r11d,%eax
and    $0x3,%eax
movabs $0x3ff0000000000000,%rcx
cmp    $0x3,%rdx
mov    %rbp,0x40(%rsp)
jae    118f <eigens+0x6f>
xor    %edx,%edx
xor    %ebx,%ebx
jmp    11eb <eigens+0xcb>
mov    %r11d,%r8d
and    $0xfffffffc,%r8d
mov    %r11,%r9
shl    $0x4,%r9
mov    %r11,%rsi
shl    $0x5,%rsi
add    $0x20,%rsi
lea    0x0(,%r11,8),%rdx
lea    (%rdx,%rdx,2),%r10
xor    %edx,%edx
xor    %ebx,%ebx
nopl   0x0(%rax,%rax,1)
mov    %rcx,0x0(%rbp)
add    %r11,%rbx
mov    %rcx,0x8(%rbp,%r11,8)
add    %r11,%rbx
mov    %rcx,0x10(%rbp,%r9,1)
add    %r11,%rbx
mov    %rcx,0x18(%rbp,%r10,1)
add    %r11,%rbx
add    $0x4,%rdx
add    %rsi,%rbp
cmp    %rdx,%r8
jne    11c0 <eigens+0xa0>
test   %rax,%rax
mov    0x18(%rsp),%rbp
je     121c <eigens+0xfc>
add    %rdx,%rbx
mov    0x40(%rsp),%rdx
lea    (%rdx,%rbx,8),%rdx
lea    0x8(,%r11,8),%rsi
nopl   0x0(%rax)
mov    %rcx,(%rdx)
add    %rsi,%rdx
add    $0xffffffffffffffff,%rax
jne    1210 <eigens+0xf0>
mov    0x8(%rsp),%r8
test   %r8d,%r8d
jle    1860 <eigens+0x740>
mov    %r8d,%eax
and    $0xfffffffe,%eax
xorpd  %xmm0,%xmm0
xor    %ecx,%ecx
jmp    1265 <eigens+0x145>
nopl   0x0(%rax,%rax,1)
mov    %edx,%esi
imul   %esi,%esi
add    %edx,%esi
shr    %esi
add    %ecx,%esi
movsd  0x0(%rbp,%rsi,8),%xmm0
mulsd  %xmm0,%xmm0
addsd  %xmm1,%xmm0
add    $0x1,%ecx
cmp    %r8d,%ecx
je     12f2 <eigens+0x1d2>
cmp    $0x1,%r8d
jne    1270 <eigens+0x150>
xor    %edx,%edx
jmp    12d3 <eigens+0x1b3>
nop
xor    %esi,%esi
jmp    1287 <eigens+0x167>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
add    $0x1,%esi
cmp    %eax,%esi
je     12d0 <eigens+0x1b0>
mov    %esi,%edx
cmp    %esi,%ecx
je     12a6 <eigens+0x186>
mov    %edx,%esi
imul   %esi,%esi
add    %edx,%esi
shr    %esi
add    %ecx,%esi
movsd  0x0(%rbp,%rsi,8),%xmm1
mulsd  %xmm1,%xmm1
addsd  %xmm1,%xmm0
lea    0x1(%rdx),%esi
cmp    %esi,%ecx
je     1280 <eigens+0x160>
mov    %esi,%edi
imul   %edi,%edi
add    %esi,%edi
shr    %edi
add    %ecx,%edi
movsd  0x0(%rbp,%rdi,8),%xmm1
mulsd  %xmm1,%xmm1
addsd  %xmm1,%xmm0
jmp    1280 <eigens+0x160>
nopl   0x0(%rax,%rax,1)
add    $0x2,%edx
movapd %xmm0,%xmm1
test   $0x1,%r8b
je     1259 <eigens+0x139>
cmp    %edx,%ecx
jne    1240 <eigens+0x120>
movapd %xmm1,%xmm0
jmp    1259 <eigens+0x139>
mov    %r14,0x60(%rsp)
xorpd  %xmm1,%xmm1
ucomisd %xmm0,%xmm1
jae    17df <eigens+0x6bf>
addsd  %xmm0,%xmm0
ucomisd %xmm1,%xmm0
mov    %r11,0x20(%rsp)
jb     131a <eigens+0x1fa>
sqrtsd %xmm0,%xmm0
jmp    132e <eigens+0x20e>
call   1040 <sqrt@plt>
mov    0x18(%rsp),%rbp
mov    0x8(%rsp),%r8
mov    0x20(%rsp),%r11
movsd  0xcca(%rip),%xmm1
cvtsi2sd %r8d,%xmm2
mulsd  %xmm0,%xmm1
movsd  %xmm2,0x68(%rsp)
divsd  %xmm2,%xmm1
movsd  %xmm1,0x70(%rsp)
ucomisd %xmm1,%xmm0
jbe    17df <eigens+0x6bf>
lea    -0x1(%r8),%eax
mov    %rax,0x80(%rsp)
movslq %r8d,%rsi
lea    0x0(,%rsi,8),%r9
movapd 0xca8(%rip),%xmm2
xorpd  %xmm8,%xmm8
mov    %rsi,0x78(%rsp)
mov    %r9,0x48(%rsp)
jmp    139c <eigens+0x27c>
nopl   0x0(%rax)
ucomisd 0x70(%rsp),%xmm0
jbe    17df <eigens+0x6bf>
divsd  0x68(%rsp),%xmm0
cmp    $0x2,%r8d
jl     1390 <eigens+0x270>
xor    %r14d,%r14d
mov    $0x1,%r12d
xor    %eax,%eax
movsd  %xmm0,0xa0(%rsp)
nopl   0x0(%rax)
lea    0x1(%r14),%rcx
mov    %rcx,0x88(%rsp)
cmp    %rsi,%rcx
mov    %r12,0x90(%rsp)
jge    1790 <eigens+0x670>
mov    %r14d,%edx
imul   %edx,%edx
add    %r14d,%edx
mov    %edx,%r10d
shr    %r10d
add    %r14d,%r10d
mov    %r14,%rcx
imul   %rsi,%rcx
shr    %rdx
mov    %rdx,0x58(%rsp)
lea    0x1(%r12),%ebx
imul   %r12d,%ebx
lea    (%r12,%r12,1),%edi
add    $0x2,%edi
mov    0x40(%rsp),%rdx
lea    (%rdx,%rcx,8),%r13
mov    %rsi,%rcx
imul   %r12,%rcx
lea    (%rdx,%rcx,8),%r15
mov    %edi,%ecx
mov    %r10,0x50(%rsp)
jmp    14fd <eigens+0x3dd>
xchg   %ax,%ax
movapd %xmm0,%xmm1
mulsd  %xmm0,%xmm1
mulsd  %xmm0,%xmm5
movapd 0xd0(%rsp),%xmm4
movapd %xmm4,%xmm0
addsd  %xmm4,%xmm0
mulsd  %xmm5,%xmm0
movsd  0xa8(%rsp),%xmm7
movapd %xmm7,%xmm2
mulsd  %xmm9,%xmm2
movsd  0xb0(%rsp),%xmm6
movapd %xmm6,%xmm3
mulsd  %xmm1,%xmm3
addsd  %xmm2,%xmm3
subsd  %xmm0,%xmm3
movsd  %xmm3,0x0(%rbp,%r10,8)
mulsd  %xmm1,%xmm7
mulsd  %xmm9,%xmm6
addsd  %xmm7,%xmm6
addsd  %xmm0,%xmm6
mov    0xc0(%rsp),%rax
movsd  %xmm6,0x0(%rbp,%rax,8)
subsd  %xmm9,%xmm1
mulsd  %xmm4,%xmm1
movsd  0xb8(%rsp),%xmm0
mulsd  %xmm5,%xmm0
addsd  %xmm1,%xmm0
mov    0xc8(%rsp),%rax
movsd  %xmm0,0x0(%rbp,%rax,8)
mov    $0x1,%eax
movsd  0xa0(%rsp),%xmm0
movapd 0xb40(%rip),%xmm2
mov    0x14(%rsp),%ebx
mov    0x2c(%rsp),%ecx
add    $0x1,%r12
add    %ecx,%ebx
add    $0x2,%ecx
add    %r9,%r15
cmp    %r11,%r12
je     1790 <eigens+0x670>
mov    %r12d,%esi
imul   %esi,%esi
add    %r12d,%esi
shr    %esi
lea    (%rsi,%r14,1),%edx
mov    %rdx,0xc8(%rsp)
movsd  0x0(%rbp,%rdx,8),%xmm3
movapd %xmm3,%xmm1
andpd  %xmm2,%xmm1
ucomisd %xmm1,%xmm0
ja     14e8 <eigens+0x3c8>
add    %r12d,%esi
movsd  0x0(%rbp,%r10,8),%xmm0
movsd  0x0(%rbp,%rsi,8),%xmm1
movsd  %xmm0,0xb0(%rsp)
movsd  %xmm1,0xa8(%rsp)
subsd  %xmm1,%xmm0
movsd  %xmm0,0xb8(%rsp)
movapd %xmm0,%xmm2
mulsd  0xaa5(%rip),%xmm2
movapd %xmm2,%xmm1
mulsd  %xmm2,%xmm1
movapd %xmm3,%xmm0
mulsd  %xmm3,%xmm0
addsd  %xmm1,%xmm0
ucomisd %xmm8,%xmm0
movapd %xmm3,0xd0(%rsp)
mov    %ecx,0x2c(%rsp)
mov    %rsi,0xc0(%rsp)
jb     15a0 <eigens+0x480>
sqrtsd %xmm0,%xmm0
jmp    15bf <eigens+0x49f>
nopl   0x0(%rax)
movapd %xmm2,0x30(%rsp)
call   1040 <sqrt@plt>
movapd 0x30(%rsp),%xmm2
movapd 0xd0(%rsp),%xmm3
xorpd  %xmm8,%xmm8
movapd 0xa69(%rip),%xmm1
xorpd  %xmm1,%xmm3
divsd  %xmm0,%xmm3
cmpltsd %xmm8,%xmm2
movapd %xmm2,%xmm0
andnpd %xmm3,%xmm0
xorpd  %xmm1,%xmm3
andpd  %xmm2,%xmm3
orpd   %xmm0,%xmm3
movapd %xmm3,%xmm1
mulsd  %xmm3,%xmm1
movsd  0xa17(%rip),%xmm0
subsd  %xmm1,%xmm0
ucomisd %xmm8,%xmm0
movapd %xmm3,0x30(%rsp)
jb     1610 <eigens+0x4f0>
sqrtsd %xmm0,%xmm0
jmp    161a <eigens+0x4fa>
call   1040 <sqrt@plt>
xorpd  %xmm8,%xmm8
addsd  0x9ee(%rip),%xmm0
addsd  %xmm0,%xmm0
ucomisd %xmm8,%xmm0
jb     1640 <eigens+0x520>
sqrtsd %xmm0,%xmm0
jmp    164a <eigens+0x52a>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
call   1040 <sqrt@plt>
xorpd  %xmm8,%xmm8
movapd 0x30(%rsp),%xmm5
mov    %ebx,0x14(%rsp)
divsd  %xmm0,%xmm5
movapd %xmm5,%xmm9
mulsd  %xmm5,%xmm9
movsd  0x9a6(%rip),%xmm0
subsd  %xmm9,%xmm0
ucomisd %xmm8,%xmm0
jb     1680 <eigens+0x560>
sqrtsd %xmm0,%xmm0
jmp    16aa <eigens+0x58a>
nopl   0x0(%rax)
movapd %xmm5,0x30(%rsp)
movsd  %xmm9,0x98(%rsp)
call   1040 <sqrt@plt>
movsd  0x98(%rsp),%xmm9
movapd 0x30(%rsp),%xmm5
xorpd  %xmm8,%xmm8
mov    0x20(%rsp),%r11
mov    0x8(%rsp),%r8
mov    0x48(%rsp),%r9
mov    0x58(%rsp),%rbx
mov    0x18(%rsp),%rbp
mov    0x50(%rsp),%r10
test   %r8d,%r8d
jle    1430 <eigens+0x310>
mov    0x14(%rsp),%eax
shr    %rax
xor    %ecx,%ecx
jmp    1727 <eigens+0x607>
nopl   0x0(%rax)
movsd  0x0(%r13,%rcx,8),%xmm1
movsd  (%r15,%rcx,8),%xmm2
movapd %xmm5,%xmm3
mulsd  %xmm2,%xmm3
movapd %xmm1,%xmm4
mulsd  %xmm0,%xmm4
subsd  %xmm3,%xmm4
movsd  %xmm4,0x0(%r13,%rcx,8)
mulsd  %xmm0,%xmm2
mulsd  %xmm5,%xmm1
addsd  %xmm2,%xmm1
movsd  %xmm1,(%r15,%rcx,8)
add    $0x1,%rcx
cmp    %rcx,%r11
je     1430 <eigens+0x310>
cmp    %rcx,%r12
je     16e0 <eigens+0x5c0>
cmp    %rcx,%r14
je     16e0 <eigens+0x5c0>
mov    %ecx,%edx
imul   %edx,%edx
add    %ecx,%edx
shr    %edx
lea    (%rdx,%r12,1),%esi
lea    (%rax,%rcx,1),%edi
cmp    %r12,%rcx
cmova  %esi,%edi
add    %r14d,%edx
lea    (%rbx,%rcx,1),%esi
cmp    %r14,%rcx
cmovae %edx,%esi
movsd  0x0(%rbp,%rsi,8),%xmm1
movsd  0x0(%rbp,%rdi,8),%xmm2
movapd %xmm5,%xmm3
mulsd  %xmm2,%xmm3
movapd %xmm1,%xmm4
mulsd  %xmm0,%xmm4
subsd  %xmm3,%xmm4
mulsd  %xmm0,%xmm2
mulsd  %xmm5,%xmm1
addsd  %xmm2,%xmm1
movsd  %xmm1,0x0(%rbp,%rdi,8)
movsd  %xmm4,0x0(%rbp,%rsi,8)
jmp    16e0 <eigens+0x5c0>
mov    0x90(%rsp),%r12
add    $0x1,%r12
mov    0x88(%rsp),%rcx
mov    %rcx,%r14
cmp    0x80(%rsp),%rcx
mov    0x78(%rsp),%rsi
jne    13c0 <eigens+0x2a0>
cmp    $0x2,%r8d
jl     1390 <eigens+0x270>
xor    %r14d,%r14d
mov    $0x1,%r12d
test   %eax,%eax
mov    $0x0,%eax
jne    13c0 <eigens+0x2a0>
jmp    1390 <eigens+0x270>
test   %r8d,%r8d
mov    0x60(%rsp),%rdi
jle    1860 <eigens+0x740>
cmp    $0x1,%r8d
jne    17f8 <eigens+0x6d8>
xor    %ecx,%ecx
mov    $0x1,%eax
jmp    1849 <eigens+0x729>
mov    %r11d,%edx
and    $0xfffffffe,%edx
neg    %rdx
xor    %ecx,%ecx
mov    $0x1,%eax
nopl   0x0(%rax,%rax,1)
add    %eax,%ecx
movslq %ecx,%rsi
movsd  -0x8(%rbp,%rsi,8),%xmm0
movsd  %xmm0,-0x8(%rdi,%rax,8)
lea    (%rax,%rsi,1),%ecx
add    $0x1,%ecx
add    %eax,%esi
movslq %esi,%rsi
movsd  0x0(%rbp,%rsi,8),%xmm0
movsd  %xmm0,(%rdi,%rax,8)
lea    (%rdx,%rax,1),%rsi
add    $0x2,%rsi
add    $0x2,%rax
cmp    $0x1,%rsi
jne    1810 <eigens+0x6f0>
test   $0x1,%r11b
je     1860 <eigens+0x740>
add    %eax,%ecx
movslq %ecx,%rcx
movsd  -0x8(%rbp,%rcx,8),%xmm0
movsd  %xmm0,-0x8(%rdi,%rax,8)
add    $0xe8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define void @eigens(double* nocapture %0, double* nocapture %1, double* nocapture writeonly %2, i32 %3) {
%5 = mul i32 %3, %3
%6 = icmp eq i32 %5, 0
br i1 %6, label %11, label %7
7: ; preds = %4
%8 = bitcast double* %1 to i8*
%9 = zext i32 %5 to i64
%10 = shl nuw nsw i64 %9, 3
br label %11
11: ; preds = %7, %4
%12 = icmp sgt i32 %3, 0
br i1 %12, label %13, label %311
13: ; preds = %11
%14 = zext i32 %3 to i64
%15 = zext i32 %3 to i64
%16 = add nsw i64 %15, -1
%17 = and i64 %15, 3
%18 = icmp ult i64 %16, 3
br i1 %18, label %21, label %19
19: ; preds = %13
%20 = and i64 %15, 4294967292
br label %41
21: ; preds = %41, %13
%22 = phi i64 [ 0, %13 ], [ %60, %41 ]
%23 = phi i64 [ 0, %13 ], [ %59, %41 ]
%24 = icmp eq i64 %17, 0
br i1 %24, label %35, label %25
25: ; preds = %21, %25
%26 = phi i64 [ %32, %25 ], [ %22, %21 ]
%27 = phi i64 [ %31, %25 ], [ %23, %21 ]
%28 = phi i64 [ %33, %25 ], [ 0, %21 ]
%29 = add nuw nsw i64 %27, %26
%30 = getelementptr inbounds double, double* %1, i64 %29
store double 1.000000e+00, double* %30
%31 = add nuw nsw i64 %27, %14
%32 = add nuw nsw i64 %26, 1
%33 = add i64 %28, 1
%34 = icmp eq i64 %33, %17
br i1 %34, label %35, label %25
35: ; preds = %25, %21
br i1 %12, label %36, label %311
36: ; preds = %35
%37 = and i32 %3, 1
%38 = icmp eq i32 %3, 1
%39 = and i32 %3, -2
%40 = icmp eq i32 %37, 0
br label %63
41: ; preds = %41, %19
%42 = phi i64 [ 0, %19 ], [ %60, %41 ]
%43 = phi i64 [ 0, %19 ], [ %59, %41 ]
%44 = phi i64 [ 0, %19 ], [ %61, %41 ]
%45 = add nuw nsw i64 %43, %42
%46 = getelementptr inbounds double, double* %1, i64 %45
store double 1.000000e+00, double* %46
%47 = add nuw nsw i64 %43, %14
%48 = or i64 %42, 1
%49 = add nuw nsw i64 %47, %48
%50 = getelementptr inbounds double, double* %1, i64 %49
store double 1.000000e+00, double* %50
%51 = add nuw nsw i64 %47, %14
%52 = or i64 %42, 2
%53 = add nuw nsw i64 %51, %52
%54 = getelementptr inbounds double, double* %1, i64 %53
store double 1.000000e+00, double* %54
%55 = add nuw nsw i64 %51, %14
%56 = or i64 %42, 3
%57 = add nuw nsw i64 %55, %56
%58 = getelementptr inbounds double, double* %1, i64 %57
store double 1.000000e+00, double* %58
%59 = add nuw nsw i64 %55, %14
%60 = add nuw nsw i64 %42, 4
%61 = add i64 %44, 4
%62 = icmp eq i64 %61, %20
br i1 %62, label %21, label %41
63: ; preds = %36, %113
%64 = phi i32 [ %115, %113 ], [ 0, %36 ]
%65 = phi double [ %114, %113 ], [ 0.000000e+00, %36 ]
br i1 %38, label %98, label %66
66: ; preds = %63, %93
%67 = phi i32 [ %95, %93 ], [ 0, %63 ]
%68 = phi double [ %94, %93 ], [ %65, %63 ]
%69 = phi i32 [ %96, %93 ], [ 0, %63 ]
%70 = icmp eq i32 %64, %67
br i1 %70, label %80, label %71
71: ; preds = %66
%72 = mul nsw i32 %67, %67
%73 = add nuw nsw i32 %72, %67
%74 = lshr exact i32 %73, 1
%75 = add nuw nsw i32 %74, %64
%76 = zext i32 %75 to i64
%77 = getelementptr inbounds double, double* %0, i64 %76
%78 = load double, double* %77
%79 = tail call double @llvm.fmuladd.f64(double %78, double %78, double %68)
br label %80
80: ; preds = %66, %71
%81 = phi double [ %79, %71 ], [ %68, %66 ]
%82 = or i32 %67, 1
%83 = icmp eq i32 %64, %82
br i1 %83, label %93, label %84
84: ; preds = %80
%85 = mul nsw i32 %82, %82
%86 = add nuw nsw i32 %85, %82
%87 = lshr exact i32 %86, 1
%88 = add nuw nsw i32 %87, %64
%89 = zext i32 %88 to i64
%90 = getelementptr inbounds double, double* %0, i64 %89
%91 = load double, double* %90
%92 = tail call double @llvm.fmuladd.f64(double %91, double %91, double %81)
br label %93
93: ; preds = %84, %80
%94 = phi double [ %92, %84 ], [ %81, %80 ]
%95 = add nuw nsw i32 %67, 2
%96 = add i32 %69, 2
%97 = icmp eq i32 %96, %39
br i1 %97, label %98, label %66
98: ; preds = %93, %63
%99 = phi double [ undef, %63 ], [ %94, %93 ]
%100 = phi i32 [ 0, %63 ], [ %95, %93 ]
%101 = phi double [ %65, %63 ], [ %94, %93 ]
br i1 %40, label %113, label %102
102: ; preds = %98
%103 = icmp eq i32 %64, %100
br i1 %103, label %113, label %104
104: ; preds = %102
%105 = mul nsw i32 %100, %100
%106 = add nuw nsw i32 %105, %100
%107 = lshr i32 %106, 1
%108 = add nuw nsw i32 %107, %64
%109 = zext i32 %108 to i64
%110 = getelementptr inbounds double, double* %0, i64 %109
%111 = load double, double* %110
%112 = tail call double @llvm.fmuladd.f64(double %111, double %111, double %101)
br label %113
113: ; preds = %102, %104, %98
%114 = phi double [ %99, %98 ], [ %112, %104 ], [ %101, %102 ]
%115 = add nuw nsw i32 %64, 1
%116 = icmp eq i32 %115, %3
br i1 %116, label %117, label %63
117: ; preds = %113
%118 = fcmp ugt double %114, 0.000000e+00
br i1 %118, label %119, label %267
119: ; preds = %117
%120 = fadd double %114, %114
%121 = tail call double @sqrt(double %120)
%122 = fmul double %121, 1.000000e-10
%123 = sitofp i32 %3 to double
%124 = fdiv double %122, %123
%125 = fcmp ogt double %121, %124
br i1 %125, label %126, label %267
126: ; preds = %119
%127 = add i32 %3, -1
%128 = icmp sgt i32 %3, 1
%129 = sext i32 %3 to i64
%130 = zext i32 %127 to i64
%131 = zext i32 %3 to i64
br label %134
132: ; preds = %264, %134
%133 = fcmp ogt double %136, %124
br i1 %133, label %134, label %267
134: ; preds = %126, %132
%135 = phi double [ %121, %126 ], [ %136, %132 ]
%136 = fdiv double %135, %123
br i1 %128, label %145, label %132
137: ; preds = %260, %145
%138 = phi i32 [ %148, %145 ], [ %261, %260 ]
%139 = add nuw nsw i64 %147, 1
%140 = icmp eq i64 %150, %130
br i1 %140, label %264, label %141
141: ; preds = %137, %264
%142 = phi i64 [ %150, %137 ], [ 0, %264 ]
%143 = phi i64 [ %139, %137 ], [ 1, %264 ]
%144 = phi i32 [ %138, %137 ], [ 0, %264 ]
br label %145
145: ; preds = %134, %141
%146 = phi i64 [ %142, %141 ], [ 0, %134 ]
%147 = phi i64 [ %143, %141 ], [ 1, %134 ]
%148 = phi i32 [ %144, %141 ], [ 0, %134 ]
%149 = trunc i64 %146 to i32
%150 = add nuw nsw i64 %146, 1
%151 = icmp slt i64 %150, %129
br i1 %151, label %152, label %137
152: ; preds = %145
%153 = mul nsw i32 %149, %149
%154 = add nuw nsw i32 %153, %149
%155 = lshr i32 %154, 1
%156 = add nuw nsw i32 %155, %149
%157 = zext i32 %156 to i64
%158 = getelementptr inbounds double, double* %0, i64 %157
%159 = mul nsw i64 %146, %129
br label %160
160: ; preds = %152, %260
%161 = phi i64 [ %147, %152 ], [ %262, %260 ]
%162 = phi i32 [ %148, %152 ], [ %261, %260 ]
%163 = trunc i64 %161 to i32
%164 = mul nsw i32 %163, %163
%165 = add nuw nsw i32 %164, %163
%166 = lshr i32 %165, 1
%167 = add nuw nsw i32 %166, %149
%168 = zext i32 %167 to i64
%169 = getelementptr inbounds double, double* %0, i64 %168
%170 = load double, double* %169
%171 = tail call double @llvm.fabs.f64(double %170)
%172 = fcmp olt double %171, %136
br i1 %172, label %260, label %173
173: ; preds = %160
%174 = add nuw nsw i32 %166, %163
%175 = load double, double* %158
%176 = zext i32 %174 to i64
%177 = getelementptr inbounds double, double* %0, i64 %176
%178 = load double, double* %177
%179 = fsub double %175, %178
%180 = fmul double %179, 5.000000e-01
%181 = fneg double %170
%182 = fmul double %180, %180
%183 = tail call double @llvm.fmuladd.f64(double %170, double %170, double %182)
%184 = tail call double @sqrt(double %183)
%185 = fdiv double %181, %184
%186 = fcmp olt double %180, 0.000000e+00
%187 = fneg double %185
%188 = select i1 %186, double %187, double %185
%189 = fneg double %188
%190 = tail call double @llvm.fmuladd.f64(double %189, double %188, double 1.000000e+00)
%191 = tail call double @sqrt(double %190)
%192 = fadd double %191, 1.000000e+00
%193 = fmul double %192, 2.000000e+00
%194 = tail call double @sqrt(double %193)
%195 = fdiv double %188, %194
%196 = fmul double %195, %195
%197 = fsub double 1.000000e+00, %196
%198 = tail call double @sqrt(double %197)
%199 = fmul double %198, %198
%200 = fmul double %198, %195
br i1 %12, label %201, label %248
201: ; preds = %173
%202 = mul nsw i64 %161, %129
br label %203
203: ; preds = %201, %234
%204 = phi i64 [ 0, %201 ], [ %246, %234 ]
%205 = trunc i64 %204 to i32
%206 = mul nsw i32 %205, %205
%207 = add nuw nsw i32 %206, %205
%208 = lshr i32 %207, 1
%209 = icmp eq i64 %204, %161
%210 = icmp eq i64 %204, %146
%211 = select i1 %209, i1 true, i1 %210
br i1 %211, label %234, label %212
212: ; preds = %203
%213 = icmp ugt i64 %204, %161
%214 = add nuw nsw i32 %208, %163
%215 = trunc i64 %204 to i32
%216 = add i32 %166, %215
%217 = select i1 %213, i32 %214, i32 %216
%218 = icmp ult i64 %204, %146
%219 = add nuw nsw i32 %208, %149
%220 = trunc i64 %204 to i32
%221 = add i32 %155, %220
%222 = select i1 %218, i32 %221, i32 %219
%223 = zext i32 %222 to i64
%224 = getelementptr inbounds double, double* %0, i64 %223
%225 = load double, double* %224
%226 = zext i32 %217 to i64
%227 = getelementptr inbounds double, double* %0, i64 %226
%228 = load double, double* %227
%229 = fneg double %228
%230 = fmul double %195, %229
%231 = tail call double @llvm.fmuladd.f64(double %225, double %198, double %230)
%232 = fmul double %198, %228
%233 = tail call double @llvm.fmuladd.f64(double %225, double %195, double %232)
store double %233, double* %227
store double %231, double* %224
br label %234
234: ; preds = %212, %203
%235 = add nsw i64 %204, %159
%236 = add nsw i64 %204, %202
%237 = getelementptr inbounds double, double* %1, i64 %235
%238 = load double, double* %237
%239 = getelementptr inbounds double, double* %1, i64 %236
%240 = load double, double* %239
%241 = fneg double %240
%242 = fmul double %195, %241
%243 = tail call double @llvm.fmuladd.f64(double %238, double %198, double %242)
store double %243, double* %237
%244 = fmul double %198, %240
%245 = tail call double @llvm.fmuladd.f64(double %238, double %195, double %244)
store double %245, double* %239
%246 = add nuw nsw i64 %204, 1
%247 = icmp eq i64 %246, %131
br i1 %247, label %248, label %203
248: ; preds = %234, %173
%249 = fmul double %170, 2.000000e+00
%250 = fmul double %249, %200
%251 = fmul double %178, %196
%252 = tail call double @llvm.fmuladd.f64(double %175, double %199, double %251)
%253 = fsub double %252, %250
store double %253, double* %158
%254 = fmul double %178, %199
%255 = tail call double @llvm.fmuladd.f64(double %175, double %196, double %254)
%256 = fadd double %255, %250
store double %256, double* %177
%257 = fsub double %199, %196
%258 = fmul double %170, %257
%259 = tail call double @llvm.fmuladd.f64(double %179, double %200, double %258)
store double %259, double* %169
br label %260
260: ; preds = %160, %248
%261 = phi i32 [ %162, %160 ], [ 1, %248 ]
%262 = add nuw nsw i64 %161, 1
%263 = icmp eq i64 %262, %131
br i1 %263, label %137, label %160
264: ; preds = %137
%265 = icmp ne i32 %138, 0
%266 = and i1 %128, %265
br i1 %266, label %141, label %132
267: ; preds = %132, %119, %117
%268 = icmp slt i32 %3, 1
br i1 %268, label %311, label %269
269: ; preds = %267
%270 = zext i32 %3 to i64
%271 = and i64 %270, 1
%272 = icmp eq i32 %3, 1
br i1 %272, label %298, label %273
273: ; preds = %269
%274 = and i64 %270, 4294967294
br label %275
275: ; preds = %275, %273
%276 = phi i64 [ 1, %273 ], [ %295, %275 ]
%277 = phi i32 [ 0, %273 ], [ %289, %275 ]
%278 = phi i64 [ 0, %273 ], [ %296, %275 ]
%279 = trunc i64 %276 to i32
%280 = add nuw nsw i32 %277, %279
%281 = add nsw i32 %280, -1
%282 = sext i32 %281 to i64
%283 = getelementptr inbounds double, double* %0, i64 %282
%284 = load double, double* %283
%285 = add nsw i64 %276, -1
%286 = getelementptr inbounds double, double* %2, i64 %285
store double %284, double* %286
%287 = trunc i64 %276 to i32
%288 = add i32 %287, 1
%289 = add nuw nsw i32 %280, %288
%290 = add i32 %280, %287
%291 = sext i32 %290 to i64
%292 = getelementptr inbounds double, double* %0, i64 %291
%293 = load double, double* %292
%294 = getelementptr inbounds double, double* %2, i64 %276
store double %293, double* %294
%295 = add nuw nsw i64 %276, 2
%296 = add i64 %278, 2
%297 = icmp eq i64 %296, %274
br i1 %297, label %298, label %275
298: ; preds = %275, %269
%299 = phi i64 [ 1, %269 ], [ %295, %275 ]
%300 = phi i32 [ 0, %269 ], [ %289, %275 ]
%301 = icmp eq i64 %271, 0
br i1 %301, label %311, label %302
302: ; preds = %298
%303 = trunc i64 %299 to i32
%304 = add nuw nsw i32 %300, %303
%305 = add nsw i32 %304, -1
%306 = sext i32 %305 to i64
%307 = getelementptr inbounds double, double* %0, i64 %306
%308 = load double, double* %307
%309 = add nsw i64 %299, -1
%310 = getelementptr inbounds double, double* %2, i64 %309
store double %308, double* %310
br label %311
311: ; preds = %302, %298, %35, %11, %267
ret void
}