user: 请将以下的汇编代码转换成C语言代码:

```asm
<cftmdl>:
  endbr64
  push   %r15
  lea    0x0(,%rsi,8),%eax
  push   %r14
  mov    %rdx,%r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x118,%rsp
  mov    %edi,0xac(%rsp)
  mov    %esi,0xb8(%rsp)
  mov    %eax,0xa8(%rsp)
  test   %esi,%esi
  jle    L11
  movslq %esi,%rbx
  mov    %esi,%r15d
  lea    0x8(%r14),%r10
  movsd  D74(%rip),%xmm12
  lea    0x0(,%rbx,8),%rdx
  mov    %rbx,%rcx
  lea    -0x1(%r15),%r11d
  lea    (%r14,%rdx,1),%rax
  shl    $0x4,%rcx
  lea    (%r15,%r15,1),%r9d
  shr    %r11d
  add    %rax,%rcx
  movslq %r9d,%r9
  lea    (%rbx,%r11,2),%r11
  lea    (%rcx,%rdx,1),%r8
  lea    0x8(%r14,%r9,8),%r9
  lea    (%r8,%rdx,1),%rdi
  lea    0x10(%r14,%r11,8),%r11
  lea    (%rdi,%rdx,1),%rsi
  add    %rsi,%rdx
L50:
  movsd  (%r10),%xmm1
  movsd  (%rax),%xmm3
  add    $0x10,%rax
  add    $0x10,%rcx
  movsd  -0x8(%rax),%xmm0
  movsd  -0x8(%r10),%xmm2
  add    $0x10,%r8
  add    $0x10,%rdi
  movapd %xmm1,%xmm5
  add    $0x10,%rsi
  add    $0x10,%rdx
  add    $0x10,%r10
  addsd  %xmm0,%xmm5
  subsd  %xmm0,%xmm1
  movapd %xmm2,%xmm7
  add    $0x10,%r9
  movsd  -0x18(%r9),%xmm0
  movsd  -0x10(%rcx),%xmm9
  addsd  %xmm3,%xmm7
  subsd  %xmm3,%xmm2
  movsd  -0x10(%r9),%xmm3
  movsd  -0x8(%rcx),%xmm8
  movapd %xmm0,%xmm6
  subsd  %xmm9,%xmm0
  movapd %xmm5,%xmm13
  movsd  -0x10(%rdx),%xmm14
  addsd  %xmm9,%xmm6
  movapd %xmm3,%xmm4
  subsd  %xmm8,%xmm3
  addsd  %xmm8,%xmm4
  movapd %xmm7,%xmm9
  movapd %xmm2,%xmm11
  movsd  -0x10(%r8),%xmm8
  movapd %xmm1,%xmm10
  subsd  %xmm0,%xmm1
  subsd  %xmm6,%xmm7
  subsd  %xmm3,%xmm11
  subsd  %xmm4,%xmm5
  addsd  %xmm4,%xmm13
  movsd  -0x10(%rdi),%xmm4
  addsd  %xmm3,%xmm2
  movsd  -0x8(%r8),%xmm3
  addsd  %xmm0,%xmm10
  movsd  -0x8(%rdi),%xmm0
  movsd  %xmm7,0x10(%rsp)
  movsd  -0x10(%rsi),%xmm7
  addsd  %xmm6,%xmm9
  movsd  %xmm5,0x18(%rsp)
  movapd %xmm3,%xmm6
  movapd %xmm8,%xmm5
  subsd  %xmm0,%xmm3
  addsd  %xmm4,%xmm5
  addsd  %xmm0,%xmm6
  movapd %xmm7,%xmm15
  movsd  -0x8(%rsi),%xmm0
  movsd  %xmm13,0x8(%rsp)
  movsd  -0x8(%rdx),%xmm13
  subsd  %xmm4,%xmm8
  addsd  %xmm14,%xmm15
  movapd %xmm0,%xmm4
  subsd  %xmm14,%xmm7
  subsd  %xmm13,%xmm0
  movapd %xmm5,%xmm14
  addsd  %xmm13,%xmm4
  addsd  %xmm15,%xmm14
  subsd  %xmm15,%xmm5
  movapd %xmm8,%xmm15
  movapd %xmm6,%xmm13
  subsd  %xmm0,%xmm15
  addsd  %xmm4,%xmm13
  subsd  %xmm4,%xmm6
  addsd  %xmm8,%xmm0
  movapd %xmm15,%xmm4
  movapd %xmm3,%xmm15
  subsd  %xmm7,%xmm3
  addsd  %xmm7,%xmm15
  movapd %xmm4,%xmm7
  movapd %xmm0,%xmm8
  subsd  %xmm3,%xmm8
  addsd  %xmm3,%xmm0
  movapd %xmm11,%xmm3
  subsd  %xmm15,%xmm7
  addsd  %xmm15,%xmm4
  mulsd  %xmm12,%xmm0
  mulsd  %xmm12,%xmm7
  mulsd  %xmm12,%xmm4
  mulsd  %xmm12,%xmm8
  addsd  %xmm7,%xmm3
  subsd  %xmm7,%xmm11
  movsd  %xmm3,-0x10(%rax)
  movapd %xmm10,%xmm3
  subsd  %xmm4,%xmm10
  addsd  %xmm4,%xmm3
  movsd  0x8(%rsp),%xmm4
  movsd  %xmm3,-0x8(%rax)
  movapd %xmm2,%xmm3
  addsd  %xmm0,%xmm2
  subsd  %xmm0,%xmm3
  movsd  %xmm11,-0x10(%rdi)
  movapd %xmm9,%xmm0
  subsd  %xmm14,%xmm9
  movsd  %xmm10,-0x8(%rdi)
  addsd  %xmm14,%xmm0
  movsd  %xmm3,-0x10(%rcx)
  movapd %xmm1,%xmm3
  subsd  %xmm8,%xmm1
  addsd  %xmm8,%xmm3
  movsd  %xmm3,-0x8(%rcx)
  movsd  %xmm2,-0x10(%rdx)
  movsd  %xmm1,-0x8(%rdx)
  movsd  %xmm0,-0x18(%r10)
  movapd %xmm4,%xmm0
  subsd  %xmm13,%xmm4
  addsd  %xmm13,%xmm0
  movsd  %xmm0,-0x10(%r10)
  movsd  %xmm4,-0x8(%r8)
  movsd  %xmm9,-0x10(%r8)
  movsd  0x10(%rsp),%xmm2
  movsd  0x18(%rsp),%xmm4
  movapd %xmm2,%xmm0
  subsd  %xmm6,%xmm0
  addsd  %xmm2,%xmm6
  movsd  %xmm0,-0x18(%r9)
  movapd %xmm4,%xmm0
  subsd  %xmm5,%xmm4
  addsd  %xmm5,%xmm0
  movsd  %xmm0,-0x10(%r9)
  movsd  %xmm6,-0x10(%rsi)
  movsd  %xmm4,-0x8(%rsi)
  cmp    %rax,%r11
  jne    L50
L11:
  mov    0xa8(%rsp),%eax
  mov    0xac(%rsp),%edi
  cmp    %edi,%eax
  jge    L97
  mov    0xb8(%rsp),%r15d
  mov    %r15d,%r10d
  add    %eax,%r10d
  cmp    %r10d,%eax
  jge    L18
  movslq %eax,%r9
  lea    -0x1(%r15),%r11d
  movslq %r15d,%rax
  add    %r15d,%r10d
  lea    (%rax,%rax,1),%rdx
  shr    %r11d
  movslq %r10d,%rdi
  mov    %rax,%rbx
  lea    (%rdx,%rax,2),%r8
  lea    (%r9,%r11,2),%r11
  movsd  D74(%rip),%xmm8
  movsd  D22(%rip),%xmm15
  add    %r8,%rdi
  lea    0x10(%r14,%r11,8),%rbp
  lea    (%r15,%r10,1),%r11d
  shl    $0x5,%rbx
  lea    (%rdx,%r9,1),%rcx
  movslq %r11d,%r11
  lea    (%r8,%r9,1),%rdx
  movsd  D62(%rip),%xmm11
  lea    (%r14,%rdi,8),%r8
  lea    0x1(%rax,%r9,1),%rdi
  sub    %r9,%r11
  lea    (%r14,%r9,8),%rsi
  lea    (%r14,%rcx,8),%rcx
  lea    (%r14,%rdx,8),%rdx
  lea    (%r14,%rdi,8),%rdi
  nopl   0x0(%rax)
L108:
  movsd  (%rsi),%xmm4
  movsd  (%rdi),%xmm0
  lea    (%rbx,%rsi,1),%r10
  lea    (%rbx,%rdi,1),%r9
  movsd  -0x8(%rdi),%xmm2
  movsd  0x8(%rsi),%xmm1
  add    $0x10,%rsi
  add    $0x10,%rdi
  movapd %xmm4,%xmm7
  movsd  0x8(%rcx,%rax,8),%xmm9
  movsd  (%rcx,%rax,8),%xmm10
  subsd  %xmm2,%xmm4
  addsd  %xmm2,%xmm7
  movapd %xmm1,%xmm5
  movsd  0x8(%rcx),%xmm2
  addsd  %xmm0,%xmm5
  subsd  %xmm0,%xmm1
  movsd  (%rcx),%xmm0
  movapd %xmm2,%xmm3
  subsd  %xmm9,%xmm2
  addsd  %xmm9,%xmm3
  movapd %xmm0,%xmm6
  movapd %xmm7,%xmm13
  movsd  (%r10,%r11,8),%xmm9
  addsd  %xmm10,%xmm6
  movapd %xmm5,%xmm14
  subsd  %xmm10,%xmm0
  movapd %xmm4,%xmm10
  subsd  %xmm3,%xmm5
  addsd  %xmm3,%xmm14
  movapd %xmm1,%xmm3
  addsd  %xmm6,%xmm13
  subsd  %xmm6,%xmm7
  movapd %xmm4,%xmm6
  movsd  0x8(%rdx),%xmm4
  subsd  %xmm2,%xmm6
  addsd  %xmm2,%xmm10
  movsd  (%rdx,%rax,8),%xmm2
  movsd  %xmm5,0x20(%rsp)
  movsd  (%rdx),%xmm5
  addsd  %xmm0,%xmm3
  subsd  %xmm0,%xmm1
  movsd  %xmm7,0x18(%rsp)
  movsd  0x8(%rdx,%rax,8),%xmm0
  movapd %xmm4,%xmm12
  movapd %xmm6,%xmm7
  movapd %xmm5,%xmm6
  movsd  %xmm14,0x10(%rsp)
  subsd  %xmm2,%xmm5
  addsd  %xmm2,%xmm6
  subsd  %xmm0,%xmm4
  movsd  (%r9,%rax,8),%xmm2
  movsd  %xmm13,0x8(%rsp)
  addsd  %xmm0,%xmm12
  movsd  (%r8),%xmm0
  movsd  %xmm10,0x28(%rsp)
  movapd %xmm2,%xmm10
  movapd %xmm6,%xmm14
  movapd %xmm0,%xmm6
  subsd  %xmm9,%xmm0
  addsd  %xmm9,%xmm6
  movapd %xmm14,%xmm9
  movapd %xmm6,%xmm13
  movsd  0x8(%r8,%rax,8),%xmm6
  addsd  %xmm13,%xmm9
  subsd  %xmm13,%xmm14
  addsd  %xmm6,%xmm10
  subsd  %xmm6,%xmm2
  movapd %xmm12,%xmm6
  subsd  %xmm10,%xmm12
  addsd  %xmm10,%xmm6
  movapd %xmm4,%xmm10
  addsd  %xmm0,%xmm10
  subsd  %xmm4,%xmm0
  movapd %xmm12,%xmm13
  movapd %xmm5,%xmm12
  subsd  %xmm2,%xmm12
  addsd  %xmm5,%xmm2
  movapd %xmm10,%xmm5
  mulsd  %xmm15,%xmm10
  mulsd  %xmm11,%xmm5
  movapd %xmm12,%xmm4
  mulsd  %xmm11,%xmm12
  mulsd  %xmm15,%xmm4
  addsd  %xmm12,%xmm10
  movapd %xmm2,%xmm12
  mulsd  %xmm11,%xmm12
  subsd  %xmm5,%xmm4
  mulsd  %xmm15,%xmm2
  movapd %xmm12,%xmm5
  movapd %xmm0,%xmm12
  mulsd  %xmm15,%xmm12
  mulsd  %xmm11,%xmm0
  addsd  %xmm12,%xmm5
  movapd %xmm3,%xmm12
  subsd  %xmm2,%xmm0
  mulsd  %xmm15,%xmm12
  movapd %xmm7,%xmm2
  mulsd  %xmm11,%xmm2
  mulsd  %xmm15,%xmm7
  mulsd  %xmm11,%xmm3
  subsd  %xmm12,%xmm2
  addsd  %xmm7,%xmm3
  movapd %xmm4,%xmm7
  addsd  %xmm2,%xmm7
  subsd  %xmm4,%xmm2
  movsd  0x8(%rsp),%xmm4
  movsd  %xmm7,-0x18(%rdi)
  movapd %xmm10,%xmm7
  subsd  %xmm3,%xmm10
  addsd  %xmm3,%xmm7
  movapd %xmm1,%xmm3
  mulsd  %xmm11,%xmm3
  mulsd  %xmm15,%xmm1
  movsd  %xmm7,-0x10(%rdi)
  movsd  %xmm10,(%rdx,%rax,8)
  movsd  0x28(%rsp),%xmm10
  movsd  %xmm2,0x8(%rdx,%rax,8)
  add    $0x10,%rdx
  movapd %xmm10,%xmm2
  mulsd  %xmm15,%xmm2
  subsd  %xmm3,%xmm2
  movapd %xmm10,%xmm3
  mulsd  %xmm11,%xmm3
  addsd  %xmm3,%xmm1
  movapd %xmm2,%xmm3
  subsd  %xmm5,%xmm3
  addsd  %xmm2,%xmm5
  movsd  %xmm3,(%rcx,%rax,8)
  movapd %xmm0,%xmm3
  subsd  %xmm1,%xmm0
  addsd  %xmm1,%xmm3
  movsd  %xmm3,0x8(%rcx,%rax,8)
  add    $0x10,%rcx
  movsd  %xmm0,(%r10,%r11,8)
  movapd %xmm4,%xmm0
  subsd  %xmm9,%xmm4
  addsd  %xmm9,%xmm0
  movsd  %xmm5,0x8(%r8,%rax,8)
  add    $0x10,%r8
  movsd  %xmm0,-0x10(%rsi)
  movsd  0x10(%rsp),%xmm2
  movsd  0x18(%rsp),%xmm5
  movapd %xmm2,%xmm0
  addsd  %xmm6,%xmm0
  subsd  %xmm2,%xmm6
  movsd  %xmm0,-0x8(%rsi)
  movapd %xmm5,%xmm0
  addsd  %xmm13,%xmm5
  movsd  %xmm4,-0x8(%rdx)
  movsd  0x20(%rsp),%xmm4
  subsd  %xmm13,%xmm0
  movsd  %xmm6,-0x10(%rdx)
  movapd %xmm4,%xmm2
  addsd  %xmm14,%xmm2
  movapd %xmm0,%xmm1
  subsd  %xmm4,%xmm14
  subsd  %xmm2,%xmm1
  addsd  %xmm2,%xmm0
  mulsd  %xmm8,%xmm1
  mulsd  %xmm8,%xmm0
  movsd  %xmm1,-0x10(%rcx)
  movapd %xmm14,%xmm1
  addsd  %xmm5,%xmm14
  subsd  %xmm5,%xmm1
  movsd  %xmm0,-0x8(%rcx)
  mulsd  %xmm8,%xmm14
  mulsd  %xmm8,%xmm1
  movsd  %xmm1,-0x10(%r8)
  movsd  %xmm14,(%r9,%rax,8)
  cmp    %rsi,%rbp
  jne    L108
L18:
  mov    0xac(%rsp),%eax
  pxor   %xmm0,%xmm0
  movsd  D21(%rip),%xmm1
  movslq 0xa8(%rsp),%rdi
  cvtsi2sd %eax,%xmm0
  mov    %eax,%ebp
  sar    $0x2,%ebp
  lea    (%rdi,%rdi,1),%r13d
  mov    %ebp,0xbc(%rsp)
  divsd  %xmm0,%xmm1
  movsd  %xmm1,0xb0(%rsp)
  cmp    %r13d,%eax
  jle    L97
  movslq 0xb8(%rsp),%rbx
  movslq %r13d,%r15
  mov    %rdi,0xc0(%rsp)
  mov    %r14,0xf8(%rsp)
  lea    (%rbx,%rbx,2),%rax
  mov    %rbx,%r12
  lea    (%rbx,%r13,1),%ecx
  mov    %rax,0xf0(%rsp)
  add    %r15,%rax
  shl    $0x5,%r12
  mov    %rax,0xa0(%rsp)
  mov    %rbx,%rax
  shl    $0x4,%rax
  mov    %ecx,0x9c(%rsp)
  add    %r14,%rax
  mov    %rax,0xe8(%rsp)
  lea    (%r12,%r14,1),%rax
  mov    %rax,0xe0(%rsp)
  lea    (%r14,%rbx,8),%rax
  mov    %rax,0xd8(%rsp)
  lea    0x108(%rsp),%rax
  mov    %rax,0xd0(%rsp)
  lea    0x100(%rsp),%rax
  mov    %rax,0xc8(%rsp)
  xchg   %ax,%ax
L100:
  mov    0xbc(%rsp),%edi
  xor    %edi,%ebp
  mov    %edi,%eax
  cmp    %ebp,%edi
  jle    L75
  nop
L49:
  sar    %eax
  xor    %eax,%ebp
  cmp    %eax,%ebp
  jl     L49
L75:
  pxor   %xmm0,%xmm0
  mov    0xc8(%rsp),%rsi
  mov    0xd0(%rsp),%rdi
  cvtsi2sd %ebp,%xmm0
  mulsd  0xb0(%rsp),%xmm0
  call   <sincos@plt>
  movsd  D96(%rip),%xmm2
  movsd  0x108(%rsp),%xmm6
  movsd  D96(%rip),%xmm7
  mov    0x9c(%rsp),%r11d
  movapd %xmm6,%xmm0
  movapd %xmm6,%xmm1
  movsd  %xmm6,0x18(%rsp)
  movsd  0x100(%rsp),%xmm5
  addsd  %xmm6,%xmm0
  movapd %xmm5,%xmm4
  movsd  %xmm5,0x10(%rsp)
  mulsd  %xmm0,%xmm1
  mulsd  %xmm5,%xmm0
  subsd  %xmm1,%xmm2
  movapd %xmm6,%xmm1
  movapd %xmm0,%xmm3
  movsd  %xmm0,0x40(%rsp)
  addsd  %xmm0,%xmm0
  movsd  %xmm2,0x38(%rsp)
  mulsd  %xmm0,%xmm1
  subsd  %xmm1,%xmm4
  movapd %xmm5,%xmm1
  mulsd  %xmm0,%xmm1
  movsd  %xmm4,0x48(%rsp)
  subsd  %xmm6,%xmm1
  movapd %xmm1,%xmm14
  movsd  %xmm1,0x50(%rsp)
  movapd %xmm3,%xmm1
  mulsd  %xmm0,%xmm1
  mulsd  %xmm2,%xmm0
  subsd  %xmm1,%xmm7
  movapd %xmm6,%xmm1
  movsd  %xmm0,0x60(%rsp)
  addsd  %xmm0,%xmm0
  movsd  %xmm7,0x58(%rsp)
  movapd %xmm2,%xmm7
  movapd %xmm4,%xmm2
  mulsd  %xmm0,%xmm1
  subsd  %xmm1,%xmm2
  movapd %xmm5,%xmm1
  mulsd  %xmm0,%xmm1
  movsd  %xmm2,0x68(%rsp)
  movapd %xmm7,%xmm2
  mulsd  %xmm0,%xmm7
  subsd  %xmm14,%xmm1
  mulsd  %xmm0,%xmm14
  movsd  %xmm1,0x70(%rsp)
  movapd %xmm3,%xmm1
  mulsd  %xmm0,%xmm1
  mulsd  %xmm4,%xmm0
  subsd  %xmm14,%xmm5
  movsd  %xmm5,0x88(%rsp)
  subsd  %xmm1,%xmm2
  movapd %xmm7,%xmm1
  subsd  %xmm3,%xmm1
  subsd  %xmm6,%xmm0
  movsd  %xmm2,0x78(%rsp)
  movsd  %xmm1,0x80(%rsp)
  movsd  %xmm0,0x90(%rsp)
  cmp    %r11d,%r13d
  jge    L27
  mov    0xb8(%rsp),%esi
  mov    0xf0(%rsp),%rdi
  lea    0x0(,%r15,8),%r8
  mov    0xf8(%rsp),%r10
  mov    0xe8(%rsp),%rax
  add    %r11d,%esi
  add    %rbx,%rdi
  movslq %esi,%rsi
  lea    (%rax,%r8,1),%rdx
  mov    0xe0(%rsp),%rax
  lea    (%r10,%r8,1),%rcx
  add    %rdi,%rsi
  lea    (%r10,%rsi,8),%rdi
  mov    0xd8(%rsp),%rsi
  add    %r8,%rax
  lea    0x8(%rsi,%r8,1),%rsi
  lea    -0x1(%r11),%r8d
  sub    %r13,%r8
  and    $0xfffffffe,%r8d
  add    %r15,%r8
  lea    0x10(%r10,%r8,8),%r11
  mov    0xa0(%rsp),%r10
  sub    %r15,%r10
  nopw   0x0(%rax,%rax,1)
L81:
  movsd  (%rcx),%xmm4
  movsd  (%rsi),%xmm0
  lea    (%rcx,%r12,1),%r9
  lea    (%r12,%rsi,1),%r8
  movsd  -0x8(%rsi),%xmm2
  movsd  0x8(%rcx),%xmm1
  add    $0x10,%rcx
  add    $0x10,%rsi
  movsd  0x8(%rdx),%xmm7
  movapd %xmm4,%xmm9
  movsd  (%rdx,%rbx,8),%xmm5
  addsd  %xmm2,%xmm9
  subsd  %xmm2,%xmm4
  movapd %xmm1,%xmm6
  movsd  0x8(%rdx,%rbx,8),%xmm2
  movapd %xmm7,%xmm3
  addsd  %xmm0,%xmm6
  subsd  %xmm0,%xmm1
  movsd  (%rdx),%xmm0
  addsd  %xmm2,%xmm3
  subsd  %xmm2,%xmm7
  movsd  (%rax,%rbx,8),%xmm10
  movsd  (%r9,%r10,8),%xmm14
  movapd %xmm0,%xmm8
  subsd  %xmm5,%xmm0
  movsd  (%r8,%rbx,8),%xmm11
  movsd  0x8(%rdi,%rbx,8),%xmm13
  movapd %xmm6,%xmm2
  addsd  %xmm5,%xmm8
  movapd %xmm9,%xmm5
  subsd  %xmm3,%xmm6
  addsd  %xmm3,%xmm2
  movapd %xmm1,%xmm3
  addsd  %xmm0,%xmm3
  subsd  %xmm0,%xmm1
  movsd  (%rax),%xmm0
  subsd  %xmm8,%xmm9
  addsd  %xmm8,%xmm5
  movsd  0x8(%rax),%xmm8
  movsd  %xmm6,0x28(%rsp)
  movapd %xmm4,%xmm6
  addsd  %xmm7,%xmm4
  subsd  %xmm7,%xmm6
  movapd %xmm0,%xmm7
  subsd  %xmm10,%xmm0
  movsd  %xmm1,0x8(%rsp)
  addsd  %xmm10,%xmm7
  movsd  (%rdi),%xmm10
  movapd %xmm8,%xmm12
  movsd  %xmm9,0x20(%rsp)
  movapd %xmm10,%xmm15
  subsd  %xmm14,%xmm10
  movapd %xmm7,%xmm9
  movsd  0x8(%rax,%rbx,8),%xmm7
  addsd  %xmm14,%xmm15
  movapd %xmm9,%xmm14
  addsd  %xmm7,%xmm12
  subsd  %xmm7,%xmm8
  movapd %xmm11,%xmm7
  addsd  %xmm13,%xmm7
  subsd  %xmm13,%xmm11
  addsd  %xmm15,%xmm14
  subsd  %xmm15,%xmm9
  movapd %xmm12,%xmm13
  movapd %xmm12,%xmm15
  movapd %xmm8,%xmm12
  addsd  %xmm7,%xmm13
  subsd  %xmm7,%xmm15
  movapd %xmm0,%xmm7
  subsd  %xmm11,%xmm7
  addsd  %xmm10,%xmm12
  subsd  %xmm10,%xmm8
  addsd  %xmm11,%xmm0
  movapd %xmm7,%xmm11
  addsd  %xmm12,%xmm7
  subsd  %xmm12,%xmm11
  movapd %xmm0,%xmm10
  addsd  %xmm8,%xmm0
  mulsd  D74(%rip),%xmm11
  movapd %xmm6,%xmm12
  subsd  %xmm8,%xmm10
  mulsd  D74(%rip),%xmm0
  movapd %xmm3,%xmm8
  mulsd  D74(%rip),%xmm7
  mulsd  D74(%rip),%xmm10
  addsd  %xmm11,%xmm12
  subsd  %xmm11,%xmm6
  movsd  0x70(%rsp),%xmm11
  movsd  %xmm0,0x30(%rsp)
  movsd  0x10(%rsp),%xmm0
  addsd  %xmm7,%xmm8
  subsd  %xmm7,%xmm3
  movapd %xmm11,%xmm7
  mulsd  %xmm12,%xmm0
  mulsd  0x18(%rsp),%xmm12
  mulsd  %xmm3,%xmm7
  movq   %xmm0,%r14
  movsd  0x18(%rsp),%xmm0
  movq   %r14,%xmm1
  mulsd  %xmm8,%xmm0
  mulsd  0x10(%rsp),%xmm8
  subsd  %xmm0,%xmm1
  movsd  0x68(%rsp),%xmm0
  addsd  %xmm12,%xmm8
  mulsd  %xmm0,%xmm3
  movsd  %xmm1,-0x18(%rsi)
  movsd  %xmm8,-0x10(%rsi)
  movapd %xmm0,%xmm8
  mulsd  %xmm6,%xmm8
  mulsd  %xmm11,%xmm6
  subsd  %xmm7,%xmm8
  addsd  %xmm6,%xmm3
  movapd %xmm4,%xmm6
  movsd  %xmm8,(%rax,%rbx,8)
  movsd  0x8(%rsp),%xmm1
  movsd  0x30(%rsp),%xmm11
  movsd  0x48(%rsp),%xmm0
  movsd  0x50(%rsp),%xmm12
  movsd  %xmm3,0x8(%rax,%rbx,8)
  add    $0x10,%rax
  addsd  %xmm10,%xmm1
  subsd  %xmm11,%xmm6
  movapd %xmm0,%xmm8
  movapd %xmm12,%xmm7
  mulsd  %xmm6,%xmm8
  movapd %xmm1,%xmm3
  mulsd  %xmm0,%xmm3
  movapd %xmm11,%xmm0
  mulsd  %xmm12,%xmm6
  addsd  %xmm4,%xmm0
  mulsd  %xmm1,%xmm7
  movsd  0x8(%rsp),%xmm1
  subsd  %xmm10,%xmm1
  movsd  0x90(%rsp),%xmm10
  addsd  %xmm6,%xmm3
  movsd  0x38(%rsp),%xmm6
  subsd  %xmm7,%xmm8
  movsd  0x88(%rsp),%xmm7
  movsd  %xmm3,0x8(%rdx,%rbx,8)
  movapd %xmm7,%xmm4
  movapd %xmm10,%xmm3
  mulsd  %xmm1,%xmm3
  movsd  %xmm8,(%rdx,%rbx,8)
  add    $0x10,%rdx
  mulsd  %xmm0,%xmm4
  mulsd  %xmm7,%xmm1
  movsd  0x58(%rsp),%xmm7
  mulsd  %xmm10,%xmm0
  subsd  %xmm3,%xmm4
  movsd  0x60(%rsp),%xmm3
  addsd  %xmm0,%xmm1
  movapd %xmm5,%xmm0
  subsd  %xmm14,%xmm5
  addsd  %xmm14,%xmm0
  movsd  %xmm4,(%r9,%r10,8)
  movsd  0x28(%rsp),%xmm4
  movsd  %xmm1,0x8(%rdi,%rbx,8)
  movapd %xmm7,%xmm1
  add    $0x10,%rdi
  movsd  %xmm0,-0x10(%rcx)
  mulsd  %xmm5,%xmm1
  movapd %xmm2,%xmm0
  subsd  %xmm13,%xmm2
  addsd  %xmm13,%xmm0
  mulsd  %xmm3,%xmm5
  movsd  %xmm0,-0x8(%rcx)
  movapd %xmm3,%xmm0
  movapd %xmm6,%xmm3
  mulsd  %xmm2,%xmm0
  mulsd  %xmm7,%xmm2
  movsd  0x40(%rsp),%xmm7
  subsd  %xmm0,%xmm1
  movapd %xmm4,%xmm0
  subsd  %xmm9,%xmm4
  addsd  %xmm5,%xmm2
  movsd  0x20(%rsp),%xmm5
  addsd  %xmm9,%xmm0
  movsd  %xmm1,-0x10(%rax)
  movapd %xmm5,%xmm1
  addsd  %xmm15,%xmm5
  subsd  %xmm15,%xmm1
  movsd  %xmm2,-0x8(%rax)
  movapd %xmm7,%xmm2
  mulsd  %xmm0,%xmm2
  mulsd  %xmm6,%xmm0
  movsd  0x80(%rsp),%xmm6
  mulsd  %xmm1,%xmm3
  mulsd  %xmm7,%xmm1
  subsd  %xmm2,%xmm3
  movapd %xmm6,%xmm2
  addsd  %xmm1,%xmm0
  mulsd  %xmm4,%xmm2
  movapd %xmm4,%xmm1
  movsd  %xmm3,-0x10(%rdx)
  movsd  %xmm0,-0x8(%rdx)
  movapd %xmm5,%xmm0
  movsd  0x78(%rsp),%xmm5
  mulsd  %xmm5,%xmm1
  movapd %xmm5,%xmm3
  mulsd  %xmm0,%xmm3
  mulsd  %xmm6,%xmm0
  subsd  %xmm2,%xmm3
  addsd  %xmm0,%xmm1
  movsd  %xmm3,-0x10(%rdi)
  movsd  %xmm1,(%r8,%rbx,8)
  cmp    %r11,%rcx
  jne    L81
L27:
  mov    0xa8(%rsp),%edi
  mov    0xc0(%rsp),%rsi
  add    %edi,0x9c(%rsp)
  add    %rsi,0xa0(%rsp)
  add    %edi,%r13d
  add    %rsi,%r15
  cmp    %r13d,0xac(%rsp)
  jg     L100
L97:
  add    $0x118,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
```

