// File: /workspace/github_c_makefile_star2_O1/olcaytaner[P]Isell/matrix.c
// Function: hqr2
double* hqr2(matrix* eigenvectors, matrix a)
{
 int nn, m, l, k, j, its, i, mmin, na; 
 double z, y, x, w, v, u, t, s, r, q, p, anorm = 0.0, *eigenvalues;
 double EPS = 2.22045e-016;
 eigenvalues = safemalloc(a.row * sizeof(double), "hqr2", 5);
 for (i = 0; i < a.row; i++) 
   for (j = imax(i - 1,0); j < a.row; j++)
     anorm += fabs(a.values[i][j]);
 nn = a.row - 1; 
 t = 0.0; 
 while (nn >= 0) 
  {
   its = 0; 
   do {
     for (l = nn; l > 0; l--) 
      { 
       s = fabs(a.values[l - 1][l - 1]) + fabs(a.values[l][l]);	
       if (s == 0.0) 
         s = anorm; 
       if (fabs(a.values[l][l - 1]) <= EPS * s) 
        {
         a.values[l][l - 1] = 0.0; 
         break;
        }
      } 
      x = a.values[nn][nn]; 
      if (l == nn) 
       {	
        eigenvalues[nn] = a.values[nn][nn] = x + t;
        nn--; 
       } 
      else 
       {
        y = a.values[nn - 1][nn-1]; 
        w = a.values[nn][nn-1] * a.values[nn-1][nn]; 
        if (l == nn - 1) 
         {	
          p = 0.5 * (y - x); 
          q = p * p + w;
          z = sqrt(fabs(q)); 
          x += t; 
          a.values[nn][nn] = x; 
          a.values[nn - 1][nn - 1] = y + t; 
          if (q >= 0.0) 
           {
            z = p + change_sign(z,p); 
            eigenvalues[nn - 1] = eigenvalues[nn] = x + z; 
            if (z != 0.0) 
              eigenvalues[nn] = x - w / z; 
            x = a.values[nn][nn - 1]; 
            s = fabs(x) + fabs(z); 
            p = x / s; 
            q = z / s; 
            r = sqrt(p * p + q * q); 
            p /= r; 
            q /= r; 
            for (j = nn - 1; j < a.row; j++) 
             {	
              z = a.values[nn - 1][j]; 
              a.values[nn - 1][j] = q * z + p * a.values[nn][j]; 
              a.values[nn][j] = q * a.values[nn][j] - p * z;
             } 
            for (i = 0; i <= nn; i++) 
             {	
              z = a.values[i][nn - 1]; 
              a.values[i][nn - 1] = q * z + p * a.values[i][nn]; 
              a.values[i][nn] = q * a.values[i][nn] - p * z;
             } 
            for (i = 0; i < a.row; i++) 
             {	
              z = eigenvectors->values[i][nn - 1]; 
              eigenvectors->values[i][nn - 1] = q * z + p * eigenvectors->values[i][nn]; 
              eigenvectors->values[i][nn] = q * eigenvectors->values[i][nn] - p * z;
             } 
           } 
          else 
           {
            printf("Complex eigenvalues. Exiting\n");
            return NULL;
           }
          nn -= 2; 
         } 
        else 
         {	
          if (its == 30) 
           {
            printf("Too many iterations. Exiting\n");
            return NULL;
           } 
          if (its == 10 || its == 20) 
           {	
            t += x; 
            for (i = 0; i < nn + 1; i++) 
              a.values[i][i] -= x; 
            s = fabs(a.values[nn][nn - 1]) + fabs(a.values[nn - 1][nn - 2]); 
            y = x = 0.75 * s; 
            w = -0.4375 * s * s;
           } 
          its++; 
          for (m = nn - 2; m >= l; m--) 
           {
            z = a.values[m][m]; 
            r = x - z; 
            s = y - z; 
            p = (r * s - w) / a.values[m + 1][m] + a.values[m][m + 1]; 
            q = a.values[m + 1][m + 1] - z - r - s; 
            r = a.values[m + 2][m + 1]; 
            s = fabs(p) + fabs(q) + fabs(r);
            p /= s; 
            q /= s; 
            r /= s; 
            if (m == l) 
              break; 
            u = fabs(a.values[m][m - 1]) * (fabs(q) + fabs(r)); 
            v = fabs(p) * (fabs(a.values[m - 1][m - 1]) + fabs(z) + fabs(a.values[m + 1][m + 1]));
            if (u <= EPS * v) 
              break;
           } 
          for (i = m; i < nn - 1; i++) 
           {
            a.values[i + 2][i] = 0.0; 
            if (i != m) 
              a.values[i + 2][i - 1] = 0.0;
           } 
          for (k = m; k < nn; k++) 
           { 
            if (k != m) 
             { 
              p = a.values[k][k - 1];	
              q = a.values[k + 1][k - 1];	
              r = 0.0; 
              if (k + 1 != nn) 
                r = a.values[k + 2][k - 1]; 
              if ((x = fabs(p) + fabs(q) + fabs(r)) != 0.0) 
               {
                p /= x;	
                q /= x;	
                r /= x;
               }
             } 
            if ((s = change_sign(sqrt(p * p + q * q + r * r), p)) != 0.0) 
             {
              if (k == m) 
               { 
                if (l != m)
                  a.values[k][k - 1] = -a.values[k][k - 1]; 
               } 
              else
                a.values[k][k - 1] = -s * x; 
              p += s;
              x = p / s; 
              y = q / s; 
              z = r / s; 
              q /= p; 
              r /= p; 
              for (j = k; j < a.row; j++) 
               {
                p = a.values[k][j] + q * a.values[k+1][j]; 
                if (k+1 != nn) 
                 {
                  p += r * a.values[k + 2][j]; 
                  a.values[k + 2][j] -= p * z;
                 } 
                a.values[k + 1][j] -= p * y; 
                a.values[k][j] -= p * x;
               } 
              mmin = nn < k + 3 ? nn : k + 3; 
              for (i = 0; i < mmin + 1; i++) 
               {
                p = x * a.values[i][k] + y * a.values[i][k + 1]; 
                if (k + 1 != nn) 
                 {
                  p += z * a.values[i][k + 2]; 
                  a.values[i][k + 2] -= p * r;
                 } 
                a.values[i][k + 1] -= p * q; 
                a.values[i][k] -= p;
               } 
              for (i = 0; i < a.row; i++) 
               {
                p = x * eigenvectors->values[i][k] + y * eigenvectors->values[i][k + 1]; 
                if (k + 1 != nn) 
                 {
                  p += z * eigenvectors->values[i][k + 2]; 
                  eigenvectors->values[i][k + 2] -= p * r;
                 } 
                eigenvectors->values[i][k + 1] -= p * q; 
                eigenvectors->values[i][k] -= p;
               }
             } 
           } 
         }
       }
   }while (l + 1 < nn);
 }
 if (anorm != 0.0) 
  { 
   for (nn = a.row - 1; nn >= 0; nn--) 
    {
     p = eigenvalues[nn];
     na = nn - 1; 
     m = nn; 
     a.values[nn][nn] = 1.0; 
     for (i = nn - 1; i >= 0;i--) 
      {
       w = a.values[i][i] - p; 
       r = 0.0; 
       for (j = m; j <= nn; j++)
         r += a.values[i][j] * a.values[j][nn]; 
       m = i;
       t = w;
       if (t == 0.0) 
         t = EPS * anorm;
       a.values[i][nn] = -r / t; 
       t = fabs(a.values[i][nn]); 
       if (EPS * t * t > 1)
         for (j = i; j <= nn; j++) 
           a.values[j][nn] /= t;
      }
    }
   for (j = a.row - 1; j >= 0; j--)
     for (i = 0; i < a.row; i++)
      {
       z = 0.0;
       for (k = 0; k <= j; k++)
         z += eigenvectors->values[i][k] * a.values[k][j];
       eigenvectors->values[i][j] = z;
      }
  }
 return eigenvalues;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0xa8, %rsp
movq %rdx, %r14
movq %rsi, %r12
movq %rdi, 0x90(%rsp)
movslq %r12d, %rbx
leaq (,%rbx,8), %rdi
leaq 0x66818(%rip), %rsi     # 0xa6f95
movl $0x5, %edx
callq 0x390f5
movq %rax, %r13
testl %ebx, %ebx
jle 0x407f4
movl %r12d, %ebx
andl $0x7fffffff, %ebx       # imm = 0x7FFFFFFF
xorpd %xmm10, %xmm10
xorl %r15d, %r15d
movapd %xmm10, 0x30(%rsp)
leal -0x1(%r15), %edi
xorl %esi, %esi
callq 0x38df1
cmpl %r12d, %eax
jge 0x407e3
movq (%r14,%r15,8), %rcx
cltq
movapd 0x30(%rsp), %xmm10
movapd 0x62a15(%rip), %xmm1    # 0xa31e0
movsd (%rcx,%rax,8), %xmm0
andpd %xmm1, %xmm0
addsd %xmm0, %xmm10
incq %rax
cmpq %rax, %rbx
jne 0x407cb
jmp 0x407ea
movapd 0x30(%rsp), %xmm10
incq %r15
cmpq %rbx, %r15
jne 0x4079f
jmp 0x407f9
xorpd %xmm10, %xmm10
leal -0x1(%r12), %eax
movl %eax, 0x2c(%rsp)
movq %r12, 0x18(%rsp)
testl %r12d, %r12d
movq %r13, 0x98(%rsp)
jle 0x411fb
movq 0x18(%rsp), %r15
andl $0x7fffffff, %r15d      # imm = 0x7FFFFFFF
leaq 0x10(%r14), %rax
movq %rax, 0xa0(%rsp)
xorpd %xmm5, %xmm5
xorl %edi, %edi
movapd 0x629a2(%rip), %xmm6    # 0xa31e0
movsd 0x6663a(%rip), %xmm7    # 0xa6e80
xorpd %xmm0, %xmm0
movsd %xmm0, 0x58(%rsp)
movl 0x2c(%rsp), %eax
movapd %xmm10, 0x30(%rsp)
movl %eax, %ebx
leaq (,%rbx,8), %rax
leaq (%r14,%rbx,8), %rcx
xorl %esi, %esi
movq %rsi, %rbp
leal (%rbx,%rsi), %edx
testl %edx, %edx
jle 0x408da
movq -0x8(%rcx,%rbp,8), %rdx
addq %rax, %rdx
movsd -0x8(%rdx,%rbp,8), %xmm0
andpd %xmm6, %xmm0
movq (%rcx,%rbp,8), %rdx
leaq (%rdx,%rax), %rsi
movsd -0x8(%rsi,%rbp,8), %xmm1
movsd (%rsi,%rbp,8), %xmm2
andpd %xmm6, %xmm2
addsd %xmm0, %xmm2
movapd %xmm2, %xmm0
cmpeqsd %xmm5, %xmm0
movapd %xmm0, %xmm3
andnpd %xmm2, %xmm3
andpd %xmm10, %xmm0
orpd %xmm3, %xmm0
andpd %xmm6, %xmm1
mulsd %xmm7, %xmm0
leaq -0x1(%rbp), %rsi
ucomisd %xmm1, %xmm0
jb 0x4086b
leaq (%rdx,%rbx,8), %rax
movq $0x0, (%rax,%rsi,8)
movq (%r14,%rbx,8), %rax
movsd (%rax,%rbx,8), %xmm12
testl %ebp, %ebp
je 0x40933
movq %rdi, 0x20(%rsp)
movslq %ebx, %rdx
leaq -0x1(%rdx), %r12
movq -0x8(%r14,%rdx,8), %rcx
movsd -0x8(%rcx,%rdx,8), %xmm14
movsd -0x8(%rax,%rdx,8), %xmm13
mulsd (%rcx,%rbx,8), %xmm13
cmpl $-0x1, %ebp
je 0x40b07
movq 0x20(%rsp), %rdx
cmpl $0xa, %edx
je 0x4094f
cmpl $0x14, %edx
je 0x4094f
cmpl $0x1e, %edx
jne 0x409c5
jmp 0x4146b
addsd 0x58(%rsp), %xmm12
movsd %xmm12, (%rax,%rbx,8)
movsd %xmm12, (%r13,%rbx,8)
leal -0x1(%rbx), %eax
jmp 0x411e1
testl %ebx, %ebx
js 0x40973
leal 0x1(%rbx), %edx
xorl %esi, %esi
movq (%r14,%rsi,8), %rdi
movsd (%rdi,%rsi,8), %xmm0
subsd %xmm12, %xmm0
movsd %xmm0, (%rdi,%rsi,8)
incq %rsi
cmpq %rsi, %rdx
jne 0x40958
movsd 0x58(%rsp), %xmm0
addsd %xmm12, %xmm0
movsd %xmm0, 0x58(%rsp)
movsd (%rax,%r12,8), %xmm0
andpd %xmm6, %xmm0
movslq %ebx, %rax
movsd -0x10(%rcx,%rax,8), %xmm1
andpd %xmm6, %xmm1
addsd %xmm0, %xmm1
movapd %xmm1, %xmm13
mulsd 0x664db(%rip), %xmm13   # 0xa6e88
mulsd %xmm1, %xmm13
movapd %xmm1, %xmm14
mulsd 0x642d0(%rip), %xmm14   # 0xa4c90
movapd %xmm14, %xmm12
leaq (%rbx,%rbp), %rcx
leal -0x2(%rbx), %eax
movq %rcx, 0x60(%rsp)
cmpl %ecx, %eax
jl 0x40de5
xorpd 0x627ee(%rip), %xmm13   # 0xa31d0
movslq %eax, %rcx
movslq %ebx, %rdx
subq %rcx, %rdx
addq %rbp, %rdx
leaq (%r14,%rcx,8), %rsi
shlq $0x3, %rcx
xorl %eax, %eax
movq (%rsi,%rax,8), %rdi
addq %rcx, %rdi
movsd (%rdi,%rax,8), %xmm0
movapd %xmm12, %xmm11
subsd %xmm0, %xmm11
movapd %xmm14, %xmm3
subsd %xmm0, %xmm3
movq 0x8(%rsi,%rax,8), %r8
addq %rcx, %r8
movsd 0x8(%r8,%rax,8), %xmm1
movapd %xmm1, %xmm8
subsd %xmm0, %xmm8
subsd %xmm11, %xmm8
mulsd %xmm3, %xmm11
addsd %xmm13, %xmm11
divsd (%r8,%rax,8), %xmm11
addsd 0x8(%rdi,%rax,8), %xmm11
subsd %xmm3, %xmm8
movq 0x10(%rsi,%rax,8), %r8
addq %rcx, %r8
movsd 0x8(%r8,%rax,8), %xmm9
movapd %xmm11, %xmm2
andpd %xmm6, %xmm2
movapd %xmm8, %xmm3
andpd %xmm6, %xmm3
addsd %xmm2, %xmm3
movapd %xmm9, %xmm2
andpd %xmm6, %xmm2
addsd %xmm3, %xmm2
divsd %xmm2, %xmm11
divsd %xmm2, %xmm8
divsd %xmm2, %xmm9
cmpq %rax, %rdx
je 0x40de0
movsd -0x8(%rdi,%rax,8), %xmm2
andpd %xmm6, %xmm2
movapd %xmm8, %xmm3
andpd %xmm6, %xmm3
movapd %xmm9, %xmm4
andpd %xmm6, %xmm4
addsd %xmm3, %xmm4
mulsd %xmm2, %xmm4
movapd %xmm11, %xmm2
andpd %xmm6, %xmm2
movq -0x8(%rsi,%rax,8), %rdi
addq %rcx, %rdi
movsd -0x8(%rdi,%rax,8), %xmm3
andpd %xmm6, %xmm3
andpd %xmm6, %xmm0
addsd %xmm3, %xmm0
andpd %xmm6, %xmm1
addsd %xmm0, %xmm1
mulsd %xmm2, %xmm1
mulsd %xmm7, %xmm1
decq %rax
ucomisd %xmm4, %xmm1
jb 0x409f8
addl %r12d, %eax
jmp 0x40de5
movapd %xmm14, %xmm1
subsd %xmm12, %xmm1
mulsd 0x621ff(%rip), %xmm1    # 0xa2d18
movapd %xmm1, %xmm3
mulsd %xmm1, %xmm3
addsd %xmm13, %xmm3
movapd %xmm3, %xmm0
andpd 0x626ae(%rip), %xmm0    # 0xa31e0
ucomisd %xmm5, %xmm0
movapd %xmm13, 0x40(%rsp)
movsd %xmm1, (%rsp)
jb 0x40b4a
sqrtsd %xmm0, %xmm0
jmp 0x40b86
movapd %xmm12, 0x70(%rsp)
movapd %xmm14, 0x80(%rsp)
movapd %xmm3, 0x60(%rsp)
callq 0x4300
movapd 0x60(%rsp), %xmm3
movsd (%rsp), %xmm1
movapd 0x80(%rsp), %xmm14
movapd 0x70(%rsp), %xmm12
xorpd %xmm5, %xmm5
movsd 0x58(%rsp), %xmm2
addsd %xmm2, %xmm12
movq (%r14,%rbx,8), %rax
movsd %xmm12, (%rax,%rbx,8)
addsd %xmm2, %xmm14
movq (%r14,%r12,8), %rax
movsd %xmm14, (%rax,%r12,8)
ucomisd %xmm5, %xmm3
jb 0x41462
movapd %xmm12, 0x70(%rsp)
callq 0x38d28
movapd 0x70(%rsp), %xmm1
xorpd %xmm5, %xmm5
movapd %xmm0, %xmm8
addsd (%rsp), %xmm8
movapd %xmm1, %xmm0
addsd %xmm8, %xmm0
movsd %xmm0, (%r13,%rbx,8)
movsd %xmm0, (%r13,%r12,8)
ucomisd %xmm5, %xmm8
jne 0x40bf5
jnp 0x40c0b
movapd 0x40(%rsp), %xmm0
divsd %xmm8, %xmm0
subsd %xmm0, %xmm1
movsd %xmm1, (%r13,%rbx,8)
movq (%r14,%rbx,8), %rax
movsd (%rax,%r12,8), %xmm11
movapd %xmm11, %xmm0
movapd 0x625be(%rip), %xmm6    # 0xa31e0
andpd %xmm6, %xmm0
movapd %xmm8, %xmm1
andpd %xmm6, %xmm1
addsd %xmm0, %xmm1
divsd %xmm1, %xmm11
divsd %xmm1, %xmm8
movapd %xmm8, %xmm1
mulsd %xmm8, %xmm1
movapd %xmm11, %xmm0
mulsd %xmm11, %xmm0
addsd %xmm1, %xmm0
ucomisd %xmm5, %xmm0
jb 0x40c62
sqrtsd %xmm0, %xmm9
jmp 0x40c92
movapd %xmm8, 0x40(%rsp)
movapd %xmm11, (%rsp)
callq 0x4300
movapd (%rsp), %xmm11
movapd 0x40(%rsp), %xmm8
movapd 0x62557(%rip), %xmm6    # 0xa31e0
xorpd %xmm5, %xmm5
movapd %xmm0, %xmm9
movapd 0x30(%rsp), %xmm10
movsd 0x661df(%rip), %xmm7    # 0xa6e80
divsd %xmm9, %xmm11
divsd %xmm9, %xmm8
movq 0x18(%rsp), %r8
cmpl %r8d, %ebx
jg 0x40d1d
movapd %xmm11, %xmm0
xorpd 0x6250e(%rip), %xmm0    # 0xa31d0
movl %r12d, %eax
leaq (,%rax,8), %rcx
movq (%r14,%rbx,8), %rdx
addq %rcx, %rdx
addq (%r14,%r12,8), %rcx
xorl %esi, %esi
movsd (%rcx,%rsi,8), %xmm1
movsd (%rdx,%rsi,8), %xmm2
mulsd %xmm11, %xmm2
movapd %xmm8, %xmm3
mulsd %xmm1, %xmm3
addsd %xmm2, %xmm3
movsd %xmm3, (%rcx,%rsi,8)
mulsd %xmm0, %xmm1
movsd (%rdx,%rsi,8), %xmm2
mulsd %xmm8, %xmm2
addsd %xmm1, %xmm2
movsd %xmm2, (%rdx,%rsi,8)
incq %rsi
leal (%rsi,%rax), %edi
cmpl %r8d, %edi
jl 0x40cda
testl %ebx, %ebx
js 0x40d78
movapd %xmm11, %xmm0
xorpd 0x624a2(%rip), %xmm0    # 0xa31d0
leal 0x1(%rbx), %eax
xorl %ecx, %ecx
movq (%r14,%rcx,8), %rdx
movsd (%rdx,%r12,8), %xmm1
movsd (%rdx,%rbx,8), %xmm2
movapd %xmm11, %xmm3
mulsd %xmm2, %xmm3
movapd %xmm8, %xmm4
mulsd %xmm1, %xmm4
addsd %xmm3, %xmm4
movsd %xmm4, (%rdx,%r12,8)
mulsd %xmm0, %xmm1
mulsd %xmm8, %xmm2
addsd %xmm1, %xmm2
movsd %xmm2, (%rdx,%rbx,8)
incq %rcx
cmpq %rcx, %rax
jne 0x40d33
movq 0x90(%rsp), %rax
movq 0x8(%rax), %rax
movapd %xmm11, %xmm0
xorpd 0x6243f(%rip), %xmm0    # 0xa31d0
xorl %ecx, %ecx
movq (%rax,%rcx,8), %rdx
movsd (%rdx,%r12,8), %xmm1
movsd (%rdx,%rbx,8), %xmm2
movapd %xmm11, %xmm3
mulsd %xmm2, %xmm3
movapd %xmm8, %xmm4
mulsd %xmm1, %xmm4
addsd %xmm3, %xmm4
movsd %xmm4, (%rdx,%r12,8)
mulsd %xmm0, %xmm1
mulsd %xmm8, %xmm2
addsd %xmm1, %xmm2
movsd %xmm2, (%rdx,%rbx,8)
incq %rcx
cmpq %rcx, %r15
jne 0x40d93
leal -0x2(%rbx), %eax
jmp 0x411d8
movq 0x60(%rsp), %rax
cmpl %r12d, %eax
jge 0x40e2b
movslq %eax, %rsi
leaq -0x8(,%rsi,8), %rcx
movq 0xa0(%rsp), %rdx
leaq (%rdx,%rsi,8), %rdx
subq %rsi, %r12
xorl %esi, %esi
movq (%rdx,%rsi,8), %rdi
addq %rcx, %rdi
movq $0x0, 0x8(%rdi,%rsi,8)
testq %rsi, %rsi
je 0x40e23
movq $0x0, (%rdi,%rsi,8)
incq %rsi
cmpq %rsi, %r12
jne 0x40e06
movq 0x20(%rsp), %rdi
incl %edi
cmpl %ebx, %eax
jge 0x411df
movq %rdi, 0x20(%rsp)
movslq %eax, %r13
negl %eax
addq %rax, 0x60(%rsp)
movq %r13, %r12
cmpq %r13, %r12
je 0x40ebf
leaq 0x1(%r12), %rax
xorpd %xmm9, %xmm9
cmpl %eax, %ebx
je 0x40e6b
movq 0x10(%r14,%r12,8), %rax
movsd -0x8(%rax,%r12,8), %xmm9
movq (%r14,%r12,8), %rax
movq 0x8(%r14,%r12,8), %rcx
movsd -0x8(%rax,%r12,8), %xmm11
movsd -0x8(%rcx,%r12,8), %xmm8
movapd %xmm11, %xmm0
andpd %xmm6, %xmm0
movapd %xmm8, %xmm1
andpd %xmm6, %xmm1
addsd %xmm0, %xmm1
movapd %xmm9, %xmm12
andpd %xmm6, %xmm12
addsd %xmm1, %xmm12
ucomisd %xmm5, %xmm12
jne 0x40eb0
jnp 0x40ebf
divsd %xmm12, %xmm11
divsd %xmm12, %xmm8
divsd %xmm12, %xmm9
movapd %xmm8, %xmm0
mulsd %xmm8, %xmm0
movapd %xmm11, %xmm1
mulsd %xmm11, %xmm1
addsd %xmm0, %xmm1
movapd %xmm9, %xmm0
mulsd %xmm9, %xmm0
addsd %xmm1, %xmm0
ucomisd %xmm5, %xmm0
movapd %xmm8, 0x40(%rsp)
movapd %xmm9, 0x80(%rsp)
movapd %xmm11, (%rsp)
movapd %xmm12, 0x70(%rsp)
jb 0x40f0f
sqrtsd %xmm0, %xmm0
jmp 0x40f1a
callq 0x4300
movapd (%rsp), %xmm11
movapd %xmm11, %xmm1
callq 0x38d28
xorpd %xmm5, %xmm5
ucomisd %xmm5, %xmm0
jne 0x40f30
jnp 0x40f8b
cmpq %r13, %r12
movapd 0x30(%rsp), %xmm10
movapd 0x6229e(%rip), %xmm6    # 0xa31e0
movsd 0x65f36(%rip), %xmm7    # 0xa6e80
movapd 0x40(%rsp), %xmm8
movapd 0x80(%rsp), %xmm9
movapd 0x70(%rsp), %xmm2
jne 0x40fc5
cmpl $0x0, 0x60(%rsp)
movapd (%rsp), %xmm3
je 0x40fe5
movq (%r14,%r12,8), %rax
movsd -0x8(%rax,%r12,8), %xmm1
xorpd 0x6224e(%rip), %xmm1    # 0xa31d0
movlpd %xmm1, -0x8(%rax,%r12,8)
jmp 0x40fe5
movapd 0x30(%rsp), %xmm10
movapd 0x62246(%rip), %xmm6    # 0xa31e0
movsd 0x65ede(%rip), %xmm7    # 0xa6e80
movapd 0x40(%rsp), %xmm8
movapd 0x80(%rsp), %xmm9
movapd (%rsp), %xmm11
movapd 0x70(%rsp), %xmm12
jmp 0x411c2
movapd %xmm0, %xmm1
xorpd 0x621ff(%rip), %xmm1    # 0xa31d0
mulsd %xmm1, %xmm2
movq (%r14,%r12,8), %rax
movsd %xmm2, -0x8(%rax,%r12,8)
movapd (%rsp), %xmm3
addsd %xmm0, %xmm3
movapd %xmm3, %xmm12
divsd %xmm0, %xmm12
movapd %xmm8, %xmm1
divsd %xmm0, %xmm1
movapd %xmm9, %xmm2
divsd %xmm0, %xmm2
divsd %xmm3, %xmm8
divsd %xmm3, %xmm9
cmpq %r15, %r12
jge 0x41091
movq (%r14,%r12,8), %rax
movq 0x8(%r14,%r12,8), %rcx
leaq 0x1(%r12), %rdx
movq %r12, %rsi
movsd (%rcx,%rsi,8), %xmm0
mulsd %xmm8, %xmm0
addsd (%rax,%rsi,8), %xmm0
cmpl %edx, %ebx
je 0x41060
movq 0x10(%r14,%r12,8), %rdi
movsd (%rdi,%rsi,8), %xmm3
movapd %xmm9, %xmm4
mulsd %xmm3, %xmm4
addsd %xmm4, %xmm0
movapd %xmm0, %xmm4
mulsd %xmm2, %xmm4
subsd %xmm4, %xmm3
movsd %xmm3, (%rdi,%rsi,8)
movsd (%rcx,%rsi,8), %xmm3
movapd %xmm0, %xmm4
mulsd %xmm1, %xmm4
subsd %xmm4, %xmm3
movsd %xmm3, (%rcx,%rsi,8)
movsd (%rax,%rsi,8), %xmm3
mulsd %xmm12, %xmm0
subsd %xmm0, %xmm3
movsd %xmm3, (%rax,%rsi,8)
incq %rsi
cmpq %r15, %rsi
jl 0x41025
leal 0x3(%r12), %ecx
cmpl %ecx, %ebx
cmovll %ebx, %ecx
testl %ecx, %ecx
js 0x4112a
leal 0x1(%r12), %eax
movl %ecx, %ecx
movq $-0x1, %rdx
movq 0x8(%r14,%rdx,8), %rsi
movsd 0x8(%rsi,%r12,8), %xmm3
mulsd %xmm1, %xmm3
movsd (%rsi,%r12,8), %xmm0
mulsd %xmm12, %xmm0
addsd %xmm3, %xmm0
cmpl %eax, %ebx
je 0x410fb
movsd 0x10(%rsi,%r12,8), %xmm3
movapd %xmm2, %xmm4
mulsd %xmm3, %xmm4
addsd %xmm4, %xmm0
movapd %xmm0, %xmm4
mulsd %xmm9, %xmm4
subsd %xmm4, %xmm3
movsd %xmm3, 0x10(%rsi,%r12,8)
movsd (%rsi,%r12,8), %xmm3
movsd 0x8(%rsi,%r12,8), %xmm4
subsd %xmm0, %xmm3
mulsd %xmm8, %xmm0
subsd %xmm0, %xmm4
movsd %xmm4, 0x8(%rsi,%r12,8)
movsd %xmm3, (%rsi,%r12,8)
incq %rdx
cmpq %rcx, %rdx
jb 0x410b1
movq 0x90(%rsp), %rax
movq 0x8(%rax), %rax
leal 0x1(%r12), %ecx
xorl %edx, %edx
movq (%rax,%rdx,8), %rsi
movsd 0x8(%rsi,%r12,8), %xmm0
mulsd %xmm1, %xmm0
movsd (%rsi,%r12,8), %xmm11
mulsd %xmm12, %xmm11
addsd %xmm0, %xmm11
cmpl %ecx, %ebx
je 0x41189
movsd 0x10(%rsi,%r12,8), %xmm0
movapd %xmm2, %xmm3
mulsd %xmm0, %xmm3
addsd %xmm3, %xmm11
movapd %xmm11, %xmm3
mulsd %xmm9, %xmm3
subsd %xmm3, %xmm0
movsd %xmm0, 0x10(%rsi,%r12,8)
movsd (%rsi,%r12,8), %xmm0
movsd 0x8(%rsi,%r12,8), %xmm3
movapd %xmm11, %xmm4
mulsd %xmm8, %xmm4
subsd %xmm4, %xmm3
movsd %xmm3, 0x8(%rsi,%r12,8)
subsd %xmm11, %xmm0
movsd %xmm0, (%rsi,%r12,8)
incq %rdx
cmpq %rdx, %r15
jne 0x4113d
incq %r12
cmpl %r12d, %ebx
jne 0x40e4c
movl %ebx, %eax
movq 0x98(%rsp), %r13
movq 0x20(%rsp), %rdi
jmp 0x411e1
movl %ebx, %eax
leal (%rbx,%rbp), %ecx
incl %ecx
cmpl %eax, %ecx
jl 0x4085b
movl $0x0, %edi
testl %eax, %eax
jns 0x4085b
xorpd %xmm0, %xmm0
ucomisd %xmm0, %xmm10
jne 0x4120c
jnp 0x4147a
movl 0x2c(%rsp), %eax
cmpl $0x0, 0x18(%rsp)
jle 0x413f7
mulsd 0x65c5c(%rip), %xmm10   # 0xa6e80
movq 0x18(%rsp), %rcx
addl $-0x2, %ecx
movslq %ecx, %rcx
movq %rax, %rdx
shlq $0x20, %rdx
movq %rdx, 0x40(%rsp)
leaq (,%rax,8), %rdx
movq %rdx, 0x80(%rsp)
leaq (%r14,%rax,8), %rdx
movq %rdx, 0x30(%rsp)
leaq (%r14,%rcx,8), %rcx
movq %rcx, 0x60(%rsp)
movapd 0x61f6b(%rip), %xmm1    # 0xa31d0
movapd 0x61f73(%rip), %xmm2    # 0xa31e0
movsd 0x65c0b(%rip), %xmm3    # 0xa6e80
movsd 0x612a3(%rip), %xmm4    # 0xa2520
movabsq $0x100000000, %r10      # imm = 0x100000000
movq %rax, %r11
movsd (%r13,%r11,8), %xmm5
movq (%r14,%r11,8), %rcx
movabsq $0x3ff0000000000000, %rdx # imm = 0x3FF0000000000000
movq %rdx, (%rcx,%r11,8)
testq %r11, %r11
jle 0x413bb
movl $0x2, %ebx
movq 0x60(%rsp), %r15
movq 0x80(%rsp), %r12
movq 0x30(%rsp), %r13
movq 0x40(%rsp), %rdx
movq %r11, %rdi
movq %rdi, %r8
leaq -0x1(%rdi), %rcx
movq %rcx, (%rsp)
movl %ecx, %edi
movq (%r14,%rdi,8), %rsi
movq %r8, 0x70(%rsp)
movslq %r8d, %rcx
xorpd %xmm6, %xmm6
cmpq %r11, %rcx
jg 0x4131e
leaq (%rsi,%r12), %r8
xorl %ecx, %ecx
movq %rdx, %rbp
movsd (%r8,%rcx), %xmm7
movq (%r13,%rcx), %r9
mulsd (%r9,%r11,8), %xmm7
addsd %xmm7, %xmm6
movq %rbp, %r9
sarq $0x20, %r9
addq %r10, %rbp
addq $0x8, %rcx
cmpq %r11, %r9
jl 0x412f6
xorpd %xmm1, %xmm6
movsd (%rsi,%rdi,8), %xmm7
subsd %xmm5, %xmm7
movapd %xmm7, %xmm8
cmpeqsd %xmm0, %xmm8
movapd %xmm8, %xmm9
andpd %xmm10, %xmm9
andnpd %xmm7, %xmm8
orpd %xmm9, %xmm8
divsd %xmm8, %xmm6
movsd %xmm6, (%rsi,%r11,8)
andpd %xmm2, %xmm6
movapd %xmm6, %xmm7
mulsd %xmm3, %xmm7
mulsd %xmm6, %xmm7
ucomisd %xmm4, %xmm7
movq (%rsp), %rdi
jbe 0x41394
movslq %edi, %rcx
cmpq %r11, %rcx
jg 0x41394
xorl %ecx, %ecx
movq (%r15,%rcx,8), %rsi
movsd (%rsi,%r11,8), %xmm7
divsd %xmm6, %xmm7
movsd %xmm7, (%rsi,%r11,8)
incq %rcx
cmpl %ecx, %ebx
jne 0x41379
movabsq $-0x100000000, %rcx     # imm = 0xFFFFFFFF00000000
addq %rcx, %rdx
addq $-0x8, %r13
addq $-0x8, %r12
addq $-0x8, %r15
incq %rbx
cmpl $0x1, 0x70(%rsp)
jg 0x412cb
leaq -0x1(%r11), %rcx
movabsq $-0x100000000, %rdx     # imm = 0xFFFFFFFF00000000
addq %rdx, 0x40(%rsp)
addq $-0x8, 0x30(%rsp)
addq $-0x8, 0x80(%rsp)
addq $-0x8, 0x60(%rsp)
testq %r11, %r11
movq %rcx, %r11
movq 0x98(%rsp), %r13
jg 0x4128a
movq 0x18(%rsp), %r10
testl %r10d, %r10d
jle 0x4147a
andl $0x7fffffff, %r10d      # imm = 0x7FFFFFFF
movq 0x90(%rsp), %rcx
movq 0x8(%rcx), %rcx
movq %r10, %rdx
xorl %esi, %esi
movq (%rcx,%rsi,8), %rdi
xorpd %xmm0, %xmm0
xorl %r8d, %r8d
movsd (%rdi,%r8,8), %xmm1
movq (%r14,%r8,8), %r9
mulsd (%r9,%rax,8), %xmm1
addsd %xmm1, %xmm0
incq %r8
cmpq %r8, %rdx
jne 0x41424
movq (%rcx,%rsi,8), %rdi
movsd %xmm0, (%rdi,%rax,8)
incq %rsi
cmpq %r10, %rsi
jne 0x41419
leaq -0x1(%rax), %rsi
decq %rdx
testq %rax, %rax
movq %rsi, %rax
jg 0x41417
jmp 0x4147a
leaq 0x65d55(%rip), %rdi     # 0xa71be
jmp 0x41472
leaq 0x65d2f(%rip), %rdi     # 0xa71a1
callq 0x4090
xorl %r13d, %r13d
movq %r13, %rax
addq $0xa8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq