int cyldx(x, y, z, a, f, dfda, na)
double x, y, z, a[], *f, dfda[];
int na;
{
  double *p = dvector(1, 3);
  double *acyl = dvector(1, 3);
  double *r0 = dvector(1, 3);
  double *ry0bar = dvector(1, 3);
  double *ry0 = dvector(1, 3);
  double *rv0 = dvector(1, 3);
  double *v = dvector(1, 3);
  double pdota, pdotr0;
  if (na)
    na = na;
  p[1] = x;
  p[2] = y;
  p[3] = z;
  r0[1] = cos(a[2]) * sin(a[3]);
  r0[2] = sin(a[2]) * sin(a[3]);
  r0[3] = cos(a[3]);
  ry0bar[1] = -sin(a[2]);
  ry0bar[2] = cos(a[2]);
  ry0bar[3] = 0;
  ry0[1] = -sin(a[2]) * sin(a[3]);
  ry0[2] = cos(a[2]) * sin(a[3]);
  ry0[3] = 0;
  rv0[1] = cos(a[2]) * cos(a[3]);
  rv0[2] = sin(a[2]) * cos(a[3]);
  rv0[3] = -sin(a[3]);
  acyl[1] = cos(a[2]) * cos(a[3]) * cos(a[4]) - sin(a[2]) * sin(a[4]);
  acyl[2] = sin(a[2]) * cos(a[3]) * cos(a[4]) + cos(a[2]) * sin(a[4]);
  acyl[3] = -sin(a[3]) * cos(a[4]);
  pdota = dot(p, acyl);
  pdotr0 = dot(p, r0);
  *f = a[5] * (modsq(p) - 2 * a[1] * pdotr0 - pdota * pdota + a[1] * a[1]) /
           2.0 +
       a[1] - pdotr0;
  dfda[1] = a[5] * (a[1] - pdotr0) + 1;
  v[1] = -sin(a[2]) * cos(a[3]) * cos(a[4]) - cos(a[2]) * sin(a[4]);
  v[2] = cos(a[2]) * cos(a[3]) * cos(a[4]) + sin(a[2]) * sin(a[4]);
  v[3] = 0;
  dfda[2] = -a[5] * (a[1] * dot(p, ry0bar) * sin(a[3]) + pdota * dot(p, v)) -
            dot(p, ry0);
  dfda[3] =
      a[5] * (pdota * pdotr0 * cos(a[4]) - a[1] * dot(p, rv0)) - dot(p, rv0);
  v[1] = rv0[1] * sin(a[4]) - ry0bar[1] * cos(a[4]);
  v[2] = rv0[2] * sin(a[4]) - ry0bar[2] * cos(a[4]);
  v[3] = rv0[3] * sin(a[4]) - ry0bar[3] * cos(a[4]);
  dfda[4] = a[5] * pdota * dot(p, v);
  dfda[5] = 0.5 * (modsq(p) - 2 * a[1] * pdotr0 - pdota * pdota + a[1] * a[1]);
  free_dvector(p, 1, 3);
  free_dvector(acyl, 1, 3);
  free_dvector(v, 1, 3);
  free_dvector(r0, 1, 3);
  free_dvector(ry0, 1, 3);
  free_dvector(ry0bar, 1, 3);
  free_dvector(rv0, 1, 3);
  return 1;
}