tool_calls: name: unpack_data
arguments: data_tag: D74
type: f64
name: unpack_data
arguments: data_tag: D22
type: f64
name: unpack_data
arguments: data_tag: D62
type: f64
name: unpack_data
arguments: data_tag: D21
type: f64
name: unpack_data
arguments: data_tag: D96
type: byte[8]

tool: D74: 0.7071067811865476

tool: D22: 0.3826834323650898

tool: D62: 0.9238795325112867

tool: D21: 1.5707963267948966

tool: {"D96": [0x00,0x00,0x00,0x00,0x00,0x00,0xf0,0x3f]}

assistant: ```c
void cftmdl(int n, int l, double *a) {
  int j, j1, j2, j3, j4, j5, j6, j7, k, kj, kr, m;
  double ew, wn4r, wtmp, wk1r, wk1i, wk2r, wk2i, wk3r, wk3i, wk4r, wk4i, wk5r, wk5i, wk6r, wk6i, wk7r, wk7i;
  double x0r, x0i, x1r, x1i, x2r, x2i, x3r, x3i, y0r, y0i, y1r, y1i, y2r, y2i, y3r, y3i, y4r, y4i, y5r, y5i, y6r, y6i, y7r, y7i;
  m = l << 3;
  wn4r = 0.707106781186547524400844362104849039284835937688;
  for (j = 0; j < l; j += 2) {
    j1 = j + l;
    j2 = j1 + l;
    j3 = j2 + l;
    j4 = j3 + l;
    j5 = j4 + l;
    j6 = j5 + l;
    j7 = j6 + l;
    x0r = a[j] + a[j1];
    x0i = a[j + 1] + a[j1 + 1];
    x1r = a[j] - a[j1];
    x1i = a[j + 1] - a[j1 + 1];
    x2r = a[j2] + a[j3];
    x2i = a[j2 + 1] + a[j3 + 1];
    x3r = a[j2] - a[j3];
    x3i = a[j2 + 1] - a[j3 + 1];
    y0r = x0r + x2r;
    y0i = x0i + x2i;
    y2r = x0r - x2r;
    y2i = x0i - x2i;
    y1r = x1r - x3i;
    y1i = x1i + x3r;
    y3r = x1r + x3i;
    y3i = x1i - x3r;
    x0r = a[j4] + a[j5];
    x0i = a[j4 + 1] + a[j5 + 1];
    x1r = a[j4] - a[j5];
    x1i = a[j4 + 1] - a[j5 + 1];
    x2r = a[j6] + a[j7];
    x2i = a[j6 + 1] + a[j7 + 1];
    x3r = a[j6] - a[j7];
    x3i = a[j6 + 1] - a[j7 + 1];
    y4r = x0r + x2r;
    y4i = x0i + x2i;
    y6r = x0r - x2r;
    y6i = x0i - x2i;
    x0r = x1r - x3i;
    x0i = x1i + x3r;
    x2r = x1r + x3i;
    x2i = x1i - x3r;
    y5r = wn4r * (x0r - x0i);
    y5i = wn4r * (x0r + x0i);
    y7r = wn4r * (x2r - x2i);
    y7i = wn4r * (x2r + x2i);
    a[j1] = y1r + y5r;
    a[j1 + 1] = y1i + y5i;
    a[j5] = y1r - y5r;
    a[j5 + 1] = y1i - y5i;
    a[j3] = y3r - y7i;
    a[j3 + 1] = y3i + y7r;
    a[j7] = y3r + y7i;
    a[j7 + 1] = y3i - y7r;
    a[j] = y0r + y4r;
    a[j + 1] = y0i + y4i;
    a[j4] = y0r - y4r;
    a[j4 + 1] = y0i - y4i;
    a[j2] = y2r - y6i;
    a[j2 + 1] = y2i + y6r;
    a[j6] = y2r + y6i;
    a[j6 + 1] = y2i - y6r;
  }
  if (m < n) {
    wk1r = 0.923879532511286756128183189396788286822416625863;
    wk1i = 0.382683432365089771728459984030398866761344562485;
    for (j = m; j < l + m; j += 2) {
      j1 = j + l;
      j2 = j1 + l;
      j3 = j2 + l;
      j4 = j3 + l;
      j5 = j4 + l;
      j6 = j5 + l;
      j7 = j6 + l;
      x0r = a[j] + a[j1];
      x0i = a[j + 1] + a[j1 + 1];
      x1r = a[j] - a[j1];
      x1i = a[j + 1] - a[j1 + 1];
      x2r = a[j2] + a[j3];
      x2i = a[j2 + 1] + a[j3 + 1];
      x3r = a[j2] - a[j3];
      x3i = a[j2 + 1] - a[j3 + 1];
      y0r = x0r + x2r;
      y0i = x0i + x2i;
      y2r = x0r - x2r;
      y2i = x0i - x2i;
      y1r = x1r - x3i;
      y1i = x1i + x3r;
      y3r = x1r + x3i;
      y3i = x1i - x3r;
      x0r = a[j4] + a[j5];
      x0i = a[j4 + 1] + a[j5 + 1];
      x1r = a[j4] - a[j5];
      x1i = a[j4 + 1] - a[j5 + 1];
      x2r = a[j6] + a[j7];
      x2i = a[j6 + 1] + a[j7 + 1];
      x3r = a[j6] - a[j7];
      x3i = a[j6 + 1] - a[j7 + 1];
      y4r = x0r + x2r;
      y4i = x0i + x2i;
      y6r = x0r - x2r;
      y6i = x0i - x2i;
      x0r = x1r - x3i;
      x0i = x1i + x3r;
      x2r = x1r + x3i;
      x2i = x3r - x1i;
      y5r = wk1i * x0r - wk1r * x0i;
      y5i = wk1i * x0i + wk1r * x0r;
      y7r = wk1r * x2r + wk1i * x2i;
      y7i = wk1r * x2i - wk1i * x2r;
      x0r = wk1r * y1r - wk1i * y1i;
      x0i = wk1r * y1i + wk1i * y1r;
      a[j1] = x0r + y5r;
      a[j1 + 1] = x0i + y5i;
      a[j5] = y5i - x0i;
      a[j5 + 1] = x0r - y5r;
      x0r = wk1i * y3r - wk1r * y3i;
      x0i = wk1i * y3i + wk1r * y3r;
      a[j3] = x0r - y7r;
      a[j3 + 1] = x0i + y7i;
      a[j7] = y7i - x0i;
      a[j7 + 1] = x0r + y7r;
      a[j] = y0r + y4r;
      a[j + 1] = y0i + y4i;
      a[j4] = y4i - y0i;
      a[j4 + 1] = y0r - y4r;
      x0r = y2r - y6i;
      x0i = y2i + y6r;
      a[j2] = wn4r * (x0r - x0i);
      a[j2 + 1] = wn4r * (x0i + x0r);
      x0r = y6r - y2i;
      x0i = y2r + y6i;
      a[j6] = wn4r * (x0r - x0i);
      a[j6 + 1] = wn4r * (x0i + x0r);
    }
    ew = 1.570796326794896619231321691639751442098584699687 / n;
    kr = n >> 2;
    for (k = 2 * m; k < n; k += m) {
      for (kj = n >> 2; kj > (kr ^= kj); kj >>= 1)
        ;
      wk1r = cos(ew * kr);
      wk1i = sin(ew * kr);
      wk2r = 1 - 2 * wk1i * wk1i;
      wk2i = 2 * wk1i * wk1r;
      wtmp = 2 * wk2i;
      wk3r = wk1r - wtmp * wk1i;
      wk3i = wtmp * wk1r - wk1i;
      wk4r = 1 - wtmp * wk2i;
      wk4i = wtmp * wk2r;
      wtmp = 2 * wk4i;
      wk5r = wk3r - wtmp * wk1i;
      wk5i = wtmp * wk1r - wk3i;
      wk6r = wk2r - wtmp * wk2i;
      wk6i = wtmp * wk2r - wk2i;
      wk7r = wk1r - wtmp * wk3i;
      wk7i = wtmp * wk3r - wk1i;
      for (j = k; j < l + k; j += 2) {
        j1 = j + l;
        j2 = j1 + l;
        j3 = j2 + l;
        j4 = j3 + l;
        j5 = j4 + l;
        j6 = j5 + l;
        j7 = j6 + l;
        x0r = a[j] + a[j1];
        x0i = a[j + 1] + a[j1 + 1];
        x1r = a[j] - a[j1];
        x1i = a[j + 1] - a[j1 + 1];
        x2r = a[j2] + a[j3];
        x2i = a[j2 + 1] + a[j3 + 1];
        x3r = a[j2] - a[j3];
        x3i = a[j2 + 1] - a[j3 + 1];
        y0r = x0r + x2r;
        y0i = x0i + x2i;
        y2r = x0r - x2r;
        y2i = x0i - x2i;
        y1r = x1r - x3i;
        y1i = x1i + x3r;
        y3r = x1r + x3i;
        y3i = x1i - x3r;
        x0r = a[j4] + a[j5];
        x0i = a[j4 + 1] + a[j5 + 1];
        x1r = a[j4] - a[j5];
        x1i = a[j4 + 1] - a[j5 + 1];
        x2r = a[j6] + a[j7];
        x2i = a[j6 + 1] + a[j7 + 1];
        x3r = a[j6] - a[j7];
        x3i = a[j6 + 1] - a[j7 + 1];
        y4r = x0r + x2r;
        y4i = x0i + x2i;
        y6r = x0r - x2r;
        y6i = x0i - x2i;
        x0r = x1r - x3i;
        x0i = x1i + x3r;
        x2r = x1r + x3i;
        x2i = x1i - x3r;
        y5r = wn4r * (x0r - x0i);
        y5i = wn4r * (x0r + x0i);
        y7r = wn4r * (x2r - x2i);
        y7i = wn4r * (x2r + x2i);
        x0r = y1r + y5r;
        x0i = y1i + y5i;
        a[j1] = wk1r * x0r - wk1i * x0i;
        a[j1 + 1] = wk1r * x0i + wk1i * x0r;
        x0r = y1r - y5r;
        x0i = y1i - y5i;
        a[j5] = wk5r * x0r - wk5i * x0i;
        a[j5 + 1] = wk5r * x0i + wk5i * x0r;
        x0r = y3r - y7i;
        x0i = y3i + y7r;
        a[j3] = wk3r * x0r - wk3i * x0i;
        a[j3 + 1] = wk3r * x0i + wk3i * x0r;
        x0r = y3r + y7i;
        x0i = y3i - y7r;
        a[j7] = wk7r * x0r - wk7i * x0i;
        a[j7 + 1] = wk7r * x0i + wk7i * x0r;
        a[j] = y0r + y4r;
        a[j + 1] = y0i + y4i;
        x0r = y0r - y4r;
        x0i = y0i - y4i;
        a[j4] = wk4r * x0r - wk4i * x0i;
        a[j4 + 1] = wk4r * x0i + wk4i * x0r;
        x0r = y2r - y6i;
        x0i = y2i + y6r;
        a[j2] = wk2r * x0r - wk2i * x0i;
        a[j2 + 1] = wk2r * x0i + wk2i * x0r;
        x0r = y2r + y6i;
        x0i = y2i - y6r;
        a[j6] = wk6r * x0r - wk6i * x0i;
        a[j6 + 1] = wk6r * x0i + wk6i * x0r;
      }
    }
  }
}
```