// File: /workspace/github_c_makefile_star2_O2/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 $0xb8, %rsp
movq %rdx, %rbx
movq %rsi, %r12
movq %rdi, %r14
movslq %r12d, %r13
leaq (,%r13,8), %rdi
leaq 0x5e690(%rip), %rsi     # 0x99f65
pushq $0x5
popq %rdx
callq 0x34f59
movq %rax, 0x8(%rsp)
xorl %r15d, %r15d
testl %r13d, %r13d
movl $0x0, %ebp
cmovgl %r12d, %ebp
xorpd %xmm7, %xmm7
cmpq %rbp, %r15
movapd %xmm7, 0x60(%rsp)
je 0x3b937
leal -0x1(%r15), %edi
xorl %esi, %esi
callq 0x34cd5
movapd 0x60(%rsp), %xmm7
cltq
cmpq %r13, %rax
jge 0x3b932
movq (%rbx,%r15,8), %rcx
movsd (%rcx,%rax,8), %xmm0
andpd 0x5a8b7(%rip), %xmm0    # 0x961e0
addsd %xmm0, %xmm7
incq %rax
jmp 0x3b913
incq %r15
jmp 0x3b8f5
leal -0x1(%r12), %eax
xorpd %xmm9, %xmm9
movapd 0x5a896(%rip), %xmm10   # 0x961e0
movapd 0x5a87d(%rip), %xmm8    # 0x961d0
xorpd %xmm0, %xmm0
movsd %xmm0, 0x40(%rsp)
movl %eax, 0x18(%rsp)
movq %r12, 0x78(%rsp)
movq %r14, 0x48(%rsp)
testl %eax, %eax
js 0x3c359
movl $0x0, 0x1c(%rsp)
movl %eax, %r15d
leaq (,%r15,8), %rax
leaq (%rbx,%r15,8), %rcx
xorl %esi, %esi
movq %rsi, %r8
leal (%r15,%rsi), %edx
testl %edx, %edx
jle 0x3ba03
movq -0x8(%rcx,%r8,8), %rdx
addq %rax, %rdx
movsd -0x8(%rdx,%r8,8), %xmm0
andpd %xmm10, %xmm0
movq (%rcx,%r8,8), %rdx
leaq (%rdx,%rax), %rsi
movsd -0x8(%rsi,%r8,8), %xmm1
movsd (%rsi,%r8,8), %xmm2
andpd %xmm10, %xmm2
addsd %xmm0, %xmm2
movapd %xmm2, %xmm0
cmpeqsd %xmm9, %xmm0
movapd %xmm0, %xmm3
andnpd %xmm2, %xmm3
andpd %xmm7, %xmm0
orpd %xmm3, %xmm0
andpd %xmm10, %xmm1
mulsd 0x5e428(%rip), %xmm0    # 0x99e18
leaq -0x1(%r8), %rsi
ucomisd %xmm1, %xmm0
jb 0x3b98c
leaq (%rdx,%r15,8), %rax
andq $0x0, (%rax,%rsi,8)
movq (%rbx,%r15,8), %rax
movsd (%rax,%r15,8), %xmm13
testl %r8d, %r8d
je 0x3ba68
leaq (%r15,%r8), %r9
movslq %r15d, %rdx
leaq -0x1(%rdx), %r10
movq -0x8(%rbx,%rdx,8), %rcx
movsd -0x8(%rcx,%rdx,8), %xmm1
movsd -0x8(%rax,%rdx,8), %xmm5
mulsd (%rcx,%r15,8), %xmm5
cmpl $-0x1, %r8d
movq %r8, 0x10(%rsp)
movq %r9, 0x20(%rsp)
je 0x3bc5b
movl 0x1c(%rsp), %r12d
cmpl $0xa, %r12d
je 0x3ba89
cmpl $0x14, %r12d
je 0x3ba89
cmpl $0x1e, %r12d
jne 0x3baf3
jmp 0x3c339
addsd 0x40(%rsp), %xmm13
movsd %xmm13, (%rax,%r15,8)
movq 0x8(%rsp), %rax
movsd %xmm13, (%rax,%r15,8)
leal -0x1(%r15), %eax
jmp 0x3c31d
movsd 0x40(%rsp), %xmm0
addsd %xmm13, %xmm0
movsd %xmm0, 0x40(%rsp)
movslq %r15d, %rdx
xorl %esi, %esi
cmpq %rdx, %rsi
jg 0x3babc
movq (%rbx,%rsi,8), %rdi
movsd (%rdi,%rsi,8), %xmm0
subsd %xmm13, %xmm0
movsd %xmm0, (%rdi,%rsi,8)
incq %rsi
jmp 0x3ba9f
movsd (%rax,%r10,8), %xmm0
andpd %xmm10, %xmm0
movsd -0x10(%rcx,%rdx,8), %xmm1
andpd %xmm10, %xmm1
addsd %xmm0, %xmm1
movapd %xmm1, %xmm5
mulsd 0x5e33e(%rip), %xmm5    # 0x99e20
mulsd %xmm1, %xmm5
mulsd 0x5c1da(%rip), %xmm1    # 0x97cc8
movapd %xmm1, %xmm13
movq %r10, 0x30(%rsp)
incl %r12d
leal -0x2(%r15), %ecx
xorpd %xmm8, %xmm5
movslq %ecx, %rdx
movslq %r15d, %rsi
leaq (%rsi,%r8), %rdi
subq %rdx, %rsi
addq %r8, %rsi
leaq (,%rdx,8), %r8
leaq (%rbx,%rdx,8), %r9
xorl %eax, %eax
leaq (%rdx,%rax), %r10
cmpq %rdi, %r10
jl 0x3be8a
movq (%r9,%rax,8), %r10
addq %r8, %r10
movsd (%r10,%rax,8), %xmm0
movapd %xmm13, %xmm2
subsd %xmm0, %xmm2
movapd %xmm1, %xmm3
subsd %xmm0, %xmm3
movapd %xmm2, %xmm12
mulsd %xmm3, %xmm12
addsd %xmm5, %xmm12
movq 0x8(%r9,%rax,8), %r11
addq %r8, %r11
divsd (%r11,%rax,8), %xmm12
movsd 0x8(%r11,%rax,8), %xmm6
movapd %xmm6, %xmm11
subsd %xmm0, %xmm11
subsd %xmm2, %xmm11
addsd 0x8(%r10,%rax,8), %xmm12
subsd %xmm3, %xmm11
movq 0x10(%r9,%rax,8), %r11
addq %r8, %r11
movapd %xmm12, %xmm2
andpd %xmm10, %xmm2
movapd %xmm11, %xmm3
andpd %xmm10, %xmm3
addsd %xmm2, %xmm3
movsd 0x8(%r11,%rax,8), %xmm2
unpcklpd %xmm2, %xmm11           # xmm11 = xmm11[0],xmm2[0]
andpd %xmm10, %xmm2
addsd %xmm3, %xmm2
divsd %xmm2, %xmm12
unpcklpd %xmm2, %xmm2            # xmm2 = xmm2[0,0]
divpd %xmm2, %xmm11
cmpq %rax, %rsi
je 0x3be95
movapd %xmm11, %xmm2
movapd 0x5a5fb(%rip), %xmm4    # 0x961e0
andpd %xmm4, %xmm2
movq -0x8(%r9,%rax,8), %r11
addq %r8, %r11
movsd -0x8(%r11,%rax,8), %xmm3
andpd %xmm4, %xmm3
andpd %xmm4, %xmm0
addsd %xmm3, %xmm0
andpd %xmm4, %xmm6
movsd -0x8(%r10,%rax,8), %xmm3
unpcklpd %xmm12, %xmm3           # xmm3 = xmm3[0],xmm12[0]
andpd %xmm4, %xmm3
movapd %xmm2, %xmm4
unpcklpd %xmm6, %xmm4            # xmm4 = xmm4[0],xmm6[0]
shufpd $0x1, %xmm0, %xmm2      # xmm2 = xmm2[1],xmm0[0]
addpd %xmm4, %xmm2
mulpd %xmm3, %xmm2
movapd %xmm2, %xmm0
unpckhpd %xmm2, %xmm0            # xmm0 = xmm0[1],xmm2[1]
mulsd 0x5e1db(%rip), %xmm0    # 0x99e18
decq %rax
ucomisd %xmm2, %xmm0
jb 0x3bb22
movq 0x30(%rsp), %rsi
addl %esi, %eax
movq 0x20(%rsp), %r9
jmp 0x3bea2
movsd 0x40(%rsp), %xmm2
movapd %xmm2, %xmm3
addsd %xmm1, %xmm3
subsd %xmm13, %xmm1
mulsd 0x5a0aa(%rip), %xmm1    # 0x95d20
movapd %xmm1, %xmm0
mulsd %xmm1, %xmm0
addsd %xmm5, %xmm0
addsd %xmm2, %xmm13
movsd %xmm13, (%rax,%r15,8)
movsd %xmm3, (%rcx,%r10,8)
ucomisd %xmm9, %xmm0
jb 0x3c330
movapd %xmm5, 0x50(%rsp)
sqrtsd %xmm0, %xmm0
movapd %xmm13, 0x80(%rsp)
movq %r10, %r14
movapd %xmm1, 0x30(%rsp)
callq 0x34c10
movq %r14, %rsi
movapd 0x80(%rsp), %xmm1
xorpd %xmm9, %xmm9
movapd %xmm0, %xmm11
addsd 0x30(%rsp), %xmm11
movapd %xmm1, %xmm0
addsd %xmm11, %xmm0
movq 0x8(%rsp), %rax
movsd %xmm0, (%rax,%r15,8)
movsd %xmm0, (%rax,%r14,8)
ucomisd %xmm9, %xmm11
jne 0x3bd00
jnp 0x3bd15
movapd 0x50(%rsp), %xmm0
divsd %xmm11, %xmm0
subsd %xmm0, %xmm1
movsd %xmm1, (%rax,%r15,8)
movq (%rbx,%r15,8), %rax
movsd (%rax,%rsi,8), %xmm12
movapd %xmm12, %xmm0
movapd 0x5a4b3(%rip), %xmm10   # 0x961e0
andpd %xmm10, %xmm0
movapd %xmm11, %xmm1
andpd %xmm10, %xmm1
addsd %xmm0, %xmm1
divsd %xmm1, %xmm12
divsd %xmm1, %xmm11
movapd %xmm11, %xmm0
mulsd %xmm11, %xmm0
movapd %xmm12, %xmm1
mulsd %xmm12, %xmm1
addsd %xmm0, %xmm1
sqrtsd %xmm1, %xmm0
divsd %xmm0, %xmm12
divsd %xmm0, %xmm11
movapd %xmm12, %xmm1
movapd 0x5a452(%rip), %xmm8    # 0x961d0
xorpd %xmm8, %xmm1
movapd 0x60(%rsp), %xmm7
movq 0x10(%rsp), %r8
movq 0x20(%rsp), %r14
cmpl %r12d, %r14d
jge 0x3bdde
movq (%rbx,%rsi,8), %rcx
movsd (%rcx,%r14,8), %xmm2
movsd (%rax,%r14,8), %xmm3
mulsd %xmm12, %xmm3
movapd %xmm11, %xmm4
mulsd %xmm2, %xmm4
addsd %xmm3, %xmm4
movsd %xmm4, (%rcx,%r14,8)
mulsd %xmm1, %xmm2
movsd (%rax,%r14,8), %xmm3
mulsd %xmm11, %xmm3
addsd %xmm2, %xmm3
movsd %xmm3, (%rax,%r14,8)
incq %r14
jmp 0x3bd93
movslq %r15d, %rax
xorl %ecx, %ecx
movq 0x48(%rsp), %r14
cmpq %rax, %rcx
jg 0x3be2f
movq (%rbx,%rcx,8), %rdx
movsd (%rdx,%rsi,8), %xmm2
movsd (%rdx,%r15,8), %xmm3
movapd %xmm12, %xmm4
mulsd %xmm3, %xmm4
movapd %xmm11, %xmm5
mulsd %xmm2, %xmm5
addsd %xmm4, %xmm5
movsd %xmm5, (%rdx,%rsi,8)
mulsd %xmm1, %xmm2
mulsd %xmm11, %xmm3
addsd %xmm2, %xmm3
movsd %xmm3, (%rdx,%r15,8)
incq %rcx
jmp 0x3bde8
xorl %eax, %eax
cmpq %rax, %rbp
je 0x3be7c
movq 0x8(%r14), %rcx
movq (%rcx,%rax,8), %rcx
movsd (%rcx,%rsi,8), %xmm2
movsd (%rcx,%r15,8), %xmm3
movapd %xmm12, %xmm4
mulsd %xmm3, %xmm4
movapd %xmm11, %xmm5
mulsd %xmm2, %xmm5
addsd %xmm4, %xmm5
movsd %xmm5, (%rcx,%rsi,8)
mulsd %xmm1, %xmm2
mulsd %xmm11, %xmm3
addsd %xmm2, %xmm3
movsd %xmm3, (%rcx,%r15,8)
incq %rax
jmp 0x3be31
leal -0x2(%r15), %eax
unpcklpd %xmm0, %xmm11           # xmm11 = xmm11[0],xmm0[0]
jmp 0x3c31d
addl %eax, %ecx
movl %ecx, %eax
movq 0x20(%rsp), %r9
jmp 0x3be9d
movq 0x20(%rsp), %r9
movl %r9d, %eax
movq 0x30(%rsp), %rsi
movslq %eax, %rcx
negl %eax
addq %rax, %r9
xorl %eax, %eax
movq %rcx, 0x50(%rsp)
movq 0x10(%rsp), %r8
cmpq %rsi, %rcx
jge 0x3bed6
movq 0x10(%rbx,%rcx,8), %rdx
andq $0x0, (%rdx,%rcx,8)
subq $0x1, %rax
jb 0x3bed1
andq $0x0, -0x8(%rdx,%rcx,8)
incq %rcx
jmp 0x3beb6
movl %r12d, 0x1c(%rsp)
movslq %r15d, %rax
movq %rax, 0x98(%rsp)
movq 0x50(%rsp), %r12
cmpq 0x98(%rsp), %r12
jge 0x3c315
movq %r9, %r14
cmpq 0x50(%rsp), %r12
je 0x3bf79
leaq 0x1(%r12), %rax
xorpd %xmm13, %xmm13
cmpl %eax, %r15d
je 0x3bf1e
movq 0x10(%rbx,%r12,8), %rax
movsd -0x8(%rax,%r12,8), %xmm13
movq (%rbx,%r12,8), %rax
movq 0x8(%rbx,%r12,8), %rcx
movsd -0x8(%rax,%r12,8), %xmm12
movsd -0x8(%rcx,%r12,8), %xmm11
movapd %xmm12, %xmm0
andpd %xmm10, %xmm0
movapd %xmm11, %xmm1
andpd %xmm10, %xmm1
addsd %xmm0, %xmm1
unpcklpd %xmm13, %xmm11          # xmm11 = xmm11[0],xmm13[0]
andpd %xmm10, %xmm13
addsd %xmm1, %xmm13
ucomisd %xmm9, %xmm13
jne 0x3bf65
jnp 0x3bf79
divsd %xmm13, %xmm12
movapd %xmm13, %xmm0
unpcklpd %xmm13, %xmm0           # xmm0 = xmm0[0],xmm13[0]
divpd %xmm0, %xmm11
movapd %xmm13, 0x80(%rsp)
movapd %xmm11, %xmm0
mulsd %xmm11, %xmm0
movapd %xmm12, %xmm1
mulsd %xmm12, %xmm1
addsd %xmm0, %xmm1
movapd %xmm11, 0x20(%rsp)
unpckhpd %xmm11, %xmm11          # xmm11 = xmm11[1,1]
movapd %xmm11, 0xa0(%rsp)
mulsd %xmm11, %xmm11
addsd %xmm1, %xmm11
sqrtsd %xmm11, %xmm0
movapd %xmm12, 0x30(%rsp)
movapd %xmm12, %xmm1
callq 0x34c10
xorpd %xmm9, %xmm9
ucomisd %xmm9, %xmm0
jne 0x3bfdf
jnp 0x3c04f
cmpq 0x50(%rsp), %r12
movq %r14, %r9
jne 0x3c094
testl %r9d, %r9d
movapd 0x60(%rsp), %xmm7
movapd 0x5a1d1(%rip), %xmm8    # 0x961d0
movapd 0x5a1d8(%rip), %xmm10   # 0x961e0
movq 0x10(%rsp), %r8
movapd 0x20(%rsp), %xmm11
movapd 0x30(%rsp), %xmm12
movq 0x48(%rsp), %r14
movapd 0xa0(%rsp), %xmm14
je 0x3c0ef
movq 0x50(%rsp), %rcx
movq (%rbx,%rcx,8), %rax
movsd -0x8(%rax,%rcx,8), %xmm1
xorpd %xmm8, %xmm1
movlpd %xmm1, -0x8(%rax,%rcx,8)
jmp 0x3c0ef
incq %r12
movapd 0x60(%rsp), %xmm7
movapd 0x5a16f(%rip), %xmm8    # 0x961d0
movapd 0x5a176(%rip), %xmm10   # 0x961e0
movq 0x10(%rsp), %r8
movapd 0x20(%rsp), %xmm11
movapd 0x30(%rsp), %xmm12
movq %r14, %r9
movq 0x48(%rsp), %r14
movapd 0x80(%rsp), %xmm13
jmp 0x3beeb
movapd %xmm0, %xmm1
movapd 0x5a12f(%rip), %xmm8    # 0x961d0
xorpd %xmm8, %xmm1
movapd 0x80(%rsp), %xmm2
mulsd %xmm1, %xmm2
movq (%rbx,%r12,8), %rax
movsd %xmm2, -0x8(%rax,%r12,8)
movapd 0x60(%rsp), %xmm7
movapd 0x5a113(%rip), %xmm10   # 0x961e0
movq 0x10(%rsp), %r8
movapd 0x20(%rsp), %xmm11
movapd 0x30(%rsp), %xmm12
movq 0x48(%rsp), %r14
movapd 0xa0(%rsp), %xmm14
addsd %xmm0, %xmm12
movapd %xmm12, %xmm13
divsd %xmm0, %xmm13
movapd %xmm11, %xmm1
divsd %xmm0, %xmm1
divsd %xmm0, %xmm14
movapd %xmm12, %xmm0
unpcklpd %xmm12, %xmm0           # xmm0 = xmm0[0],xmm12[0]
divpd %xmm0, %xmm11
leaq 0x1(%r12), %rax
movapd %xmm11, %xmm0
unpckhpd %xmm11, %xmm0           # xmm0 = xmm0[1],xmm11[1]
movq %r12, %rcx
cmpq %r13, %rcx
jge 0x3c1c6
movq (%rbx,%r12,8), %rdx
movq 0x8(%rbx,%r12,8), %rsi
movsd (%rsi,%rcx,8), %xmm3
movapd %xmm11, %xmm12
mulsd %xmm3, %xmm12
addsd (%rdx,%rcx,8), %xmm12
cmpl %eax, %r15d
jne 0x3c165
movapd %xmm12, %xmm2
xorpd %xmm8, %xmm2
jmp 0x3c19e
movq 0x10(%rbx,%r12,8), %rdi
movsd (%rdi,%rcx,8), %xmm3
movapd %xmm0, %xmm2
mulsd %xmm3, %xmm2
addsd %xmm2, %xmm12
movapd %xmm12, %xmm2
xorpd %xmm8, %xmm2
movapd %xmm12, %xmm4
mulsd %xmm14, %xmm4
subsd %xmm4, %xmm3
movsd %xmm3, (%rdi,%rcx,8)
movsd (%rsi,%rcx,8), %xmm3
movapd %xmm2, %xmm4
mulsd %xmm1, %xmm4
addsd %xmm3, %xmm4
movsd %xmm4, (%rsi,%rcx,8)
mulsd %xmm13, %xmm2
addsd (%rdx,%rcx,8), %xmm2
movsd %xmm2, (%rdx,%rcx,8)
incq %rcx
jmp 0x3c12d
leal 0x3(%r12), %ecx
cmpl %ecx, %r15d
cmovll %r15d, %ecx
movslq %ecx, %rcx
xorl %edx, %edx
cmpq %rcx, %rdx
jg 0x3c26f
movq (%rbx,%rdx,8), %rsi
movsd (%rsi,%r12,8), %xmm2
movsd 0x8(%rsi,%r12,8), %xmm3
movapd %xmm1, %xmm4
mulsd %xmm3, %xmm4
movapd %xmm13, %xmm12
mulsd %xmm2, %xmm12
addsd %xmm4, %xmm12
cmpl %eax, %r15d
jne 0x3c219
movapd %xmm12, %xmm4
xorpd %xmm8, %xmm4
jmp 0x3c24c
movsd 0x10(%rsi,%r12,8), %xmm5
movapd %xmm14, %xmm4
mulsd %xmm5, %xmm4
addsd %xmm4, %xmm12
movapd %xmm12, %xmm4
xorpd %xmm8, %xmm4
movapd %xmm12, %xmm6
mulsd %xmm0, %xmm6
subsd %xmm6, %xmm5
movsd %xmm5, 0x10(%rsi,%r12,8)
mulsd %xmm11, %xmm4
addsd %xmm3, %xmm4
movsd %xmm4, 0x8(%rsi,%r12,8)
subsd %xmm12, %xmm2
movsd %xmm2, (%rsi,%r12,8)
incq %rdx
jmp 0x3c1d7
xorl %ecx, %ecx
cmpq %rcx, %rbp
je 0x3c30d
movq 0x8(%r14), %rdx
movq (%rdx,%rcx,8), %rdx
movsd (%rdx,%r12,8), %xmm2
movsd 0x8(%rdx,%r12,8), %xmm3
movapd %xmm1, %xmm4
mulsd %xmm3, %xmm4
movapd %xmm13, %xmm12
mulsd %xmm2, %xmm12
addsd %xmm4, %xmm12
cmpl %eax, %r15d
jne 0x3c2b7
movapd %xmm12, %xmm4
xorpd %xmm8, %xmm4
jmp 0x3c2ea
movsd 0x10(%rdx,%r12,8), %xmm5
movapd %xmm14, %xmm4
mulsd %xmm5, %xmm4
addsd %xmm4, %xmm12
movapd %xmm12, %xmm4
xorpd %xmm8, %xmm4
movapd %xmm12, %xmm6
mulsd %xmm0, %xmm6
subsd %xmm6, %xmm5
movsd %xmm5, 0x10(%rdx,%r12,8)
mulsd %xmm11, %xmm4
addsd %xmm3, %xmm4
movsd %xmm4, 0x8(%rdx,%r12,8)
subsd %xmm12, %xmm2
movsd %xmm2, (%rdx,%r12,8)
incq %rcx
jmp 0x3c271
movq %rax, %r12
jmp 0x3beeb
movl %r15d, %eax
movq 0x78(%rsp), %r12
leal (%r15,%r8), %ecx
incl %ecx
cmpl %eax, %ecx
jl 0x3b97b
jmp 0x3b96b
leaq 0x5de57(%rip), %rdi     # 0x9a18e
jmp 0x3c340
leaq 0x5de31(%rip), %rdi     # 0x9a171
callq 0x4090
xorl %eax, %eax
addq $0xb8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
xorpd %xmm0, %xmm0
ucomisd %xmm0, %xmm7
jne 0x3c369
jnp 0x3c4fc
mulsd 0x5daa7(%rip), %xmm7    # 0x99e18
leal -0x2(%r12), %r11d
movslq 0x18(%rsp), %rcx
movsd 0x5919d(%rip), %xmm1    # 0x95520
movabsq $-0x100000000, %rsi     # imm = 0xFFFFFFFF00000000
movabsq $0x100000000, %rdi      # imm = 0x100000000
testq %rcx, %rcx
js 0x3c4a8
movl %ecx, %r8d
movq %rcx, %rax
shlq $0x20, %rax
shlq $0x3, %r8
movl %ecx, %r10d
movq 0x8(%rsp), %rdx
movsd (%rdx,%rcx,8), %xmm2
movq (%rbx,%rcx,8), %r9
movabsq $0x3ff0000000000000, %rdx # imm = 0x3FF0000000000000
movq %rdx, (%r9,%rcx,8)
movl %r11d, 0x20(%rsp)
testl %r10d, %r10d
jle 0x3c498
movslq %r11d, %r15
decq %r10
movq (%rbx,%r10,8), %r12
movsd (%r12,%r10,8), %xmm4
xorpd %xmm3, %xmm3
movq %r8, %r13
movq %rax, %rdx
movq %rdx, %r9
sarq $0x20, %r9
cmpq %rcx, %r9
jg 0x3c41e
movsd (%r12,%r13), %xmm5
movq (%rbx,%r13), %r9
mulsd (%r9,%rcx,8), %xmm5
addsd %xmm5, %xmm3
addq %rdi, %rdx
addq $0x8, %r13
jmp 0x3c3f5
subsd %xmm2, %xmm4
movapd %xmm4, %xmm5
cmpeqsd %xmm0, %xmm5
movapd %xmm5, %xmm6
andnpd %xmm4, %xmm6
andpd %xmm7, %xmm5
orpd %xmm6, %xmm5
xorpd %xmm8, %xmm3
divsd %xmm5, %xmm3
movsd %xmm3, (%r12,%rcx,8)
andpd 0x59d8e(%rip), %xmm3    # 0x961e0
movapd %xmm3, %xmm4
mulsd 0x5d9ba(%rip), %xmm4    # 0x99e18
mulsd %xmm3, %xmm4
ucomisd %xmm1, %xmm4
movq 0x78(%rsp), %r12
jbe 0x3c489
cmpq %rcx, %r15
jg 0x3c489
movq (%rbx,%r15,8), %rdx
movsd (%rdx,%rcx,8), %xmm4
divsd %xmm3, %xmm4
movsd %xmm4, (%rdx,%rcx,8)
incq %r15
jmp 0x3c46d
decl %r11d
addq %rsi, %rax
addq $-0x8, %r8
jmp 0x3c3d2
decq %rcx
movl 0x20(%rsp), %r11d
decl %r11d
jmp 0x3c397
movl %r12d, %eax
movl 0x18(%rsp), %r9d
testl %r9d, %r9d
js 0x3c4fc
movl %r9d, %ecx
xorl %edx, %edx
cmpq %rbp, %rdx
je 0x3c4f4
movq 0x8(%r14), %rsi
movq (%rsi,%rdx,8), %rsi
xorpd %xmm0, %xmm0
xorl %edi, %edi
cmpq %rdi, %rax
je 0x3c4ea
movsd (%rsi,%rdi,8), %xmm1
movq (%rbx,%rdi,8), %r8
mulsd (%r8,%rcx,8), %xmm1
addsd %xmm1, %xmm0
incq %rdi
jmp 0x3c4cd
movsd %xmm0, (%rsi,%rcx,8)
incq %rdx
jmp 0x3c4ba
decl %r9d
decq %rax
jmp 0x3c4b0
movq 0x8(%rsp), %rax
jmp 0x3c347