x86 assembly (clang, -O0):
<cyldx>:
push   %rbp
mov    %rsp,%rbp
sub    $0x1f0,%rsp
movsd  %xmm0,-0x8(%rbp)
movsd  %xmm1,-0x10(%rbp)
movsd  %xmm2,-0x18(%rbp)
mov    %rdi,-0x20(%rbp)
mov    %rsi,-0x28(%rbp)
mov    %rdx,-0x30(%rbp)
mov    %ecx,-0x34(%rbp)
mov    $0x1,%edi
mov    $0x3,%esi
mov    $0x0,%al
call   1050 <dvector@plt>
cltq
mov    %rax,-0x40(%rbp)
mov    $0x1,%edi
mov    $0x3,%esi
mov    $0x0,%al
call   1050 <dvector@plt>
cltq
mov    %rax,-0x48(%rbp)
mov    $0x1,%edi
mov    $0x3,%esi
mov    $0x0,%al
call   1050 <dvector@plt>
cltq
mov    %rax,-0x50(%rbp)
mov    $0x1,%edi
mov    $0x3,%esi
mov    $0x0,%al
call   1050 <dvector@plt>
cltq
mov    %rax,-0x58(%rbp)
mov    $0x1,%edi
mov    $0x3,%esi
mov    $0x0,%al
call   1050 <dvector@plt>
cltq
mov    %rax,-0x60(%rbp)
mov    $0x1,%edi
mov    $0x3,%esi
mov    $0x0,%al
call   1050 <dvector@plt>
cltq
mov    %rax,-0x68(%rbp)
mov    $0x1,%edi
mov    $0x3,%esi
mov    $0x0,%al
call   1050 <dvector@plt>
cltq
mov    %rax,-0x70(%rbp)
cmpl   $0x0,-0x34(%rbp)
je     123a <cyldx+0xda>
mov    -0x34(%rbp),%eax
mov    %eax,-0x34(%rbp)
movsd  -0x8(%rbp),%xmm0
mov    -0x40(%rbp),%rax
movsd  %xmm0,0x8(%rax)
movsd  -0x10(%rbp),%xmm0
mov    -0x40(%rbp),%rax
movsd  %xmm0,0x10(%rax)
movsd  -0x18(%rbp),%xmm0
mov    -0x40(%rbp),%rax
movsd  %xmm0,0x18(%rax)
mov    -0x20(%rbp),%rax
movsd  0x10(%rax),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,-0x1e8(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x18(%rax),%xmm0
call   1040 <sin@plt>
movaps %xmm0,%xmm1
movsd  -0x1e8(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
mov    -0x50(%rbp),%rax
movsd  %xmm0,0x8(%rax)
mov    -0x20(%rbp),%rax
movsd  0x10(%rax),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,-0x1e0(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x18(%rax),%xmm0
call   1040 <sin@plt>
movaps %xmm0,%xmm1
movsd  -0x1e0(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
mov    -0x50(%rbp),%rax
movsd  %xmm0,0x10(%rax)
mov    -0x20(%rbp),%rax
movsd  0x18(%rax),%xmm0
call   1060 <cos@plt>
mov    -0x50(%rbp),%rax
movsd  %xmm0,0x18(%rax)
mov    -0x20(%rbp),%rax
movsd  0x10(%rax),%xmm0
call   1040 <sin@plt>
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
mov    -0x58(%rbp),%rax
movsd  %xmm0,0x8(%rax)
mov    -0x20(%rbp),%rax
movsd  0x10(%rax),%xmm0
call   1060 <cos@plt>
mov    -0x58(%rbp),%rax
movsd  %xmm0,0x10(%rax)
mov    -0x58(%rbp),%rax
xorps  %xmm0,%xmm0
movsd  %xmm0,0x18(%rax)
mov    -0x20(%rbp),%rax
movsd  0x10(%rax),%xmm0
call   1040 <sin@plt>
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x1d8(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x18(%rax),%xmm0
call   1040 <sin@plt>
movaps %xmm0,%xmm1
movsd  -0x1d8(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
mov    -0x60(%rbp),%rax
movsd  %xmm0,0x8(%rax)
mov    -0x20(%rbp),%rax
movsd  0x10(%rax),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,-0x1d0(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x18(%rax),%xmm0
call   1040 <sin@plt>
movaps %xmm0,%xmm1
movsd  -0x1d0(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
mov    -0x60(%rbp),%rax
movsd  %xmm0,0x10(%rax)
mov    -0x60(%rbp),%rax
xorps  %xmm0,%xmm0
movsd  %xmm0,0x18(%rax)
mov    -0x20(%rbp),%rax
movsd  0x10(%rax),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,-0x1c8(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x18(%rax),%xmm0
call   1060 <cos@plt>
movaps %xmm0,%xmm1
movsd  -0x1c8(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
mov    -0x68(%rbp),%rax
movsd  %xmm0,0x8(%rax)
mov    -0x20(%rbp),%rax
movsd  0x10(%rax),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,-0x1c0(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x18(%rax),%xmm0
call   1060 <cos@plt>
movaps %xmm0,%xmm1
movsd  -0x1c0(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
mov    -0x68(%rbp),%rax
movsd  %xmm0,0x10(%rax)
mov    -0x20(%rbp),%rax
movsd  0x18(%rax),%xmm0
call   1040 <sin@plt>
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
mov    -0x68(%rbp),%rax
movsd  %xmm0,0x18(%rax)
mov    -0x20(%rbp),%rax
movsd  0x10(%rax),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,-0x1b8(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x18(%rax),%xmm0
call   1060 <cos@plt>
movaps %xmm0,%xmm1
movsd  -0x1b8(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x1a0(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x20(%rax),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,-0x1a8(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x10(%rax),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,-0x1b0(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x20(%rax),%xmm0
call   1040 <sin@plt>
movsd  -0x1b0(%rbp),%xmm1
ff
movsd  -0x1a8(%rbp),%xmm2
ff
movaps %xmm0,%xmm3
movsd  -0x1a0(%rbp),%xmm0
ff
mulsd  %xmm3,%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x48(%rbp),%rax
movsd  %xmm0,0x8(%rax)
mov    -0x20(%rbp),%rax
movsd  0x10(%rax),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,-0x198(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x18(%rax),%xmm0
call   1060 <cos@plt>
movaps %xmm0,%xmm1
movsd  -0x198(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x180(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x20(%rax),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,-0x188(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x10(%rax),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,-0x190(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x20(%rax),%xmm0
call   1040 <sin@plt>
movsd  -0x190(%rbp),%xmm1
ff
movsd  -0x188(%rbp),%xmm2
ff
movaps %xmm0,%xmm3
movsd  -0x180(%rbp),%xmm0
ff
mulsd  %xmm3,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x48(%rbp),%rax
movsd  %xmm0,0x10(%rax)
mov    -0x20(%rbp),%rax
movsd  0x18(%rax),%xmm0
call   1040 <sin@plt>
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x178(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x20(%rax),%xmm0
call   1060 <cos@plt>
movaps %xmm0,%xmm1
movsd  -0x178(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
mov    -0x48(%rbp),%rax
movsd  %xmm0,0x18(%rax)
mov    -0x40(%rbp),%rdi
mov    -0x48(%rbp),%rsi
mov    $0x0,%al
call   1030 <dot@plt>
cvtsi2sd %eax,%xmm0
movsd  %xmm0,-0x78(%rbp)
mov    -0x40(%rbp),%rdi
mov    -0x50(%rbp),%rsi
mov    $0x0,%al
call   1030 <dot@plt>
cvtsi2sd %eax,%xmm0
movsd  %xmm0,-0x80(%rbp)
mov    -0x20(%rbp),%rax
movsd  0x28(%rax),%xmm0
movsd  %xmm0,-0x170(%rbp)
ff
mov    -0x40(%rbp),%rdi
mov    $0x0,%al
call   1080 <modsq@plt>
movsd  -0x170(%rbp),%xmm0
ff
cvtsi2sd %eax,%xmm2
mov    -0x20(%rbp),%rax
movsd  0x96b(%rip),%xmm1
mulsd  0x8(%rax),%xmm1
movsd  -0x80(%rbp),%xmm3
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm3,%xmm1
addsd  %xmm2,%xmm1
movsd  -0x78(%rbp),%xmm2
movsd  -0x78(%rbp),%xmm3
movq   %xmm2,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm2
mulsd  %xmm3,%xmm2
addsd  %xmm1,%xmm2
mov    -0x20(%rbp),%rax
movsd  0x8(%rax),%xmm1
mov    -0x20(%rbp),%rax
movsd  0x8(%rax),%xmm3
mulsd  %xmm3,%xmm1
addsd  %xmm2,%xmm1
mulsd  %xmm1,%xmm0
movsd  0x8f3(%rip),%xmm1
divsd  %xmm1,%xmm0
mov    -0x20(%rbp),%rax
addsd  0x8(%rax),%xmm0
subsd  -0x80(%rbp),%xmm0
mov    -0x28(%rbp),%rax
movsd  %xmm0,(%rax)
mov    -0x20(%rbp),%rax
movsd  0x28(%rax),%xmm0
mov    -0x20(%rbp),%rax
movsd  0x8(%rax),%xmm1
subsd  -0x80(%rbp),%xmm1
mulsd  %xmm1,%xmm0
movsd  0x8be(%rip),%xmm1
addsd  %xmm1,%xmm0
mov    -0x30(%rbp),%rax
movsd  %xmm0,0x8(%rax)
mov    -0x20(%rbp),%rax
movsd  0x10(%rax),%xmm0
call   1040 <sin@plt>
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x168(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x18(%rax),%xmm0
call   1060 <cos@plt>
movaps %xmm0,%xmm1
movsd  -0x168(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x150(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x20(%rax),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,-0x158(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x10(%rax),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,-0x160(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x20(%rax),%xmm0
call   1040 <sin@plt>
movsd  -0x160(%rbp),%xmm1
ff
movsd  -0x158(%rbp),%xmm2
ff
movaps %xmm0,%xmm3
movsd  -0x150(%rbp),%xmm0
ff
mulsd  %xmm3,%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x70(%rbp),%rax
movsd  %xmm0,0x8(%rax)
mov    -0x20(%rbp),%rax
movsd  0x10(%rax),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,-0x148(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x18(%rax),%xmm0
call   1060 <cos@plt>
movaps %xmm0,%xmm1
movsd  -0x148(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x130(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x20(%rax),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,-0x138(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x10(%rax),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,-0x140(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x20(%rax),%xmm0
call   1040 <sin@plt>
movsd  -0x140(%rbp),%xmm1
ff
movsd  -0x138(%rbp),%xmm2
ff
movaps %xmm0,%xmm3
movsd  -0x130(%rbp),%xmm0
ff
mulsd  %xmm3,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x70(%rbp),%rax
movsd  %xmm0,0x10(%rax)
mov    -0x70(%rbp),%rax
xorps  %xmm0,%xmm0
movsd  %xmm0,0x18(%rax)
mov    -0x20(%rbp),%rax
movsd  0x28(%rax),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x108(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x8(%rax),%xmm0
movsd  %xmm0,-0x128(%rbp)
ff
mov    -0x40(%rbp),%rdi
mov    -0x58(%rbp),%rsi
mov    $0x0,%al
call   1030 <dot@plt>
movsd  -0x128(%rbp),%xmm0
ff
cvtsi2sd %eax,%xmm1
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x118(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x18(%rax),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,-0x110(%rbp)
ff
movsd  -0x78(%rbp),%xmm0
movsd  %xmm0,-0x120(%rbp)
ff
mov    -0x40(%rbp),%rdi
mov    -0x70(%rbp),%rsi
mov    $0x0,%al
call   1030 <dot@plt>
movsd  -0x120(%rbp),%xmm1
ff
movsd  -0x118(%rbp),%xmm0
ff
movsd  -0x110(%rbp),%xmm2
ff
cvtsi2sd %eax,%xmm3
mulsd  %xmm3,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x100(%rbp)
ff
mov    -0x40(%rbp),%rdi
mov    -0x60(%rbp),%rsi
mov    $0x0,%al
call   1030 <dot@plt>
movsd  -0x108(%rbp),%xmm0
ff
movsd  -0x100(%rbp),%xmm2
ff
cvtsi2sd %eax,%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x30(%rbp),%rax
movsd  %xmm0,0x10(%rax)
mov    -0x20(%rbp),%rax
movsd  0x28(%rax),%xmm0
movsd  %xmm0,-0xe0(%rbp)
movsd  -0x78(%rbp),%xmm0
mulsd  -0x80(%rbp),%xmm0
movsd  %xmm0,-0xf0(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x20(%rax),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,-0xe8(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x8(%rax),%xmm0
movsd  %xmm0,-0xf8(%rbp)
ff
mov    -0x40(%rbp),%rdi
mov    -0x68(%rbp),%rsi
mov    $0x0,%al
call   1030 <dot@plt>
movsd  -0xf8(%rbp),%xmm1
ff
movsd  -0xf0(%rbp),%xmm0
ff
movsd  -0xe8(%rbp),%xmm2
ff
cvtsi2sd %eax,%xmm3
mulsd  %xmm3,%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0xd8(%rbp)
ff
mov    -0x40(%rbp),%rdi
mov    -0x68(%rbp),%rsi
mov    $0x0,%al
call   1030 <dot@plt>
movsd  -0xe0(%rbp),%xmm0
ff
movsd  -0xd8(%rbp),%xmm2
ff
cvtsi2sd %eax,%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x30(%rbp),%rax
movsd  %xmm0,0x18(%rax)
mov    -0x68(%rbp),%rax
movsd  0x8(%rax),%xmm0
movsd  %xmm0,-0xc0(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x20(%rax),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,-0xc8(%rbp)
ff
mov    -0x58(%rbp),%rax
movsd  0x8(%rax),%xmm0
movsd  %xmm0,-0xd0(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x20(%rax),%xmm0
call   1060 <cos@plt>
movsd  -0xd0(%rbp),%xmm1
ff
movsd  -0xc8(%rbp),%xmm2
ff
movaps %xmm0,%xmm3
movsd  -0xc0(%rbp),%xmm0
ff
mulsd  %xmm3,%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x70(%rbp),%rax
movsd  %xmm0,0x8(%rax)
mov    -0x68(%rbp),%rax
movsd  0x10(%rax),%xmm0
movsd  %xmm0,-0xa8(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x20(%rax),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,-0xb0(%rbp)
ff
mov    -0x58(%rbp),%rax
movsd  0x10(%rax),%xmm0
movsd  %xmm0,-0xb8(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x20(%rax),%xmm0
call   1060 <cos@plt>
movsd  -0xb8(%rbp),%xmm1
ff
movsd  -0xb0(%rbp),%xmm2
ff
movaps %xmm0,%xmm3
movsd  -0xa8(%rbp),%xmm0
ff
mulsd  %xmm3,%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x70(%rbp),%rax
movsd  %xmm0,0x10(%rax)
mov    -0x68(%rbp),%rax
movsd  0x18(%rax),%xmm0
movsd  %xmm0,-0x90(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x20(%rax),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,-0x98(%rbp)
ff
mov    -0x58(%rbp),%rax
movsd  0x18(%rax),%xmm0
movsd  %xmm0,-0xa0(%rbp)
ff
mov    -0x20(%rbp),%rax
movsd  0x20(%rax),%xmm0
call   1060 <cos@plt>
movsd  -0xa0(%rbp),%xmm1
ff
movsd  -0x98(%rbp),%xmm2
ff
movaps %xmm0,%xmm3
movsd  -0x90(%rbp),%xmm0
ff
mulsd  %xmm3,%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x70(%rbp),%rax
movsd  %xmm0,0x18(%rax)
mov    -0x20(%rbp),%rax
movsd  0x28(%rax),%xmm0
mulsd  -0x78(%rbp),%xmm0
movsd  %xmm0,-0x88(%rbp)
ff
mov    -0x40(%rbp),%rdi
mov    -0x70(%rbp),%rsi
mov    $0x0,%al
call   1030 <dot@plt>
movsd  -0x88(%rbp),%xmm0
ff
cvtsi2sd %eax,%xmm1
mulsd  %xmm1,%xmm0
mov    -0x30(%rbp),%rax
movsd  %xmm0,0x20(%rax)
mov    -0x40(%rbp),%rdi
mov    $0x0,%al
call   1080 <modsq@plt>
cvtsi2sd %eax,%xmm0
mov    -0x20(%rbp),%rax
movsd  0x32d(%rip),%xmm1
mulsd  0x8(%rax),%xmm1
movsd  -0x80(%rbp),%xmm2
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm1
addsd  %xmm0,%xmm1
movsd  -0x78(%rbp),%xmm0
movsd  -0x78(%rbp),%xmm2
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x20(%rbp),%rax
movsd  0x8(%rax),%xmm1
mov    -0x20(%rbp),%rax
movsd  0x8(%rax),%xmm2
mulsd  %xmm2,%xmm1
addsd  %xmm0,%xmm1
movsd  0x2b1(%rip),%xmm0
mulsd  %xmm1,%xmm0
mov    -0x30(%rbp),%rax
movsd  %xmm0,0x28(%rax)
mov    -0x40(%rbp),%rdi
mov    $0x1,%esi
mov    $0x3,%edx
mov    $0x0,%al
call   1070 <free_dvector@plt>
mov    -0x48(%rbp),%rdi
mov    $0x1,%esi
mov    $0x3,%edx
mov    $0x0,%al
call   1070 <free_dvector@plt>
mov    -0x70(%rbp),%rdi
mov    $0x1,%esi
mov    $0x3,%edx
mov    $0x0,%al
call   1070 <free_dvector@plt>
mov    -0x50(%rbp),%rdi
mov    $0x1,%esi
mov    $0x3,%edx
mov    $0x0,%al
call   1070 <free_dvector@plt>
mov    -0x60(%rbp),%rdi
mov    $0x1,%esi
mov    $0x3,%edx
mov    $0x0,%al
call   1070 <free_dvector@plt>
mov    -0x58(%rbp),%rdi
mov    $0x1,%esi
mov    $0x3,%edx
mov    $0x0,%al
call   1070 <free_dvector@plt>
mov    -0x68(%rbp),%rdi
mov    $0x1,%esi
mov    $0x3,%edx
mov    $0x0,%al
call   1070 <free_dvector@plt>
mov    $0x1,%eax
add    $0x1f0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<cyldx>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0xa8,%rsp
mov    %rdx,0xa0(%rsp)
mov    %rsi,0x10(%rsp)
mov    %rdi,%r14
movsd  %xmm2,(%rsp)
movsd  %xmm1,0x28(%rsp)
movsd  %xmm0,0x50(%rsp)
mov    $0x1,%edi
mov    $0x3,%esi
xor    %eax,%eax
call   1050 <dvector@plt>
movslq %eax,%r12
mov    $0x1,%edi
mov    $0x3,%esi
xor    %eax,%eax
call   1050 <dvector@plt>
movslq %eax,%rbx
mov    $0x1,%edi
mov    $0x3,%esi
xor    %eax,%eax
call   1050 <dvector@plt>
movslq %eax,%rbp
mov    %rbp,0x70(%rsp)
mov    $0x1,%edi
mov    $0x3,%esi
xor    %eax,%eax
call   1050 <dvector@plt>
movslq %eax,%r15
mov    $0x1,%edi
mov    $0x3,%esi
xor    %eax,%eax
call   1050 <dvector@plt>
movslq %eax,%r13
mov    $0x1,%edi
mov    $0x3,%esi
xor    %eax,%eax
call   1050 <dvector@plt>
cltq
mov    %rax,0x80(%rsp)
mov    $0x1,%edi
mov    $0x3,%esi
xor    %eax,%eax
call   1050 <dvector@plt>
cltq
mov    %rax,0x88(%rsp)
movsd  0x50(%rsp),%xmm0
movsd  %xmm0,0x8(%r12)
movsd  0x28(%rsp),%xmm0
movsd  %xmm0,0x10(%r12)
movsd  (%rsp),%xmm0
movsd  %xmm0,0x18(%r12)
movsd  0x10(%r14),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,(%rsp)
movsd  0x18(%r14),%xmm0
call   1040 <sin@plt>
mulsd  (%rsp),%xmm0
movsd  %xmm0,0x8(%rbp)
movsd  0x10(%r14),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,(%rsp)
movsd  0x18(%r14),%xmm0
call   1040 <sin@plt>
mulsd  (%rsp),%xmm0
movsd  %xmm0,0x10(%rbp)
movsd  0x18(%r14),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,0x18(%rbp)
movsd  0x10(%r14),%xmm0
call   1040 <sin@plt>
xorps  0xd3d(%rip),%xmm0
mov    %r15,0x90(%rsp)
movlps %xmm0,0x8(%r15)
movsd  0x10(%r14),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,0x10(%r15)
movq   $0x0,0x18(%r15)
movsd  0x10(%r14),%xmm0
call   1040 <sin@plt>
xorps  0xd05(%rip),%xmm0
movaps %xmm0,(%rsp)
movsd  0x18(%r14),%xmm0
call   1040 <sin@plt>
mulsd  (%rsp),%xmm0
movsd  %xmm0,0x8(%r13)
movsd  0x10(%r14),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,(%rsp)
movsd  0x18(%r14),%xmm0
call   1040 <sin@plt>
mulsd  (%rsp),%xmm0
mov    %r13,0x68(%rsp)
movsd  %xmm0,0x10(%r13)
movq   $0x0,0x18(%r13)
movsd  0x10(%r14),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,(%rsp)
movsd  0x18(%r14),%xmm0
call   1060 <cos@plt>
mulsd  (%rsp),%xmm0
mov    0x80(%rsp),%rbp
movsd  %xmm0,0x8(%rbp)
movsd  0x10(%r14),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,(%rsp)
movsd  0x18(%r14),%xmm0
call   1060 <cos@plt>
mulsd  (%rsp),%xmm0
movsd  %xmm0,0x10(%rbp)
movsd  0x18(%r14),%xmm0
call   1040 <sin@plt>
xorps  0xc54(%rip),%xmm0
movlps %xmm0,0x18(%rbp)
movsd  0x10(%r14),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,(%rsp)
movsd  0x18(%r14),%xmm0
call   1060 <cos@plt>
mulsd  (%rsp),%xmm0
movsd  %xmm0,(%rsp)
movsd  0x20(%r14),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,0x28(%rsp)
movsd  0x10(%r14),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,0x50(%rsp)
movsd  0x20(%r14),%xmm0
call   1040 <sin@plt>
mulsd  0x50(%rsp),%xmm0
movsd  0x28(%rsp),%xmm1
mulsd  (%rsp),%xmm1
subsd  %xmm0,%xmm1
movsd  %xmm1,0x8(%rbx)
movsd  0x10(%r14),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,(%rsp)
movsd  0x18(%r14),%xmm0
call   1060 <cos@plt>
mulsd  (%rsp),%xmm0
movsd  %xmm0,(%rsp)
movsd  0x20(%r14),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,0x28(%rsp)
movsd  0x10(%r14),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,0x50(%rsp)
movsd  0x20(%r14),%xmm0
call   1040 <sin@plt>
mulsd  0x50(%rsp),%xmm0
movsd  0x28(%rsp),%xmm1
mulsd  (%rsp),%xmm1
addsd  %xmm0,%xmm1
movsd  %xmm1,0x10(%rbx)
movsd  0x18(%r14),%xmm0
call   1040 <sin@plt>
xorps  0xb66(%rip),%xmm0
movaps %xmm0,(%rsp)
movsd  0x20(%r14),%xmm0
call   1060 <cos@plt>
mulsd  (%rsp),%xmm0
mov    %rbx,%rsi
mov    %rbx,0x98(%rsp)
movsd  %xmm0,0x18(%rbx)
mov    %r12,%rdi
xor    %eax,%eax
call   1030 <dot@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
movapd %xmm0,(%rsp)
mov    %r12,%rdi
mov    0x70(%rsp),%rsi
xor    %eax,%eax
call   1030 <dot@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
movsd  %xmm0,0x28(%rsp)
movsd  0x28(%r14),%xmm0
movsd  %xmm0,0x30(%rsp)
mov    %r12,%rdi
xor    %eax,%eax
call   1080 <modsq@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
movsd  0x8(%r14),%xmm1
movapd %xmm1,%xmm2
mulsd  0xaf1(%rip),%xmm2
movsd  0x28(%rsp),%xmm4
mulsd  %xmm4,%xmm2
addsd  %xmm0,%xmm2
movapd (%rsp),%xmm0
movapd %xmm0,%xmm3
xorpd  0xac2(%rip),%xmm3
mulsd  %xmm0,%xmm3
movapd %xmm3,0x50(%rsp)
addsd  %xmm3,%xmm2
movapd %xmm1,%xmm0
mulsd  %xmm1,%xmm0
addsd  %xmm2,%xmm0
mulsd  0x30(%rsp),%xmm0
mulsd  0xab2(%rip),%xmm0
addsd  %xmm1,%xmm0
subsd  %xmm4,%xmm0
mov    0x10(%rsp),%rax
movsd  %xmm0,(%rax)
movsd  0x8(%r14),%xmm0
subsd  %xmm4,%xmm0
mulsd  0x28(%r14),%xmm0
addsd  0xa91(%rip),%xmm0
mov    0xa0(%rsp),%r15
movsd  %xmm0,0x8(%r15)
movsd  0x10(%r14),%xmm0
call   1040 <sin@plt>
xorps  0xa51(%rip),%xmm0
movaps %xmm0,0x10(%rsp)
movsd  0x18(%r14),%xmm0
call   1060 <cos@plt>
mulsd  0x10(%rsp),%xmm0
movsd  %xmm0,0x10(%rsp)
movsd  0x20(%r14),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,0x30(%rsp)
movsd  0x10(%r14),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,0x40(%rsp)
movsd  0x20(%r14),%xmm0
call   1040 <sin@plt>
mulsd  0x40(%rsp),%xmm0
movsd  0x30(%rsp),%xmm1
mulsd  0x10(%rsp),%xmm1
subsd  %xmm0,%xmm1
mov    0x88(%rsp),%rbx
movsd  %xmm1,0x8(%rbx)
movsd  0x10(%r14),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,0x10(%rsp)
movsd  0x18(%r14),%xmm0
call   1060 <cos@plt>
mulsd  0x10(%rsp),%xmm0
movsd  %xmm0,0x10(%rsp)
movsd  0x20(%r14),%xmm0
call   1060 <cos@plt>
movsd  %xmm0,0x30(%rsp)
movsd  0x10(%r14),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,0x40(%rsp)
movsd  0x20(%r14),%xmm0
call   1040 <sin@plt>
mulsd  0x40(%rsp),%xmm0
movsd  0x30(%rsp),%xmm1
mulsd  0x10(%rsp),%xmm1
addsd  %xmm0,%xmm1
movsd  %xmm1,0x10(%rbx)
movq   $0x0,0x18(%rbx)
movsd  0x28(%r14),%xmm0
xorps  0x960(%rip),%xmm0
movaps %xmm0,0x30(%rsp)
movsd  0x8(%r14),%xmm0
movsd  %xmm0,0x10(%rsp)
mov    %r12,%rdi
mov    0x90(%rsp),%r13
mov    %r13,%rsi
xor    %eax,%eax
call   1030 <dot@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
mulsd  0x10(%rsp),%xmm0
movsd  %xmm0,0x40(%rsp)
movsd  0x18(%r14),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,0x10(%rsp)
mov    %r12,%rdi
mov    %rbx,%rsi
xor    %eax,%eax
call   1030 <dot@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
mulsd  (%rsp),%xmm0
movsd  0x10(%rsp),%xmm1
mulsd  0x40(%rsp),%xmm1
addsd  %xmm0,%xmm1
movsd  %xmm1,0x10(%rsp)
mov    %r12,%rdi
mov    0x68(%rsp),%rsi
xor    %eax,%eax
call   1030 <dot@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
movsd  0x10(%rsp),%xmm1
mulsd  0x30(%rsp),%xmm1
subsd  %xmm0,%xmm1
movsd  %xmm1,0x10(%r15)
movsd  0x20(%r14),%xmm0
movsd  0x28(%r14),%xmm1
movsd  %xmm1,0x30(%rsp)
movapd (%rsp),%xmm1
mulsd  0x28(%rsp),%xmm1
movapd %xmm1,0x40(%rsp)
call   1060 <cos@plt>
movsd  %xmm0,0x10(%rsp)
movsd  0x8(%r14),%xmm0
movsd  %xmm0,0x78(%rsp)
mov    %r12,%rdi
mov    %rbp,%rsi
xor    %eax,%eax
call   1030 <dot@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
mulsd  0x78(%rsp),%xmm0
movsd  0x10(%rsp),%xmm1
mulsd  0x40(%rsp),%xmm1
subsd  %xmm0,%xmm1
mulsd  0x30(%rsp),%xmm1
movsd  %xmm1,0x10(%rsp)
mov    %r12,%rdi
mov    %rbp,%rsi
xor    %eax,%eax
call   1030 <dot@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
movsd  0x10(%rsp),%xmm1
subsd  %xmm0,%xmm1
movsd  %xmm1,0x18(%r15)
movsd  0x8(%rbp),%xmm0
movsd  %xmm0,0x10(%rsp)
movsd  0x20(%r14),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,0x30(%rsp)
movsd  0x8(%r13),%xmm0
movsd  %xmm0,0x40(%rsp)
movsd  0x20(%r14),%xmm0
call   1060 <cos@plt>
mulsd  0x40(%rsp),%xmm0
movsd  0x30(%rsp),%xmm1
mulsd  0x10(%rsp),%xmm1
subsd  %xmm0,%xmm1
movsd  %xmm1,0x8(%rbx)
movsd  0x10(%rbp),%xmm0
movsd  %xmm0,0x10(%rsp)
movsd  0x20(%r14),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,0x30(%rsp)
movsd  0x10(%r13),%xmm0
movsd  %xmm0,0x40(%rsp)
movsd  0x20(%r14),%xmm0
call   1060 <cos@plt>
mulsd  0x40(%rsp),%xmm0
movsd  0x30(%rsp),%xmm1
mulsd  0x10(%rsp),%xmm1
subsd  %xmm0,%xmm1
movsd  %xmm1,0x10(%rbx)
movsd  0x18(%rbp),%xmm0
movsd  %xmm0,0x10(%rsp)
movsd  0x20(%r14),%xmm0
call   1040 <sin@plt>
movsd  %xmm0,0x30(%rsp)
movsd  0x18(%r13),%xmm0
movsd  %xmm0,0x40(%rsp)
movsd  0x20(%r14),%xmm0
call   1060 <cos@plt>
mulsd  0x40(%rsp),%xmm0
movsd  0x30(%rsp),%xmm1
mulsd  0x10(%rsp),%xmm1
subsd  %xmm0,%xmm1
movsd  %xmm1,0x18(%rbx)
movapd (%rsp),%xmm0
mulsd  0x28(%r14),%xmm0
movapd %xmm0,(%rsp)
mov    %r12,%rdi
mov    %rbx,%rsi
xor    %eax,%eax
call   1030 <dot@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
mulsd  (%rsp),%xmm0
movsd  %xmm0,0x20(%r15)
mov    %r12,%rdi
xor    %eax,%eax
call   1080 <modsq@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
movsd  0x8(%r14),%xmm1
movsd  0x6ff(%rip),%xmm2
mulsd  %xmm1,%xmm2
mulsd  0x28(%rsp),%xmm2
addsd  %xmm0,%xmm2
addsd  0x50(%rsp),%xmm2
mulsd  %xmm1,%xmm1
addsd  %xmm2,%xmm1
mulsd  0x6e3(%rip),%xmm1
movsd  %xmm1,0x28(%r15)
mov    %r12,%rdi
mov    $0x1,%esi
mov    $0x3,%edx
xor    %eax,%eax
call   1070 <free_dvector@plt>
mov    0x98(%rsp),%rdi
mov    $0x1,%esi
mov    $0x3,%edx
xor    %eax,%eax
call   1070 <free_dvector@plt>
mov    %rbx,%rdi
mov    $0x1,%esi
mov    $0x3,%edx
xor    %eax,%eax
call   1070 <free_dvector@plt>
mov    0x70(%rsp),%rdi
mov    $0x1,%esi
mov    $0x3,%edx
xor    %eax,%eax
call   1070 <free_dvector@plt>
mov    0x68(%rsp),%rdi
mov    $0x1,%esi
mov    $0x3,%edx
xor    %eax,%eax
call   1070 <free_dvector@plt>
mov    %r13,%rdi
mov    $0x1,%esi
mov    $0x3,%edx
xor    %eax,%eax
call   1070 <free_dvector@plt>
mov    %rbp,%rdi
mov    $0x1,%esi
mov    $0x3,%edx
xor    %eax,%eax
call   1070 <free_dvector@plt>
mov    $0x1,%eax
add    $0xa8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define i32 @cyldx(double %0, double %1, double %2, double* nocapture %3, double* nocapture writeonly %4, double* nocapture writeonly %5, i32 %6) {
%8 = tail call i32 (i32, i32, ...) bitcast (i32 (...)* @dvector to i32 (i32, i32, ...)*)(i32 1, i32 3)
%9 = sext i32 %8 to i64
%10 = inttoptr i64 %9 to double*
%11 = tail call i32 (i32, i32, ...) bitcast (i32 (...)* @dvector to i32 (i32, i32, ...)*)(i32 1, i32 3)
%12 = sext i32 %11 to i64
%13 = inttoptr i64 %12 to double*
%14 = tail call i32 (i32, i32, ...) bitcast (i32 (...)* @dvector to i32 (i32, i32, ...)*)(i32 1, i32 3)
%15 = sext i32 %14 to i64
%16 = inttoptr i64 %15 to double*
%17 = tail call i32 (i32, i32, ...) bitcast (i32 (...)* @dvector to i32 (i32, i32, ...)*)(i32 1, i32 3)
%18 = sext i32 %17 to i64
%19 = inttoptr i64 %18 to double*
%20 = tail call i32 (i32, i32, ...) bitcast (i32 (...)* @dvector to i32 (i32, i32, ...)*)(i32 1, i32 3)
%21 = sext i32 %20 to i64
%22 = inttoptr i64 %21 to double*
%23 = tail call i32 (i32, i32, ...) bitcast (i32 (...)* @dvector to i32 (i32, i32, ...)*)(i32 1, i32 3)
%24 = sext i32 %23 to i64
%25 = inttoptr i64 %24 to double*
%26 = tail call i32 (i32, i32, ...) bitcast (i32 (...)* @dvector to i32 (i32, i32, ...)*)(i32 1, i32 3)
%27 = sext i32 %26 to i64
%28 = inttoptr i64 %27 to double*
%29 = getelementptr inbounds double, double* %10, i64 1
store double %0, double* %29
%30 = getelementptr inbounds double, double* %10, i64 2
store double %1, double* %30
%31 = getelementptr inbounds double, double* %10, i64 3
store double %2, double* %31
%32 = getelementptr inbounds double, double* %3, i64 2
%33 = load double, double* %32
%34 = tail call double @cos(double %33)
%35 = getelementptr inbounds double, double* %3, i64 3
%36 = load double, double* %35
%37 = tail call double @sin(double %36)
%38 = fmul double %34, %37
%39 = getelementptr inbounds double, double* %16, i64 1
store double %38, double* %39
%40 = load double, double* %32
%41 = tail call double @sin(double %40)
%42 = load double, double* %35
%43 = tail call double @sin(double %42)
%44 = fmul double %41, %43
%45 = getelementptr inbounds double, double* %16, i64 2
store double %44, double* %45
%46 = load double, double* %35
%47 = tail call double @cos(double %46)
%48 = getelementptr inbounds double, double* %16, i64 3
store double %47, double* %48
%49 = load double, double* %32
%50 = tail call double @sin(double %49)
%51 = fneg double %50
%52 = getelementptr inbounds double, double* %19, i64 1
store double %51, double* %52
%53 = load double, double* %32
%54 = tail call double @cos(double %53)
%55 = getelementptr inbounds double, double* %19, i64 2
store double %54, double* %55
%56 = getelementptr inbounds double, double* %19, i64 3
store double 0.000000e+00, double* %56
%57 = load double, double* %32
%58 = tail call double @sin(double %57)
%59 = fneg double %58
%60 = load double, double* %35
%61 = tail call double @sin(double %60)
%62 = fmul double %61, %59
%63 = getelementptr inbounds double, double* %22, i64 1
store double %62, double* %63
%64 = load double, double* %32
%65 = tail call double @cos(double %64)
%66 = load double, double* %35
%67 = tail call double @sin(double %66)
%68 = fmul double %65, %67
%69 = getelementptr inbounds double, double* %22, i64 2
store double %68, double* %69
%70 = getelementptr inbounds double, double* %22, i64 3
store double 0.000000e+00, double* %70
%71 = load double, double* %32
%72 = tail call double @cos(double %71)
%73 = load double, double* %35
%74 = tail call double @cos(double %73)
%75 = fmul double %72, %74
%76 = getelementptr inbounds double, double* %25, i64 1
store double %75, double* %76
%77 = load double, double* %32
%78 = tail call double @sin(double %77)
%79 = load double, double* %35
%80 = tail call double @cos(double %79)
%81 = fmul double %78, %80
%82 = getelementptr inbounds double, double* %25, i64 2
store double %81, double* %82
%83 = load double, double* %35
%84 = tail call double @sin(double %83)
%85 = fneg double %84
%86 = getelementptr inbounds double, double* %25, i64 3
store double %85, double* %86
%87 = load double, double* %32
%88 = tail call double @cos(double %87)
%89 = load double, double* %35
%90 = tail call double @cos(double %89)
%91 = fmul double %88, %90
%92 = getelementptr inbounds double, double* %3, i64 4
%93 = load double, double* %92
%94 = tail call double @cos(double %93)
%95 = load double, double* %32
%96 = tail call double @sin(double %95)
%97 = load double, double* %92
%98 = tail call double @sin(double %97)
%99 = fneg double %96
%100 = fmul double %98, %99
%101 = tail call double @llvm.fmuladd.f64(double %91, double %94, double %100)
%102 = getelementptr inbounds double, double* %13, i64 1
store double %101, double* %102
%103 = load double, double* %32
%104 = tail call double @sin(double %103)
%105 = load double, double* %35
%106 = tail call double @cos(double %105)
%107 = fmul double %104, %106
%108 = load double, double* %92
%109 = tail call double @cos(double %108)
%110 = load double, double* %32
%111 = tail call double @cos(double %110)
%112 = load double, double* %92
%113 = tail call double @sin(double %112)
%114 = fmul double %111, %113
%115 = tail call double @llvm.fmuladd.f64(double %107, double %109, double %114)
%116 = getelementptr inbounds double, double* %13, i64 2
store double %115, double* %116
%117 = load double, double* %35
%118 = tail call double @sin(double %117)
%119 = fneg double %118
%120 = load double, double* %92
%121 = tail call double @cos(double %120)
%122 = fmul double %121, %119
%123 = getelementptr inbounds double, double* %13, i64 3
store double %122, double* %123
%124 = tail call i32 (double*, double*, ...) bitcast (i32 (...)* @dot to i32 (double*, double*, ...)*)(double* %10, double* %13)
%125 = sitofp i32 %124 to double
%126 = tail call i32 (double*, double*, ...) bitcast (i32 (...)* @dot to i32 (double*, double*, ...)*)(double* %10, double* %16)
%127 = sitofp i32 %126 to double
%128 = getelementptr inbounds double, double* %3, i64 5
%129 = load double, double* %128
%130 = tail call i32 (double*, ...) bitcast (i32 (...)* @modsq to i32 (double*, ...)*)(double* %10)
%131 = sitofp i32 %130 to double
%132 = getelementptr inbounds double, double* %3, i64 1
%133 = load double, double* %132
%134 = fmul double %133, -2.000000e+00
%135 = tail call double @llvm.fmuladd.f64(double %134, double %127, double %131)
%136 = fneg double %125
%137 = tail call double @llvm.fmuladd.f64(double %136, double %125, double %135)
%138 = tail call double @llvm.fmuladd.f64(double %133, double %133, double %137)
%139 = fmul double %129, %138
%140 = fmul double %139, 5.000000e-01
%141 = fadd double %133, %140
%142 = fsub double %141, %127
store double %142, double* %4
%143 = load double, double* %128
%144 = load double, double* %132
%145 = fsub double %144, %127
%146 = tail call double @llvm.fmuladd.f64(double %143, double %145, double 1.000000e+00)
%147 = getelementptr inbounds double, double* %5, i64 1
store double %146, double* %147
%148 = load double, double* %32
%149 = tail call double @sin(double %148)
%150 = fneg double %149
%151 = load double, double* %35
%152 = tail call double @cos(double %151)
%153 = fmul double %152, %150
%154 = load double, double* %92
%155 = tail call double @cos(double %154)
%156 = load double, double* %32
%157 = tail call double @cos(double %156)
%158 = load double, double* %92
%159 = tail call double @sin(double %158)
%160 = fneg double %157
%161 = fmul double %159, %160
%162 = tail call double @llvm.fmuladd.f64(double %153, double %155, double %161)
%163 = getelementptr inbounds double, double* %28, i64 1
store double %162, double* %163
%164 = load double, double* %32
%165 = tail call double @cos(double %164)
%166 = load double, double* %35
%167 = tail call double @cos(double %166)
%168 = fmul double %165, %167
%169 = load double, double* %92
%170 = tail call double @cos(double %169)
%171 = load double, double* %32
%172 = tail call double @sin(double %171)
%173 = load double, double* %92
%174 = tail call double @sin(double %173)
%175 = fmul double %172, %174
%176 = tail call double @llvm.fmuladd.f64(double %168, double %170, double %175)
%177 = getelementptr inbounds double, double* %28, i64 2
store double %176, double* %177
%178 = getelementptr inbounds double, double* %28, i64 3
store double 0.000000e+00, double* %178
%179 = load double, double* %128
%180 = fneg double %179
%181 = load double, double* %132
%182 = tail call i32 (double*, double*, ...) bitcast (i32 (...)* @dot to i32 (double*, double*, ...)*)(double* %10, double* %19)
%183 = sitofp i32 %182 to double
%184 = fmul double %181, %183
%185 = load double, double* %35
%186 = tail call double @sin(double %185)
%187 = tail call i32 (double*, double*, ...) bitcast (i32 (...)* @dot to i32 (double*, double*, ...)*)(double* %10, double* %28)
%188 = sitofp i32 %187 to double
%189 = fmul double %125, %188
%190 = tail call double @llvm.fmuladd.f64(double %184, double %186, double %189)
%191 = tail call i32 (double*, double*, ...) bitcast (i32 (...)* @dot to i32 (double*, double*, ...)*)(double* %10, double* %22)
%192 = sitofp i32 %191 to double
%193 = fneg double %192
%194 = tail call double @llvm.fmuladd.f64(double %180, double %190, double %193)
%195 = getelementptr inbounds double, double* %5, i64 2
store double %194, double* %195
%196 = load double, double* %128
%197 = fmul double %125, %127
%198 = load double, double* %92
%199 = tail call double @cos(double %198)
%200 = load double, double* %132
%201 = tail call i32 (double*, double*, ...) bitcast (i32 (...)* @dot to i32 (double*, double*, ...)*)(double* %10, double* %25)
%202 = sitofp i32 %201 to double
%203 = fneg double %200
%204 = fmul double %203, %202
%205 = tail call double @llvm.fmuladd.f64(double %197, double %199, double %204)
%206 = tail call i32 (double*, double*, ...) bitcast (i32 (...)* @dot to i32 (double*, double*, ...)*)(double* %10, double* %25)
%207 = sitofp i32 %206 to double
%208 = fneg double %207
%209 = tail call double @llvm.fmuladd.f64(double %196, double %205, double %208)
%210 = getelementptr inbounds double, double* %5, i64 3
store double %209, double* %210
%211 = load double, double* %76
%212 = load double, double* %92
%213 = tail call double @sin(double %212)
%214 = load double, double* %52
%215 = load double, double* %92
%216 = tail call double @cos(double %215)
%217 = fneg double %214
%218 = fmul double %216, %217
%219 = tail call double @llvm.fmuladd.f64(double %211, double %213, double %218)
store double %219, double* %163
%220 = load double, double* %82
%221 = load double, double* %92
%222 = tail call double @sin(double %221)
%223 = load double, double* %55
%224 = load double, double* %92
%225 = tail call double @cos(double %224)
%226 = fneg double %223
%227 = fmul double %225, %226
%228 = tail call double @llvm.fmuladd.f64(double %220, double %222, double %227)
store double %228, double* %177
%229 = load double, double* %86
%230 = load double, double* %92
%231 = tail call double @sin(double %230)
%232 = load double, double* %56
%233 = load double, double* %92
%234 = tail call double @cos(double %233)
%235 = fneg double %232
%236 = fmul double %234, %235
%237 = tail call double @llvm.fmuladd.f64(double %229, double %231, double %236)
store double %237, double* %178
%238 = load double, double* %128
%239 = fmul double %238, %125
%240 = tail call i32 (double*, double*, ...) bitcast (i32 (...)* @dot to i32 (double*, double*, ...)*)(double* %10, double* %28)
%241 = sitofp i32 %240 to double
%242 = fmul double %239, %241
%243 = getelementptr inbounds double, double* %5, i64 4
store double %242, double* %243
%244 = tail call i32 (double*, ...) bitcast (i32 (...)* @modsq to i32 (double*, ...)*)(double* %10)
%245 = sitofp i32 %244 to double
%246 = load double, double* %132
%247 = fmul double %246, -2.000000e+00
%248 = tail call double @llvm.fmuladd.f64(double %247, double %127, double %245)
%249 = tail call double @llvm.fmuladd.f64(double %136, double %125, double %248)
%250 = tail call double @llvm.fmuladd.f64(double %246, double %246, double %249)
%251 = fmul double %250, 5.000000e-01
%252 = getelementptr inbounds double, double* %5, i64 5
store double %251, double* %252
%253 = tail call i32 (double*, i32, i32, ...) bitcast (i32 (...)* @free_dvector to i32 (double*, i32, i32, ...)*)(double* %10, i32 1, i32 3)
%254 = tail call i32 (double*, i32, i32, ...) bitcast (i32 (...)* @free_dvector to i32 (double*, i32, i32, ...)*)(double* %13, i32 1, i32 3)
%255 = tail call i32 (double*, i32, i32, ...) bitcast (i32 (...)* @free_dvector to i32 (double*, i32, i32, ...)*)(double* %28, i32 1, i32 3)
%256 = tail call i32 (double*, i32, i32, ...) bitcast (i32 (...)* @free_dvector to i32 (double*, i32, i32, ...)*)(double* %16, i32 1, i32 3)
%257 = tail call i32 (double*, i32, i32, ...) bitcast (i32 (...)* @free_dvector to i32 (double*, i32, i32, ...)*)(double* %22, i32 1, i32 3)
%258 = tail call i32 (double*, i32, i32, ...) bitcast (i32 (...)* @free_dvector to i32 (double*, i32, i32, ...)*)(double* %19, i32 1, i32 3)
%259 = tail call i32 (double*, i32, i32, ...) bitcast (i32 (...)* @free_dvector to i32 (double*, i32, i32, ...)*)(double* %25, i32 1, i32 3)
ret i32 1
}