void hc_evalpa(int l, double r1, double r2, double visc, double *p) {
  double den1, den2, f[4], r, rlm1, rlp1, rmlm2, rml, v2, rs;
  long int np[4][4][4];
  long int lp1, lp2, lp3, lm1, lm2, lpp, lmm, l2p3, l2p1, l2m1, lltp1, lltp2;
  long int i, j, k, os1, os2;
  r = r2 / r1;
  lp1 = l + 1;
  lp2 = l + 2;
  lp3 = l + 3;
  lm1 = l - 1;
  lm2 = l - 2;
  lpp = l * lp3 - 1;
  lmm = l * l - lp3;
  lltp1 = l * lp1;
  lltp2 = l * lp2;
  l2p3 = lp3 + l;
  l2p1 = lp1 + l;
  l2m1 = lm1 + l;
  v2 = visc * 2.0;
  rs = r * r;
  rlm1 = pow(r, (double)lm1);
  rlp1 = rlm1 * rs;
  rmlm2 = pow(r, (double)(-lp2));
  rml = rmlm2 * rs;
  den1 = (double)(l2p1 * l2p3);
  den2 = (double)(l2p1 * l2m1);
  f[0] = rlp1 / den1;
  f[1] = rlm1 / den2;
  f[2] = rml / den2;
  f[3] = rmlm2 / den1;
  np[0][2][0] = -lltp1;
  np[0][2][1] = -np[0][2][0];
  np[0][2][2] = np[0][2][0];
  np[0][2][3] = np[0][2][1];
  np[1][2][0] = -lp3;
  np[1][2][1] = lp1;
  np[1][2][2] = lm2;
  np[1][2][3] = -l;
  np[2][2][0] = -lp1 * lmm;
  np[2][2][1] = lltp1 * lm1;
  np[2][2][2] = l * lpp;
  np[2][2][3] = -lltp1 * lp2;
  np[3][2][0] = -lltp2;
  np[3][2][1] = lm1 * lp1;
  np[3][2][2] = -np[3][2][1];
  np[3][2][3] = -np[3][2][0];
  for (i = 0; i < 4; i++) {
    np[i][0][0] = np[i][2][0] * lp2;
    np[i][1][0] = -np[i][0][0] * l;
    np[i][3][0] = -np[i][2][0] * l;
    np[i][0][1] = (np[i][2][1] * lpp) / lp1;
    np[i][1][1] = -np[i][2][1] * lp1 * lm1;
    np[i][3][1] = -np[i][2][1] * lm2;
    np[i][0][2] = -np[i][2][2] * lm1;
    np[i][1][2] = np[i][0][2] * lp1;
    np[i][3][2] = np[i][2][2] * lp1;
    np[i][0][3] = (-np[i][2][3] * lmm) / l;
    np[i][1][3] = -np[i][2][3] * lltp2;
    np[i][3][3] = np[i][2][3] * lp3;
  }
  for (os1 = i = 0; i < 4; i++, os1 += 4) {
    for (j = 0; j < 4; j++) {
      os2 = os1 + j;
      p[os2] = 0.0;
      for (k = 0; k < 4; k++)
        p[os2] += ((double)(np[i][j][k])) * f[k];
    }
  }
  p[0 * 4 + 2] /= v2;
  p[0 * 4 + 3] /= v2;
  p[1 * 4 + 2] /= v2;
  p[1 * 4 + 3] /= v2;
  p[2 * 4 + 0] *= v2;
  p[2 * 4 + 1] *= v2;
  p[3 * 4 + 0] *= v2;
  p[3 * 4 + 1] *= v2;
}


x86 assembly (clang, -O0):
<hc_evalpa>:
push   %rbp
mov    %rsp,%rbp
sub    $0x330,%rsp
mov    %edi,-0x4(%rbp)
movsd  %xmm0,-0x10(%rbp)
movsd  %xmm1,-0x18(%rbp)
movsd  %xmm2,-0x20(%rbp)
mov    %rsi,-0x28(%rbp)
movsd  -0x18(%rbp),%xmm0
divsd  -0x10(%rbp),%xmm0
movsd  %xmm0,-0x68(%rbp)
mov    -0x4(%rbp),%eax
add    $0x1,%eax
cltq
mov    %rax,-0x2a8(%rbp)
mov    -0x4(%rbp),%eax
add    $0x2,%eax
cltq
mov    %rax,-0x2b0(%rbp)
mov    -0x4(%rbp),%eax
add    $0x3,%eax
cltq
mov    %rax,-0x2b8(%rbp)
mov    -0x4(%rbp),%eax
sub    $0x1,%eax
cltq
mov    %rax,-0x2c0(%rbp)
mov    -0x4(%rbp),%eax
sub    $0x2,%eax
cltq
mov    %rax,-0x2c8(%rbp)
movslq -0x4(%rbp),%rax
imul   -0x2b8(%rbp),%rax
ff
sub    $0x1,%rax
mov    %rax,-0x2d0(%rbp)
mov    -0x4(%rbp),%eax
imul   -0x4(%rbp),%eax
cltq
sub    -0x2b8(%rbp),%rax
mov    %rax,-0x2d8(%rbp)
movslq -0x4(%rbp),%rax
imul   -0x2a8(%rbp),%rax
ff
mov    %rax,-0x2f8(%rbp)
movslq -0x4(%rbp),%rax
imul   -0x2b0(%rbp),%rax
ff
mov    %rax,-0x300(%rbp)
mov    -0x2b8(%rbp),%rax
movslq -0x4(%rbp),%rcx
add    %rcx,%rax
mov    %rax,-0x2e0(%rbp)
mov    -0x2a8(%rbp),%rax
movslq -0x4(%rbp),%rcx
add    %rcx,%rax
mov    %rax,-0x2e8(%rbp)
mov    -0x2c0(%rbp),%rax
movslq -0x4(%rbp),%rcx
add    %rcx,%rax
mov    %rax,-0x2f0(%rbp)
movsd  0xdda(%rip),%xmm0
mulsd  -0x20(%rbp),%xmm0
movsd  %xmm0,-0x90(%rbp)
ff
movsd  -0x68(%rbp),%xmm0
mulsd  -0x68(%rbp),%xmm0
movsd  %xmm0,-0x98(%rbp)
ff
movsd  -0x68(%rbp),%xmm0
cvtsi2sdq -0x2c0(%rbp),%xmm1
ff ff
call   1030 <pow@plt>
movsd  %xmm0,-0x70(%rbp)
movsd  -0x70(%rbp),%xmm0
mulsd  -0x98(%rbp),%xmm0
ff
movsd  %xmm0,-0x78(%rbp)
movsd  -0x68(%rbp),%xmm0
xor    %eax,%eax
sub    -0x2b0(%rbp),%rax
cvtsi2sd %rax,%xmm1
call   1030 <pow@plt>
movsd  %xmm0,-0x80(%rbp)
movsd  -0x80(%rbp),%xmm0
mulsd  -0x98(%rbp),%xmm0
ff
movsd  %xmm0,-0x88(%rbp)
ff
mov    -0x2e8(%rbp),%rax
imul   -0x2e0(%rbp),%rax
ff
cvtsi2sd %rax,%xmm0
movsd  %xmm0,-0x30(%rbp)
mov    -0x2e8(%rbp),%rax
imul   -0x2f0(%rbp),%rax
ff
cvtsi2sd %rax,%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  -0x78(%rbp),%xmm0
divsd  -0x30(%rbp),%xmm0
movsd  %xmm0,-0x60(%rbp)
movsd  -0x70(%rbp),%xmm0
divsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x58(%rbp)
movsd  -0x88(%rbp),%xmm0
ff
divsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x50(%rbp)
movsd  -0x80(%rbp),%xmm0
divsd  -0x30(%rbp),%xmm0
movsd  %xmm0,-0x48(%rbp)
xor    %eax,%eax
sub    -0x2f8(%rbp),%rax
mov    %rax,-0x260(%rbp)
xor    %eax,%eax
sub    -0x260(%rbp),%rax
mov    %rax,-0x258(%rbp)
mov    -0x260(%rbp),%rax
mov    %rax,-0x250(%rbp)
mov    -0x258(%rbp),%rax
mov    %rax,-0x248(%rbp)
xor    %eax,%eax
sub    -0x2b8(%rbp),%rax
mov    %rax,-0x1e0(%rbp)
mov    -0x2a8(%rbp),%rax
mov    %rax,-0x1d8(%rbp)
mov    -0x2c8(%rbp),%rax
mov    %rax,-0x1d0(%rbp)
xor    %eax,%eax
sub    -0x4(%rbp),%eax
cltq
mov    %rax,-0x1c8(%rbp)
xor    %eax,%eax
sub    -0x2a8(%rbp),%rax
imul   -0x2d8(%rbp),%rax
ff
mov    %rax,-0x160(%rbp)
mov    -0x2f8(%rbp),%rax
imul   -0x2c0(%rbp),%rax
ff
mov    %rax,-0x158(%rbp)
movslq -0x4(%rbp),%rax
imul   -0x2d0(%rbp),%rax
ff
mov    %rax,-0x150(%rbp)
xor    %eax,%eax
sub    -0x2f8(%rbp),%rax
imul   -0x2b0(%rbp),%rax
ff
mov    %rax,-0x148(%rbp)
xor    %eax,%eax
sub    -0x300(%rbp),%rax
mov    %rax,-0xe0(%rbp)
mov    -0x2c0(%rbp),%rax
imul   -0x2a8(%rbp),%rax
ff
mov    %rax,-0xd8(%rbp)
xor    %eax,%eax
sub    -0xd8(%rbp),%rax
mov    %rax,-0xd0(%rbp)
xor    %eax,%eax
sub    -0xe0(%rbp),%rax
mov    %rax,-0xc8(%rbp)
movq   $0x0,-0x308(%rbp)
cmpq   $0x4,-0x308(%rbp)
04
jge    173b <hc_evalpa+0x62b>
mov    -0x308(%rbp),%rcx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rcx
add    %rcx,%rax
mov    0x40(%rax),%rcx
imul   -0x2b0(%rbp),%rcx
ff
mov    -0x308(%rbp),%rdx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rdx
add    %rdx,%rax
mov    %rcx,(%rax)
mov    -0x308(%rbp),%rcx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rcx
add    %rcx,%rax
xor    %ecx,%ecx
sub    (%rax),%rcx
movslq -0x4(%rbp),%rax
imul   %rax,%rcx
mov    -0x308(%rbp),%rdx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rdx
add    %rdx,%rax
mov    %rcx,0x20(%rax)
mov    -0x308(%rbp),%rcx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rcx
add    %rcx,%rax
xor    %ecx,%ecx
sub    0x40(%rax),%rcx
movslq -0x4(%rbp),%rax
imul   %rax,%rcx
mov    -0x308(%rbp),%rdx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rdx
add    %rdx,%rax
mov    %rcx,0x60(%rax)
mov    -0x308(%rbp),%rcx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rcx
add    %rcx,%rax
mov    0x48(%rax),%rax
imul   -0x2d0(%rbp),%rax
ff
cqto
idivq  -0x2a8(%rbp)
mov    %rax,%rcx
mov    -0x308(%rbp),%rdx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rdx
add    %rdx,%rax
mov    %rcx,0x8(%rax)
mov    -0x308(%rbp),%rcx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rcx
add    %rcx,%rax
xor    %ecx,%ecx
sub    0x48(%rax),%rcx
imul   -0x2a8(%rbp),%rcx
ff
imul   -0x2c0(%rbp),%rcx
ff
mov    -0x308(%rbp),%rdx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rdx
add    %rdx,%rax
mov    %rcx,0x28(%rax)
mov    -0x308(%rbp),%rcx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rcx
add    %rcx,%rax
xor    %ecx,%ecx
sub    0x48(%rax),%rcx
imul   -0x2c8(%rbp),%rcx
ff
mov    -0x308(%rbp),%rdx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rdx
add    %rdx,%rax
mov    %rcx,0x68(%rax)
mov    -0x308(%rbp),%rcx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rcx
add    %rcx,%rax
xor    %ecx,%ecx
sub    0x50(%rax),%rcx
imul   -0x2c0(%rbp),%rcx
ff
mov    -0x308(%rbp),%rdx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rdx
add    %rdx,%rax
mov    %rcx,0x10(%rax)
mov    -0x308(%rbp),%rcx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rcx
add    %rcx,%rax
mov    0x10(%rax),%rcx
imul   -0x2a8(%rbp),%rcx
ff
mov    -0x308(%rbp),%rdx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rdx
add    %rdx,%rax
mov    %rcx,0x30(%rax)
mov    -0x308(%rbp),%rcx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rcx
add    %rcx,%rax
mov    0x50(%rax),%rcx
imul   -0x2a8(%rbp),%rcx
ff
mov    -0x308(%rbp),%rdx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rdx
add    %rdx,%rax
mov    %rcx,0x70(%rax)
mov    -0x308(%rbp),%rax
lea    -0x2a0(%rbp),%rcx
shl    $0x7,%rax
add    %rax,%rcx
xor    %eax,%eax
sub    0x58(%rcx),%rax
imul   -0x2d8(%rbp),%rax
ff
movslq -0x4(%rbp),%rcx
cqto
idiv   %rcx
mov    %rax,%rcx
mov    -0x308(%rbp),%rdx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rdx
add    %rdx,%rax
mov    %rcx,0x18(%rax)
mov    -0x308(%rbp),%rcx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rcx
add    %rcx,%rax
xor    %ecx,%ecx
sub    0x58(%rax),%rcx
imul   -0x300(%rbp),%rcx
ff
mov    -0x308(%rbp),%rdx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rdx
add    %rdx,%rax
mov    %rcx,0x38(%rax)
mov    -0x308(%rbp),%rcx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rcx
add    %rcx,%rax
mov    0x58(%rax),%rcx
imul   -0x2b8(%rbp),%rcx
ff
mov    -0x308(%rbp),%rdx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rdx
add    %rdx,%rax
mov    %rcx,0x78(%rax)
mov    -0x308(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x308(%rbp)
jmp    1432 <hc_evalpa+0x322>
movq   $0x0,-0x308(%rbp)
movq   $0x0,-0x320(%rbp)
cmpq   $0x4,-0x308(%rbp)
04
jge    1874 <hc_evalpa+0x764>
movq   $0x0,-0x310(%rbp)
cmpq   $0x4,-0x310(%rbp)
04
jge    1846 <hc_evalpa+0x736>
mov    -0x320(%rbp),%rax
add    -0x310(%rbp),%rax
mov    %rax,-0x328(%rbp)
mov    -0x28(%rbp),%rax
mov    -0x328(%rbp),%rcx
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
movq   $0x0,-0x318(%rbp)
cmpq   $0x4,-0x318(%rbp)
04
jge    182a <hc_evalpa+0x71a>
mov    -0x308(%rbp),%rcx
lea    -0x2a0(%rbp),%rax
shl    $0x7,%rcx
add    %rcx,%rax
mov    -0x310(%rbp),%rcx
shl    $0x5,%rcx
add    %rcx,%rax
mov    -0x318(%rbp),%rcx
cvtsi2sdq (%rax,%rcx,8),%xmm0
mov    -0x318(%rbp),%rax
movsd  -0x60(%rbp,%rax,8),%xmm2
mov    -0x28(%rbp),%rax
mov    -0x328(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x318(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x318(%rbp)
jmp    17ab <hc_evalpa+0x69b>
jmp    182f <hc_evalpa+0x71f>
mov    -0x310(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x310(%rbp)
jmp    176a <hc_evalpa+0x65a>
jmp    184b <hc_evalpa+0x73b>
mov    -0x308(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x308(%rbp)
mov    -0x320(%rbp),%rax
add    $0x4,%rax
mov    %rax,-0x320(%rbp)
jmp    1751 <hc_evalpa+0x641>
movsd  -0x90(%rbp),%xmm1
ff
mov    -0x28(%rbp),%rax
movsd  0x10(%rax),%xmm0
divsd  %xmm1,%xmm0
movsd  %xmm0,0x10(%rax)
movsd  -0x90(%rbp),%xmm1
ff
mov    -0x28(%rbp),%rax
movsd  0x18(%rax),%xmm0
divsd  %xmm1,%xmm0
movsd  %xmm0,0x18(%rax)
movsd  -0x90(%rbp),%xmm1
ff
mov    -0x28(%rbp),%rax
movsd  0x30(%rax),%xmm0
divsd  %xmm1,%xmm0
movsd  %xmm0,0x30(%rax)
movsd  -0x90(%rbp),%xmm1
ff
mov    -0x28(%rbp),%rax
movsd  0x38(%rax),%xmm0
divsd  %xmm1,%xmm0
movsd  %xmm0,0x38(%rax)
movsd  -0x90(%rbp),%xmm0
ff
mov    -0x28(%rbp),%rax
mulsd  0x40(%rax),%xmm0
movsd  %xmm0,0x40(%rax)
movsd  -0x90(%rbp),%xmm0
ff
mov    -0x28(%rbp),%rax
mulsd  0x48(%rax),%xmm0
movsd  %xmm0,0x48(%rax)
movsd  -0x90(%rbp),%xmm0
ff
mov    -0x28(%rbp),%rax
mulsd  0x60(%rax),%xmm0
movsd  %xmm0,0x60(%rax)
movsd  -0x90(%rbp),%xmm0
ff
mov    -0x28(%rbp),%rax
mulsd  0x68(%rax),%xmm0
movsd  %xmm0,0x68(%rax)
add    $0x330,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<hc_evalpa>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x288,%rsp
mov    %rsi,%r12
movaps %xmm2,0x70(%rsp)
mov    %edi,0xc(%rsp)
divsd  %xmm0,%xmm1
movapd %xmm1,%xmm0
movslq %edi,%r13
lea    0x1(%r13),%rbx
lea    0x2(%r13),%eax
movslq %eax,%r14
lea    0x3(%r13),%rdx
lea    -0x1(%r13),%rax
mov    %rax,0x60(%rsp)
lea    -0x1(%r13),%eax
lea    -0x2(%r13),%ecx
movslq %ecx,%rcx
mov    %rcx,0x28(%rsp)
mov    %rdx,%rcx
imul   %r13,%rcx
add    $0xffffffffffffffff,%rcx
mov    %rcx,0x18(%rsp)
mov    %r13d,%ecx
imul   %ecx,%ecx
mov    %rdx,0x68(%rsp)
sub    %rdx,%rcx
mov    %rcx,0x20(%rsp)
mov    %rbx,%r15
imul   %r13,%r15
mov    %r14,%rcx
imul   %r13,%rcx
mov    %rcx,0x58(%rsp)
lea    0x3(,%r13,1),%rcx
add    %r13,%rcx
mov    %rcx,0x50(%rsp)
lea    0x1(%r13,%r13,1),%rcx
mov    %rcx,0x48(%rsp)
xorps  %xmm1,%xmm1
cvtsi2sd %eax,%xmm1
lea    -0x1(%r13,%r13,1),%rbp
movsd  %xmm0,0x40(%rsp)
movapd %xmm0,%xmm2
mulsd  %xmm0,%xmm2
movsd  %xmm2,0x10(%rsp)
call   1030 <pow@plt>
movsd  %xmm0,0x38(%rsp)
movsd  0x10(%rsp),%xmm1
mulsd  %xmm0,%xmm1
movsd  %xmm1,0x30(%rsp)
mov    %r14,%rax
neg    %rax
xorps  %xmm1,%xmm1
cvtsi2sd %rax,%xmm1
movsd  0x40(%rsp),%xmm0
call   1030 <pow@plt>
mov    %r14,%rcx
movsd  0x30(%rsp),%xmm7
movsd  0x38(%rsp),%xmm6
movsd  0x10(%rsp),%xmm5
mulsd  %xmm0,%xmm5
mov    0x48(%rsp),%rax
mov    0x50(%rsp),%rdx
imul   %rax,%rdx
xorps  %xmm1,%xmm1
cvtsi2sd %rdx,%xmm1
imul   %rax,%rbp
xorps  %xmm2,%xmm2
cvtsi2sd %rbp,%xmm2
divsd  %xmm1,%xmm7
divsd  %xmm2,%xmm6
divsd  %xmm2,%xmm5
divsd  %xmm1,%xmm0
mov    %r15,%r9
neg    %r9
mov    %r9,0xc0(%rsp)
mov    %r15,0xc8(%rsp)
mov    %r9,0xd0(%rsp)
mov    %r15,0xd8(%rsp)
mov    $0xfffffffffffffffd,%rax
sub    %r13,%rax
mov    %rax,0x140(%rsp)
mov    %rbx,0x148(%rsp)
mov    0x28(%rsp),%rax
mov    %rax,0x150(%rsp)
mov    %r13d,%eax
neg    %eax
cltq
mov    %rax,0x158(%rsp)
mov    0x20(%rsp),%rax
imul   %rbx,%rax
neg    %rax
mov    %rax,0x1c0(%rsp)
mov    %r15,%rax
mov    0x60(%rsp),%r8
imul   %r8,%rax
mov    %rax,0x1c8(%rsp)
mov    0x18(%rsp),%rax
imul   %r13,%rax
mov    %rax,0x1d0(%rsp)
mov    %r9,%rax
mov    %rcx,%r14
imul   %rcx,%rax
mov    %rax,0x1d8(%rsp)
mov    0x58(%rsp),%rcx
mov    %rcx,%rax
neg    %rax
mov    %rax,0x240(%rsp)
mov    %r8,%r10
imul   %rbx,%r8
mov    %r8,0x248(%rsp)
mov    %r8,%rax
neg    %rax
mov    %rax,0x250(%rsp)
mov    %rcx,%r11
mov    %rcx,0x258(%rsp)
xor    %edi,%edi
mov    %r15,%rsi
mov    %r9,%rcx
mov    %r15,%rbp
mov    %r9,%rax
nop
mov    %rax,%rdx
imul   %r14,%rdx
mov    %rdx,0x80(%rsp,%rdi,1)
imul   %r13,%rdx
neg    %rdx
mov    %rdx,0xa0(%rsp,%rdi,1)
imul   %r13,%rax
neg    %rax
mov    %rax,0xe0(%rsp,%rdi,1)
mov    %rbp,%rax
imul   0x18(%rsp),%rax
mov    %rax,%rdx
or     %rbx,%rdx
shr    $0x20,%rdx
je     1390 <hc_evalpa+0x280>
cqto
idiv   %rbx
jmp    1394 <hc_evalpa+0x284>
nopl   0x0(%rax)
xor    %edx,%edx
div    %ebx
mov    %rax,0x88(%rsp,%rdi,1)
mov    %r8,%rax
imul   %rbp,%rax
neg    %rax
mov    %rax,0xa8(%rsp,%rdi,1)
imul   0x28(%rsp),%rbp
neg    %rbp
mov    %rbp,0xe8(%rsp,%rdi,1)
mov    %rcx,%rax
imul   %r10,%rax
neg    %rax
mov    %rax,0x90(%rsp,%rdi,1)
imul   %rbx,%rax
mov    %rax,0xb0(%rsp,%rdi,1)
imul   %rbx,%rcx
mov    %rcx,0xf0(%rsp,%rdi,1)
mov    0x20(%rsp),%rax
imul   %rsi,%rax
neg    %rax
mov    %rax,%rcx
or     %r13,%rcx
shr    $0x20,%rcx
je     1410 <hc_evalpa+0x300>
cqto
idiv   %r13
jmp    1416 <hc_evalpa+0x306>
nopl   0x0(%rax,%rax,1)
xor    %edx,%edx
divl   0xc(%rsp)
mov    %rax,0x98(%rsp,%rdi,1)
mov    %r11,%rax
imul   %rsi,%rax
neg    %rax
mov    %rax,0xb8(%rsp,%rdi,1)
imul   0x68(%rsp),%rsi
mov    %rsi,0xf8(%rsp,%rdi,1)
cmp    $0x180,%rdi
je     1470 <hc_evalpa+0x360>
mov    0x140(%rsp,%rdi,1),%rax
mov    0x148(%rsp,%rdi,1),%rbp
mov    0x150(%rsp,%rdi,1),%rcx
mov    0x158(%rsp,%rdi,1),%rsi
sub    $0xffffffffffffff80,%rdi
jmp    1340 <hc_evalpa+0x230>
xor    %eax,%eax
xorpd  %xmm1,%xmm1
mov    %r15,%rcx
mov    %r9,%rdx
nopl   0x0(%rax)
xorps  %xmm2,%xmm2
cvtsi2sdq 0x80(%rsp,%rax,4),%xmm2
mulsd  %xmm7,%xmm2
xorps  %xmm3,%xmm3
cvtsi2sdq 0x88(%rsp,%rax,4),%xmm3
addsd  %xmm1,%xmm2
mulsd  %xmm6,%xmm3
xorps  %xmm4,%xmm4
cvtsi2sdq 0x90(%rsp,%rax,4),%xmm4
addsd  %xmm2,%xmm3
mulsd  %xmm5,%xmm4
xorps  %xmm2,%xmm2
cvtsi2sdq 0x98(%rsp,%rax,4),%xmm2
addsd  %xmm3,%xmm4
mulsd  %xmm0,%xmm2
addsd  %xmm4,%xmm2
movsd  %xmm2,(%r12,%rax,1)
xorps  %xmm2,%xmm2
cvtsi2sdq 0xa0(%rsp,%rax,4),%xmm2
mulsd  %xmm7,%xmm2
addsd  %xmm1,%xmm2
xorps  %xmm3,%xmm3
cvtsi2sdq 0xa8(%rsp,%rax,4),%xmm3
mulsd  %xmm6,%xmm3
addsd  %xmm2,%xmm3
xorps  %xmm2,%xmm2
cvtsi2sdq 0xb0(%rsp,%rax,4),%xmm2
mulsd  %xmm5,%xmm2
addsd  %xmm3,%xmm2
xorps  %xmm3,%xmm3
cvtsi2sdq 0xb8(%rsp,%rax,4),%xmm3
mulsd  %xmm0,%xmm3
addsd  %xmm2,%xmm3
movsd  %xmm3,0x8(%r12,%rax,1)
xorps  %xmm2,%xmm2
cvtsi2sd %rdx,%xmm2
mulsd  %xmm7,%xmm2
addsd  %xmm1,%xmm2
xorps  %xmm3,%xmm3
cvtsi2sd %rcx,%xmm3
mulsd  %xmm6,%xmm3
addsd  %xmm2,%xmm3
xorps  %xmm2,%xmm2
cvtsi2sd %r9,%xmm2
mulsd  %xmm5,%xmm2
addsd  %xmm3,%xmm2
xorps  %xmm3,%xmm3
cvtsi2sd %r15,%xmm3
mulsd  %xmm0,%xmm3
addsd  %xmm2,%xmm3
movsd  %xmm3,0x10(%r12,%rax,1)
xorps  %xmm2,%xmm2
cvtsi2sdq 0xe0(%rsp,%rax,4),%xmm2
mulsd  %xmm7,%xmm2
addsd  %xmm1,%xmm2
xorps  %xmm3,%xmm3
cvtsi2sdq 0xe8(%rsp,%rax,4),%xmm3
mulsd  %xmm6,%xmm3
addsd  %xmm2,%xmm3
xorps  %xmm2,%xmm2
cvtsi2sdq 0xf0(%rsp,%rax,4),%xmm2
mulsd  %xmm5,%xmm2
addsd  %xmm3,%xmm2
xorps  %xmm3,%xmm3
cvtsi2sdq 0xf8(%rsp,%rax,4),%xmm3
mulsd  %xmm0,%xmm3
addsd  %xmm2,%xmm3
movsd  %xmm3,0x18(%r12,%rax,1)
cmp    $0x60,%rax
je     1606 <hc_evalpa+0x4f6>
mov    0x140(%rsp,%rax,4),%rdx
mov    0x148(%rsp,%rax,4),%rcx
mov    0x150(%rsp,%rax,4),%r9
mov    0x158(%rsp,%rax,4),%r15
add    $0x20,%rax
jmp    1480 <hc_evalpa+0x370>
movapd 0x70(%rsp),%xmm4
addsd  %xmm4,%xmm4
unpcklpd %xmm4,%xmm4
movupd 0x10(%r12),%xmm0
movupd 0x30(%r12),%xmm1
movupd 0x40(%r12),%xmm2
movupd 0x60(%r12),%xmm3
divpd  %xmm4,%xmm0
movupd %xmm0,0x10(%r12)
divpd  %xmm4,%xmm1
movupd %xmm1,0x30(%r12)
mulpd  %xmm4,%xmm2
movupd %xmm2,0x40(%r12)
mulpd  %xmm4,%xmm3
movupd %xmm3,0x60(%r12)
add    $0x288,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define void @hc_evalpa(i32 %0, double %1, double %2, double %3, double* nocapture %4) {
%6 = alloca [4 x [4 x [4 x i64]]]
%7 = bitcast [4 x [4 x [4 x i64]]]* %6 to i8*
%8 = fdiv double %2, %1
%9 = add nsw i32 %0, 1
%10 = sext i32 %9 to i64
%11 = add nsw i32 %0, 2
%12 = sext i32 %11 to i64
%13 = add nsw i32 %0, 3
%14 = sext i32 %13 to i64
%15 = add nsw i32 %0, -1
%16 = sext i32 %15 to i64
%17 = add nsw i32 %0, -2
%18 = sext i32 %17 to i64
%19 = sext i32 %0 to i64
%20 = mul nsw i64 %14, %19
%21 = add nsw i64 %20, -1
%22 = mul nsw i32 %0, %0
%23 = zext i32 %22 to i64
%24 = sub nsw i64 %23, %14
%25 = mul nsw i64 %10, %19
%26 = mul nsw i64 %12, %19
%27 = add nsw i64 %14, %19
%28 = add nsw i64 %10, %19
%29 = add nsw i64 %16, %19
%30 = fmul double %8, %8
%31 = sitofp i32 %15 to double
%32 = tail call double @pow(double %8, double %31)
%33 = fmul double %30, %32
%34 = sub nsw i64 0, %12
%35 = sitofp i64 %34 to double
%36 = tail call double @pow(double %8, double %35)
%37 = fmul double %30, %36
%38 = mul nsw i64 %28, %27
%39 = sitofp i64 %38 to double
%40 = mul nsw i64 %28, %29
%41 = sitofp i64 %40 to double
%42 = fdiv double %33, %39
%43 = fdiv double %32, %41
%44 = fdiv double %37, %41
%45 = fdiv double %36, %39
%46 = sub nsw i64 0, %25
%47 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 0, i64 2, i64 0
store i64 %46, i64* %47
%48 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 0, i64 2, i64 1
store i64 %25, i64* %48
%49 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 0, i64 2, i64 2
store i64 %46, i64* %49
%50 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 0, i64 2, i64 3
store i64 %25, i64* %50
%51 = sub nsw i64 0, %14
%52 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 1, i64 2, i64 0
store i64 %51, i64* %52
%53 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 1, i64 2, i64 1
store i64 %10, i64* %53
%54 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 1, i64 2, i64 2
store i64 %18, i64* %54
%55 = sub nsw i32 0, %0
%56 = sext i32 %55 to i64
%57 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 1, i64 2, i64 3
store i64 %56, i64* %57
%58 = mul i64 %24, %10
%59 = sub i64 0, %58
%60 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 2, i64 2, i64 0
store i64 %59, i64* %60
%61 = mul nsw i64 %25, %16
%62 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 2, i64 2, i64 1
store i64 %61, i64* %62
%63 = mul nsw i64 %21, %19
%64 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 2, i64 2, i64 2
store i64 %63, i64* %64
%65 = mul nsw i64 %46, %12
%66 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 2, i64 2, i64 3
store i64 %65, i64* %66
%67 = sub nsw i64 0, %26
%68 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 3, i64 2, i64 0
store i64 %67, i64* %68
%69 = mul nsw i64 %16, %10
%70 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 3, i64 2, i64 1
store i64 %69, i64* %70
%71 = sub nsw i64 0, %69
%72 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 3, i64 2, i64 2
store i64 %71, i64* %72
%73 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 3, i64 2, i64 3
store i64 %26, i64* %73
br label %74
74: ; preds = %115, %5
%75 = phi i64 [ %25, %5 ], [ %123, %115 ]
%76 = phi i64 [ %46, %5 ], [ %121, %115 ]
%77 = phi i64 [ %25, %5 ], [ %119, %115 ]
%78 = phi i64 [ %46, %5 ], [ %117, %115 ]
%79 = phi i64 [ 0, %5 ], [ %113, %115 ]
%80 = mul nsw i64 %78, %12
%81 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %79, i64 0, i64 0
store i64 %80, i64* %81
%82 = mul i64 %80, %19
%83 = sub i64 0, %82
%84 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %79, i64 1, i64 0
store i64 %83, i64* %84
%85 = mul i64 %78, %19
%86 = sub i64 0, %85
%87 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %79, i64 3, i64 0
store i64 %86, i64* %87
%88 = mul nsw i64 %77, %21
%89 = sdiv i64 %88, %10
%90 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %79, i64 0, i64 1
store i64 %89, i64* %90
%91 = mul i64 %69, %77
%92 = sub i64 0, %91
%93 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %79, i64 1, i64 1
store i64 %92, i64* %93
%94 = mul i64 %77, %18
%95 = sub i64 0, %94
%96 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %79, i64 3, i64 1
store i64 %95, i64* %96
%97 = mul i64 %76, %16
%98 = sub i64 0, %97
%99 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %79, i64 0, i64 2
store i64 %98, i64* %99
%100 = mul nsw i64 %98, %10
%101 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %79, i64 1, i64 2
store i64 %100, i64* %101
%102 = mul nsw i64 %76, %10
%103 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %79, i64 3, i64 2
store i64 %102, i64* %103
%104 = mul i64 %24, %75
%105 = sub i64 0, %104
%106 = sdiv i64 %105, %19
%107 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %79, i64 0, i64 3
store i64 %106, i64* %107
%108 = mul i64 %26, %75
%109 = sub i64 0, %108
%110 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %79, i64 1, i64 3
store i64 %109, i64* %110
%111 = mul nsw i64 %75, %14
%112 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %79, i64 3, i64 3
store i64 %111, i64* %112
%113 = add nuw nsw i64 %79, 1
%114 = icmp eq i64 %113, 4
br i1 %114, label %124, label %115
115: ; preds = %74
%116 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %113, i64 2, i64 0
%117 = load i64, i64* %116
%118 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %113, i64 2, i64 1
%119 = load i64, i64* %118
%120 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %113, i64 2, i64 2
%121 = load i64, i64* %120
%122 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %113, i64 2, i64 3
%123 = load i64, i64* %122
br label %74
124: ; preds = %74, %196
%125 = phi i64 [ %205, %196 ], [ %25, %74 ]
%126 = phi i64 [ %203, %196 ], [ %46, %74 ]
%127 = phi i64 [ %201, %196 ], [ %25, %74 ]
%128 = phi i64 [ %199, %196 ], [ %46, %74 ]
%129 = phi i64 [ %194, %196 ], [ 0, %74 ]
%130 = phi i64 [ %197, %196 ], [ 0, %74 ]
%131 = getelementptr inbounds double, double* %4, i64 %130
%132 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %129, i64 0, i64 0
%133 = load i64, i64* %132
%134 = sitofp i64 %133 to double
%135 = tail call double @llvm.fmuladd.f64(double %134, double %42, double 0.000000e+00)
%136 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %129, i64 0, i64 1
%137 = load i64, i64* %136
%138 = sitofp i64 %137 to double
%139 = tail call double @llvm.fmuladd.f64(double %138, double %43, double %135)
%140 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %129, i64 0, i64 2
%141 = load i64, i64* %140
%142 = sitofp i64 %141 to double
%143 = tail call double @llvm.fmuladd.f64(double %142, double %44, double %139)
%144 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %129, i64 0, i64 3
%145 = load i64, i64* %144
%146 = sitofp i64 %145 to double
%147 = tail call double @llvm.fmuladd.f64(double %146, double %45, double %143)
store double %147, double* %131
%148 = or i64 %130, 1
%149 = getelementptr inbounds double, double* %4, i64 %148
%150 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %129, i64 1, i64 0
%151 = load i64, i64* %150
%152 = sitofp i64 %151 to double
%153 = tail call double @llvm.fmuladd.f64(double %152, double %42, double 0.000000e+00)
%154 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %129, i64 1, i64 1
%155 = load i64, i64* %154
%156 = sitofp i64 %155 to double
%157 = tail call double @llvm.fmuladd.f64(double %156, double %43, double %153)
%158 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %129, i64 1, i64 2
%159 = load i64, i64* %158
%160 = sitofp i64 %159 to double
%161 = tail call double @llvm.fmuladd.f64(double %160, double %44, double %157)
%162 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %129, i64 1, i64 3
%163 = load i64, i64* %162
%164 = sitofp i64 %163 to double
%165 = tail call double @llvm.fmuladd.f64(double %164, double %45, double %161)
store double %165, double* %149
%166 = or i64 %130, 2
%167 = getelementptr inbounds double, double* %4, i64 %166
%168 = sitofp i64 %128 to double
%169 = tail call double @llvm.fmuladd.f64(double %168, double %42, double 0.000000e+00)
%170 = sitofp i64 %127 to double
%171 = tail call double @llvm.fmuladd.f64(double %170, double %43, double %169)
%172 = sitofp i64 %126 to double
%173 = tail call double @llvm.fmuladd.f64(double %172, double %44, double %171)
%174 = sitofp i64 %125 to double
%175 = tail call double @llvm.fmuladd.f64(double %174, double %45, double %173)
store double %175, double* %167
%176 = or i64 %130, 3
%177 = getelementptr inbounds double, double* %4, i64 %176
%178 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %129, i64 3, i64 0
%179 = load i64, i64* %178
%180 = sitofp i64 %179 to double
%181 = tail call double @llvm.fmuladd.f64(double %180, double %42, double 0.000000e+00)
%182 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %129, i64 3, i64 1
%183 = load i64, i64* %182
%184 = sitofp i64 %183 to double
%185 = tail call double @llvm.fmuladd.f64(double %184, double %43, double %181)
%186 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %129, i64 3, i64 2
%187 = load i64, i64* %186
%188 = sitofp i64 %187 to double
%189 = tail call double @llvm.fmuladd.f64(double %188, double %44, double %185)
%190 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %129, i64 3, i64 3
%191 = load i64, i64* %190
%192 = sitofp i64 %191 to double
%193 = tail call double @llvm.fmuladd.f64(double %192, double %45, double %189)
store double %193, double* %177
%194 = add nuw nsw i64 %129, 1
%195 = icmp eq i64 %194, 4
br i1 %195, label %206, label %196
196: ; preds = %124
%197 = add nuw nsw i64 %130, 4
%198 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %194, i64 2, i64 0
%199 = load i64, i64* %198
%200 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %194, i64 2, i64 1
%201 = load i64, i64* %200
%202 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %194, i64 2, i64 2
%203 = load i64, i64* %202
%204 = getelementptr inbounds [4 x [4 x [4 x i64]]], [4 x [4 x [4 x i64]]]* %6, i64 0, i64 %194, i64 2, i64 3
%205 = load i64, i64* %204
br label %124
206: ; preds = %124
%207 = fmul double %3, 2.000000e+00
%208 = getelementptr inbounds double, double* %4, i64 2
%209 = bitcast double* %208 to <2 x double>*
%210 = load <2 x double>, <2 x double>* %209
%211 = insertelement <2 x double> poison, double %207, i64 0
%212 = shufflevector <2 x double> %211, <2 x double> poison, <2 x i32> zeroinitializer
%213 = fdiv <2 x double> %210, %212
%214 = bitcast double* %208 to <2 x double>*
store <2 x double> %213, <2 x double>* %214
%215 = getelementptr inbounds double, double* %4, i64 6
%216 = bitcast double* %215 to <2 x double>*
%217 = load <2 x double>, <2 x double>* %216
%218 = fdiv <2 x double> %217, %212
%219 = bitcast double* %215 to <2 x double>*
store <2 x double> %218, <2 x double>* %219
%220 = getelementptr inbounds double, double* %4, i64 8
%221 = bitcast double* %220 to <2 x double>*
%222 = load <2 x double>, <2 x double>* %221
%223 = fmul <2 x double> %212, %222
%224 = bitcast double* %220 to <2 x double>*
store <2 x double> %223, <2 x double>* %224
%225 = getelementptr inbounds double, double* %4, i64 12
%226 = bitcast double* %225 to <2 x double>*
%227 = load <2 x double>, <2 x double>* %226
%228 = fmul <2 x double> %212, %227
%229 = bitcast double* %225 to <2 x double>*
store <2 x double> %228, <2 x double>* %229
ret void
}