user: Please show me the C implementation that matches the assembly code listed below:

```asm
<DFT131072>:
  endbr64
  mov    %rdi,%rcx
  lea    0x80000(%rdi),%rdx
  mov    %rdi,%rax
L266:
  movss  (%rax),%xmm0
  movss  0x4(%rax),%xmm3
  add    $0x10,%rax
  movss  -0x8(%rax),%xmm1
  movss  -0x4(%rax),%xmm4
  movaps %xmm0,%xmm2
  subss  %xmm3,%xmm0
  addss  %xmm3,%xmm2
  movaps %xmm1,%xmm3
  subss  %xmm4,%xmm1
  addss  %xmm4,%xmm3
  movaps %xmm2,%xmm4
  subss  %xmm3,%xmm2
  addss  %xmm3,%xmm4
  movss  %xmm2,-0x8(%rax)
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  %xmm4,-0x10(%rax)
  movss  %xmm0,-0x4(%rax)
  movss  %xmm2,-0xc(%rax)
  cmp    %rax,%rdx
  jne    L266
  movss  D7(%rip),%xmm4
  mov    %rcx,%rax
L244:
  movss  0x10(%rax),%xmm1
  movss  (%rax),%xmm0
  add    $0x20,%rax
  movss  -0x4(%rax),%xmm3
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  -0x8(%rax),%xmm1
  movss  %xmm0,-0x10(%rax)
  movss  -0x18(%rax),%xmm0
  movss  %xmm2,-0x20(%rax)
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  -0x1c(%rax),%xmm1
  movss  %xmm0,-0x8(%rax)
  movss  -0xc(%rax),%xmm0
  movss  %xmm2,-0x18(%rax)
  movaps %xmm0,%xmm2
  subss  %xmm3,%xmm0
  addss  %xmm3,%xmm2
  movaps %xmm1,%xmm3
  mulss  %xmm4,%xmm0
  mulss  %xmm4,%xmm2
  subss  %xmm2,%xmm1
  addss  %xmm2,%xmm3
  movaps %xmm0,%xmm2
  movss  %xmm1,-0xc(%rax)
  movss  -0x14(%rax),%xmm1
  movss  %xmm3,-0x1c(%rax)
  addss  %xmm1,%xmm2
  subss  %xmm0,%xmm1
  movss  %xmm2,-0x14(%rax)
  movss  %xmm1,-0x4(%rax)
  cmp    %rax,%rdx
  jne    L244
  mov    %rcx,%r9
  xor    %r10d,%r10d
  lea    0x28000(%rsi),%r11
  lea    0x40000(%rsi),%r8
L174:
  movss  0x20(%r9),%xmm1
  mov    %r11,%rdi
  mov    %r9,%rdx
  mov    %r9,%rax
  movss  (%r9),%xmm0
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  0x30(%r9),%xmm1
  movss  %xmm0,0x20(%r9)
  movss  0x10(%r9),%xmm0
  movss  %xmm2,(%r9)
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  %xmm0,0x30(%r9)
  movss  %xmm2,0x10(%r9)
L212:
  movss  0x24(%rax),%xmm0
  movss  (%rdi),%xmm5
  add    $0x4,%rax
  sub    $0x4,%rdx
  movss  0x40(%rdx),%xmm4
  movss  (%rax),%xmm2
  add    $0x8000,%rdi
  movss  -0x28000(%rdi),%xmm6
  movaps %xmm0,%xmm3
  movss  0x20(%rdx),%xmm1
  mulss  %xmm5,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm6,%xmm7
  mulss  %xmm5,%xmm4
  mulss  %xmm6,%xmm0
  addss  %xmm7,%xmm3
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  subss  %xmm3,%xmm2
  addss  %xmm3,%xmm4
  movss  %xmm2,0x20(%rax)
  movaps %xmm1,%xmm2
  subss  %xmm0,%xmm1
  addss  %xmm0,%xmm2
  movss  %xmm4,(%rax)
  movss  %xmm1,0x40(%rdx)
  movss  %xmm2,0x20(%rdx)
  cmp    %rdi,%r8
  jne    L212
  add    $0x10,%r10d
  add    $0x40,%r9
  cmp    $0x20000,%r10d
  jne    L174
  mov    %rcx,%r9
  xor    %r10d,%r10d
  lea    0x24000(%rsi),%r11
L135:
  movss  0x40(%r9),%xmm1
  mov    %r11,%rdi
  mov    %r9,%rdx
  mov    %r9,%rax
  movss  (%r9),%xmm0
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  0x60(%r9),%xmm1
  movss  %xmm0,0x40(%r9)
  movss  0x20(%r9),%xmm0
  movss  %xmm2,(%r9)
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  %xmm0,0x60(%r9)
  movss  %xmm2,0x20(%r9)
  nopl   (%rax)
L33:
  movss  0x44(%rax),%xmm0
  movss  (%rdi),%xmm5
  add    $0x4,%rax
  sub    $0x4,%rdx
  movss  (%rax),%xmm2
  movss  0x80(%rdx),%xmm4
  add    $0x4000,%rdi
  movss  -0x24000(%rdi),%xmm6
  movaps %xmm0,%xmm3
  movss  0x40(%rdx),%xmm1
  mulss  %xmm5,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm6,%xmm7
  mulss  %xmm5,%xmm4
  mulss  %xmm6,%xmm0
  addss  %xmm7,%xmm3
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  subss  %xmm3,%xmm2
  addss  %xmm3,%xmm4
  movss  %xmm2,0x40(%rax)
  movaps %xmm1,%xmm2
  subss  %xmm0,%xmm1
  addss  %xmm0,%xmm2
  movss  %xmm4,(%rax)
  movss  %xmm1,0x80(%rdx)
  movss  %xmm2,0x40(%rdx)
  cmp    %rdi,%r8
  jne    L33
  add    $0x20,%r10d
  sub    $0xffffffffffffff80,%r9
  cmp    $0x20000,%r10d
  jne    L135
  lea    0x40(%rcx),%r8
  xor    %r9d,%r9d
  lea    0x2000(%rsi),%r10
L13:
  movss  0x40(%r8),%xmm1
  mov    %r10,%rdi
  lea    -0x3c(%r8),%rax
  lea    0x3c(%r8),%rdx
  movss  -0x40(%r8),%xmm0
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  0x80(%r8),%xmm1
  movss  %xmm0,0x40(%r8)
  movss  (%r8),%xmm0
  movss  %xmm2,-0x40(%r8)
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  %xmm0,0x80(%r8)
  movss  %xmm2,(%r8)
  nopl   0x0(%rax,%rax,1)
L113:
  movss  (%rdi),%xmm6
  movss  (%rax),%xmm2
  add    $0x4,%rax
  sub    $0x4,%rdx
  movss  0x7c(%rax),%xmm0
  movss  0x84(%rdx),%xmm4
  add    $0x2000,%rdi
  movss  0x1e000(%rdi),%xmm5
  movss  0x4(%rdx),%xmm1
  movaps %xmm0,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm5,%xmm3
  mulss  %xmm6,%xmm7
  mulss  %xmm5,%xmm4
  mulss  %xmm6,%xmm0
  addss  %xmm7,%xmm3
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  subss  %xmm3,%xmm2
  addss  %xmm3,%xmm4
  movss  %xmm2,0x7c(%rax)
  movaps %xmm1,%xmm2
  subss  %xmm0,%xmm1
  addss  %xmm0,%xmm2
  movss  %xmm4,-0x4(%rax)
  movss  %xmm1,0x84(%rdx)
  movss  %xmm2,0x4(%rdx)
  cmp    %rax,%r8
  jne    L113
  add    $0x40,%r9d
  add    $0x100,%r8
  cmp    $0x20000,%r9d
  jne    L13
  lea    0x80(%rcx),%r8
  xor    %r9d,%r9d
  lea    0x1000(%rsi),%r10
L269:
  movss  0x80(%r8),%xmm1
  mov    %r10,%rdi
  lea    -0x7c(%r8),%rax
  lea    0x7c(%r8),%rdx
  movss  -0x80(%r8),%xmm0
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  0x100(%r8),%xmm1
  movss  %xmm0,0x80(%r8)
  movss  (%r8),%xmm0
  movss  %xmm2,-0x80(%r8)
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  %xmm0,0x100(%r8)
  movss  %xmm2,(%r8)
  nopl   0x0(%rax)
L30:
  movss  (%rdi),%xmm6
  movss  (%rax),%xmm2
  add    $0x4,%rax
  sub    $0x4,%rdx
  movss  0xfc(%rax),%xmm0
  movss  0x104(%rdx),%xmm4
  add    $0x1000,%rdi
  movss  0x1f000(%rdi),%xmm5
  movss  0x4(%rdx),%xmm1
  movaps %xmm0,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm5,%xmm3
  mulss  %xmm6,%xmm7
  mulss  %xmm5,%xmm4
  mulss  %xmm6,%xmm0
  addss  %xmm7,%xmm3
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  subss  %xmm3,%xmm2
  addss  %xmm3,%xmm4
  movss  %xmm2,0xfc(%rax)
  movaps %xmm1,%xmm2
  subss  %xmm0,%xmm1
  addss  %xmm0,%xmm2
  movss  %xmm4,-0x4(%rax)
  movss  %xmm1,0x104(%rdx)
  movss  %xmm2,0x4(%rdx)
  cmp    %rax,%r8
  jne    L30
  sub    $0xffffff80,%r9d
  add    $0x200,%r8
  cmp    $0x20000,%r9d
  jne    L269
  lea    0x100(%rcx),%r8
  xor    %r9d,%r9d
  lea    0x800(%rsi),%r10
L27:
  movss  0x100(%r8),%xmm1
  mov    %r10,%rdi
  movss  -0x100(%r8),%xmm0
  lea    -0xfc(%r8),%rax
  lea    0xfc(%r8),%rdx
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  0x200(%r8),%xmm1
  movss  %xmm0,0x100(%r8)
  movss  (%r8),%xmm0
  movss  %xmm2,-0x100(%r8)
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  %xmm0,0x200(%r8)
  movss  %xmm2,(%r8)
  nopl   0x0(%rax,%rax,1)
L199:
  movss  (%rdi),%xmm6
  movss  (%rax),%xmm2
  add    $0x4,%rax
  sub    $0x4,%rdx
  movss  0x1fc(%rax),%xmm0
  movss  0x204(%rdx),%xmm4
  add    $0x800,%rdi
  movss  0x1f800(%rdi),%xmm5
  movss  0x4(%rdx),%xmm1
  movaps %xmm0,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm5,%xmm3
  mulss  %xmm6,%xmm7
  mulss  %xmm5,%xmm4
  mulss  %xmm6,%xmm0
  addss  %xmm7,%xmm3
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  subss  %xmm3,%xmm2
  addss  %xmm3,%xmm4
  movss  %xmm2,0x1fc(%rax)
  movaps %xmm1,%xmm2
  subss  %xmm0,%xmm1
  addss  %xmm0,%xmm2
  movss  %xmm4,-0x4(%rax)
  movss  %xmm1,0x204(%rdx)
  movss  %xmm2,0x4(%rdx)
  cmp    %rax,%r8
  jne    L199
  add    $0x100,%r9d
  add    $0x400,%r8
  cmp    $0x20000,%r9d
  jne    L27
  lea    0x200(%rcx),%r8
  xor    %r9d,%r9d
  lea    0x400(%rsi),%r10
L2:
  movss  0x200(%r8),%xmm1
  mov    %r10,%rdi
  movss  -0x200(%r8),%xmm0
  lea    -0x1fc(%r8),%rax
  lea    0x1fc(%r8),%rdx
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  0x400(%r8),%xmm1
  movss  %xmm0,0x200(%r8)
  movss  (%r8),%xmm0
  movss  %xmm2,-0x200(%r8)
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  %xmm0,0x400(%r8)
  movss  %xmm2,(%r8)
  xchg   %ax,%ax
L69:
  movss  (%rdi),%xmm6
  movss  (%rax),%xmm2
  add    $0x4,%rax
  sub    $0x4,%rdx
  movss  0x3fc(%rax),%xmm0
  movss  0x404(%rdx),%xmm4
  add    $0x400,%rdi
  movss  0x1fc00(%rdi),%xmm5
  movss  0x4(%rdx),%xmm1
  movaps %xmm0,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm5,%xmm3
  mulss  %xmm6,%xmm7
  mulss  %xmm5,%xmm4
  mulss  %xmm6,%xmm0
  addss  %xmm7,%xmm3
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  subss  %xmm3,%xmm2
  addss  %xmm3,%xmm4
  movss  %xmm2,0x3fc(%rax)
  movaps %xmm1,%xmm2
  subss  %xmm0,%xmm1
  addss  %xmm0,%xmm2
  movss  %xmm4,-0x4(%rax)
  movss  %xmm1,0x404(%rdx)
  movss  %xmm2,0x4(%rdx)
  cmp    %rax,%r8
  jne    L69
  add    $0x200,%r9d
  add    $0x800,%r8
  cmp    $0x20000,%r9d
  jne    L2
  lea    0x400(%rcx),%r8
  xor    %r9d,%r9d
  lea    0x200(%rsi),%r10
L192:
  movss  0x400(%r8),%xmm1
  mov    %r10,%rdi
  movss  -0x400(%r8),%xmm0
  lea    -0x3fc(%r8),%rax
  lea    0x3fc(%r8),%rdx
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  0x800(%r8),%xmm1
  movss  %xmm0,0x400(%r8)
  movss  (%r8),%xmm0
  movss  %xmm2,-0x400(%r8)
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  %xmm0,0x800(%r8)
  movss  %xmm2,(%r8)
  xchg   %ax,%ax
L153:
  movss  (%rdi),%xmm6
  movss  (%rax),%xmm2
  add    $0x4,%rax
  sub    $0x4,%rdx
  movss  0x7fc(%rax),%xmm0
  movss  0x804(%rdx),%xmm4
  add    $0x200,%rdi
  movss  0x1fe00(%rdi),%xmm5
  movss  0x4(%rdx),%xmm1
  movaps %xmm0,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm5,%xmm3
  mulss  %xmm6,%xmm7
  mulss  %xmm5,%xmm4
  mulss  %xmm6,%xmm0
  addss  %xmm7,%xmm3
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  subss  %xmm3,%xmm2
  addss  %xmm3,%xmm4
  movss  %xmm2,0x7fc(%rax)
  movaps %xmm1,%xmm2
  subss  %xmm0,%xmm1
  addss  %xmm0,%xmm2
  movss  %xmm4,-0x4(%rax)
  movss  %xmm1,0x804(%rdx)
  movss  %xmm2,0x4(%rdx)
  cmp    %rax,%r8
  jne    L153
  add    $0x400,%r9d
  add    $0x1000,%r8
  cmp    $0x20000,%r9d
  jne    L192
  lea    0x800(%rcx),%r8
  xor    %r9d,%r9d
  lea    0x100(%rsi),%r10
L48:
  movss  0x800(%r8),%xmm1
  mov    %r10,%rdi
  movss  -0x800(%r8),%xmm0
  lea    -0x7fc(%r8),%rax
  lea    0x7fc(%r8),%rdx
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  0x1000(%r8),%xmm1
  movss  %xmm0,0x800(%r8)
  movss  (%r8),%xmm0
  movss  %xmm2,-0x800(%r8)
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  %xmm0,0x1000(%r8)
  movss  %xmm2,(%r8)
  xchg   %ax,%ax
L39:
  movss  (%rdi),%xmm6
  movss  (%rax),%xmm2
  add    $0x4,%rax
  sub    $0x4,%rdx
  movss  0xffc(%rax),%xmm0
  movss  0x1004(%rdx),%xmm4
  add    $0x100,%rdi
  movss  0x1ff00(%rdi),%xmm5
  movss  0x4(%rdx),%xmm1
  movaps %xmm0,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm5,%xmm3
  mulss  %xmm6,%xmm7
  mulss  %xmm5,%xmm4
  mulss  %xmm6,%xmm0
  addss  %xmm7,%xmm3
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  subss  %xmm3,%xmm2
  addss  %xmm3,%xmm4
  movss  %xmm2,0xffc(%rax)
  movaps %xmm1,%xmm2
  subss  %xmm0,%xmm1
  addss  %xmm0,%xmm2
  movss  %xmm4,-0x4(%rax)
  movss  %xmm1,0x1004(%rdx)
  movss  %xmm2,0x4(%rdx)
  cmp    %rax,%r8
  jne    L39
  add    $0x800,%r9d
  add    $0x2000,%r8
  cmp    $0x20000,%r9d
  jne    L48
  lea    0x1000(%rcx),%r8
  xor    %r9d,%r9d
  lea    0x80(%rsi),%r10
L122:
  movss  0x1000(%r8),%xmm1
  mov    %r10,%rdi
  movss  -0x1000(%r8),%xmm0
  lea    -0xffc(%r8),%rax
  lea    0xffc(%r8),%rdx
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  0x2000(%r8),%xmm1
  movss  %xmm0,0x1000(%r8)
  movss  (%r8),%xmm0
  movss  %xmm2,-0x1000(%r8)
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  %xmm0,0x2000(%r8)
  movss  %xmm2,(%r8)
  xchg   %ax,%ax
L227:
  movss  (%rdi),%xmm6
  movss  (%rax),%xmm2
  add    $0x4,%rax
  sub    $0xffffffffffffff80,%rdi
  movss  0x2000(%rdx),%xmm4
  movss  0x1ffc(%rax),%xmm0
  sub    $0x4,%rdx
  movss  0x1ff80(%rdi),%xmm5
  movss  0x4(%rdx),%xmm1
  movaps %xmm0,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm5,%xmm3
  mulss  %xmm6,%xmm7
  mulss  %xmm5,%xmm4
  mulss  %xmm6,%xmm0
  addss  %xmm7,%xmm3
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  subss  %xmm3,%xmm2
  addss  %xmm3,%xmm4
  movss  %xmm2,0x1ffc(%rax)
  movaps %xmm1,%xmm2
  subss  %xmm0,%xmm1
  addss  %xmm0,%xmm2
  movss  %xmm4,-0x4(%rax)
  movss  %xmm1,0x2004(%rdx)
  movss  %xmm2,0x4(%rdx)
  cmp    %rax,%r8
  jne    L227
  add    $0x1000,%r9d
  add    $0x4000,%r8
  cmp    $0x20000,%r9d
  jne    L122
  lea    0x2000(%rcx),%r8
  xor    %r9d,%r9d
  lea    0x40(%rsi),%r10
L247:
  movss  0x2000(%r8),%xmm1
  mov    %r10,%rdi
  movss  -0x2000(%r8),%xmm0
  lea    -0x1ffc(%r8),%rax
  lea    0x1ffc(%r8),%rdx
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  0x4000(%r8),%xmm1
  movss  %xmm0,0x2000(%r8)
  movss  (%r8),%xmm0
  movss  %xmm2,-0x2000(%r8)
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  %xmm0,0x4000(%r8)
  movss  %xmm2,(%r8)
  nopl   0x0(%rax,%rax,1)
L256:
  movss  (%rdi),%xmm6
  movss  (%rax),%xmm2
  add    $0x4,%rax
  add    $0x40,%rdi
  movss  0x4000(%rdx),%xmm4
  movss  0x3ffc(%rax),%xmm0
  sub    $0x4,%rdx
  movss  0x1ffc0(%rdi),%xmm5
  movss  0x4(%rdx),%xmm1
  movaps %xmm0,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm5,%xmm3
  mulss  %xmm6,%xmm7
  mulss  %xmm5,%xmm4
  mulss  %xmm6,%xmm0
  addss  %xmm7,%xmm3
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  subss  %xmm3,%xmm2
  addss  %xmm3,%xmm4
  movss  %xmm2,0x3ffc(%rax)
  movaps %xmm1,%xmm2
  subss  %xmm0,%xmm1
  addss  %xmm0,%xmm2
  movss  %xmm4,-0x4(%rax)
  movss  %xmm1,0x4004(%rdx)
  movss  %xmm2,0x4(%rdx)
  cmp    %rax,%r8
  jne    L256
  add    $0x2000,%r9d
  add    $0x8000,%r8
  cmp    $0x20000,%r9d
  jne    L247
  lea    0x4000(%rcx),%r8
  xor    %r9d,%r9d
  lea    0x20(%rsi),%r10
L161:
  movss  0x4000(%r8),%xmm1
  mov    %r10,%rdi
  movss  -0x4000(%r8),%xmm0
  lea    -0x3ffc(%r8),%rax
  lea    0x3ffc(%r8),%rdx
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  0x8000(%r8),%xmm1
  movss  %xmm0,0x4000(%r8)
  movss  (%r8),%xmm0
  movss  %xmm2,-0x4000(%r8)
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  %xmm0,0x8000(%r8)
  movss  %xmm2,(%r8)
  nopl   0x0(%rax,%rax,1)
L9:
  movss  (%rdi),%xmm6
  movss  (%rax),%xmm2
  add    $0x4,%rax
  add    $0x20,%rdi
  movss  0x8000(%rdx),%xmm4
  movss  0x7ffc(%rax),%xmm0
  sub    $0x4,%rdx
  movss  0x1ffe0(%rdi),%xmm5
  movss  0x4(%rdx),%xmm1
  movaps %xmm0,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm5,%xmm3
  mulss  %xmm6,%xmm7
  mulss  %xmm5,%xmm4
  mulss  %xmm6,%xmm0
  addss  %xmm7,%xmm3
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  subss  %xmm3,%xmm2
  addss  %xmm3,%xmm4
  movss  %xmm2,0x7ffc(%rax)
  movaps %xmm1,%xmm2
  subss  %xmm0,%xmm1
  addss  %xmm0,%xmm2
  movss  %xmm4,-0x4(%rax)
  movss  %xmm1,0x8004(%rdx)
  movss  %xmm2,0x4(%rdx)
  cmp    %rax,%r8
  jne    L9
  add    $0x4000,%r9d
  add    $0x10000,%r8
  cmp    $0x20000,%r9d
  jne    L161
  lea    0x8000(%rcx),%r8
  xor    %r9d,%r9d
  lea    0x10(%rsi),%r10
L89:
  movss  0x8000(%r8),%xmm1
  mov    %r10,%rdi
  movss  -0x8000(%r8),%xmm0
  lea    -0x7ffc(%r8),%rax
  lea    0x7ffc(%r8),%rdx
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  0x10000(%r8),%xmm1
  movss  %xmm0,0x8000(%r8)
  movss  (%r8),%xmm0
  movss  %xmm2,-0x8000(%r8)
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  %xmm0,0x10000(%r8)
  movss  %xmm2,(%r8)
  nopl   0x0(%rax,%rax,1)
L103:
  movss  (%rdi),%xmm6
  movss  (%rax),%xmm2
  add    $0x4,%rax
  add    $0x10,%rdi
  movss  0x10000(%rdx),%xmm4
  movss  0xfffc(%rax),%xmm0
  sub    $0x4,%rdx
  movss  0x1fff0(%rdi),%xmm5
  movss  0x4(%rdx),%xmm1
  movaps %xmm0,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm5,%xmm3
  mulss  %xmm6,%xmm7
  mulss  %xmm5,%xmm4
  mulss  %xmm6,%xmm0
  addss  %xmm7,%xmm3
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  subss  %xmm3,%xmm2
  addss  %xmm3,%xmm4
  movss  %xmm2,0xfffc(%rax)
  movaps %xmm1,%xmm2
  subss  %xmm0,%xmm1
  addss  %xmm0,%xmm2
  movss  %xmm4,-0x4(%rax)
  movss  %xmm1,0x10004(%rdx)
  movss  %xmm2,0x4(%rdx)
  cmp    %rax,%r8
  jne    L103
  add    $0x8000,%r9d
  add    $0x20000,%r8
  cmp    $0x20000,%r9d
  jne    L89
  lea    0x10000(%rcx),%r8
  xor    %r9d,%r9d
  lea    0x8(%rsi),%r10
L280:
  movss  0x10000(%r8),%xmm1
  mov    %r10,%rdi
  movss  -0x10000(%r8),%xmm0
  lea    -0xfffc(%r8),%rax
  lea    0xfffc(%r8),%rdx
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  0x20000(%r8),%xmm1
  movss  %xmm0,0x10000(%r8)
  movss  (%r8),%xmm0
  movss  %xmm2,-0x10000(%r8)
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  %xmm0,0x20000(%r8)
  movss  %xmm2,(%r8)
  nopl   0x0(%rax,%rax,1)
L193:
  movss  (%rdi),%xmm6
  movss  (%rax),%xmm2
  add    $0x4,%rax
  add    $0x8,%rdi
  movss  0x20000(%rdx),%xmm4
  movss  0x1fffc(%rax),%xmm0
  sub    $0x4,%rdx
  movss  0x1fff8(%rdi),%xmm5
  movss  0x4(%rdx),%xmm1
  movaps %xmm0,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm5,%xmm3
  mulss  %xmm6,%xmm7
  mulss  %xmm5,%xmm4
  mulss  %xmm6,%xmm0
  addss  %xmm7,%xmm3
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  subss  %xmm3,%xmm2
  addss  %xmm3,%xmm4
  movss  %xmm2,0x1fffc(%rax)
  movaps %xmm1,%xmm2
  subss  %xmm0,%xmm1
  addss  %xmm0,%xmm2
  movss  %xmm4,-0x4(%rax)
  movss  %xmm1,0x20004(%rdx)
  movss  %xmm2,0x4(%rdx)
  cmp    %rax,%r8
  jne    L193
  add    $0x10000,%r9d
  add    $0x40000,%r8
  cmp    $0x20000,%r9d
  jne    L280
  movss  0x40000(%rcx),%xmm1
  movss  (%rcx),%xmm0
  lea    0x3fffc(%rcx),%rax
  lea    0x40004(%rcx),%rdx
  add    $0x20004,%rsi
  add    $0x20000,%rcx
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  0x40000(%rcx),%xmm1
  movss  %xmm0,0x20000(%rcx)
  movss  (%rcx),%xmm0
  movss  %xmm2,-0x20000(%rcx)
  movaps %xmm0,%xmm2
  subss  %xmm1,%xmm0
  addss  %xmm1,%xmm2
  movss  %xmm0,0x40000(%rcx)
  movss  %xmm2,(%rcx)
L84:
  movss  (%rdx),%xmm0
  movss  (%rsi),%xmm5
  sub    $0x4,%rax
  add    $0x4,%rsi
  movss  0x40004(%rax),%xmm4
  movss  0x4(%rax),%xmm1
  add    $0x4,%rdx
  movss  -0x20004(%rsi),%xmm6
  movaps %xmm0,%xmm3
  movss  -0x40004(%rdx),%xmm2
  mulss  %xmm5,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm6,%xmm7
  mulss  %xmm5,%xmm4
  mulss  %xmm6,%xmm0
  addss  %xmm7,%xmm3
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  subss  %xmm3,%xmm2
  addss  %xmm3,%xmm4
  movss  %xmm2,-0x4(%rdx)
  movaps %xmm1,%xmm2
  subss  %xmm0,%xmm1
  addss  %xmm0,%xmm2
  movss  %xmm4,-0x40004(%rdx)
  movss  %xmm1,0x40004(%rax)
  movss  %xmm2,0x4(%rax)
  cmp    %rax,%rcx
  jne    L84
  ret
```

tool_calls: name: retrieve_data
arguments: label: D7
type: byte[4]

tool: {"D7": [0xf3,0x04,0x35,0x3f]}

assistant: ```c
void DFT131072(float *A, const float *sinTab) {
  int i, j, theta;
  float alpha, beta, beta1, beta2, y0, y1, y2, y3;
  for (i = 0; i < 131072; i += 4) {
    alpha = A[i];
    beta = A[i + 1];
    beta1 = A[i + 2];
    beta2 = A[i + 3];
    y0 = alpha + beta;
    y1 = alpha - beta;
    y2 = beta1 + beta2;
    y3 = beta1 - beta2;
    A[i] = y0 + y2;
    A[i + 2] = y0 - y2;
    A[i + 1] = y1 + y3;
    A[i + 3] = y1 - y3;
  }
  for (i = 0; i < 131072; i += 8) {
    alpha = A[i];
    beta = A[i + 4];
    A[i] = alpha + beta;
    A[i + 4] = alpha - beta;
    alpha = A[i + 2];
    beta = A[i + 6];
    A[i + 2] = alpha + beta;
    A[i + 6] = alpha - beta;
    alpha = A[i + 1];
    beta1 = 0.70710678118654752440084436210485f * (A[i + 5] + A[i + 7]);
    beta2 = 0.70710678118654752440084436210485f * (A[i + 5] - A[i + 7]);
    A[i + 1] = alpha + beta1;
    A[i + 5] = alpha - beta1;
    alpha = A[i + 3];
    A[i + 3] = alpha + beta2;
    A[i + 7] = alpha - beta2;
  }
  for (i = 0; i < 131072; i += 16) {
    theta = 8192;
    alpha = A[i];
    beta = A[i + 8];
    A[i] = alpha + beta;
    A[i + 8] = alpha - beta;
    alpha = A[i + 4];
    beta = A[i + 12];
    A[i + 4] = alpha + beta;
    A[i + 12] = alpha - beta;
    for (j = 1; j < 4; j++) {
      y0 = sinTab[theta];
      y1 = sinTab[theta + 32768];
      alpha = A[i + j];
      beta = A[i - j + 8];
      beta1 = A[i + j + 8] * y1 + A[i - j + 16] * y0;
      beta2 = A[i + j + 8] * y0 - A[i - j + 16] * y1;
      theta += 8192;
      A[i + j] = alpha + beta1;
      A[i + j + 8] = alpha - beta1;
      A[i - j + 8] = beta + beta2;
      A[i - j + 16] = beta - beta2;
    }
  }
  for (i = 0; i < 131072; i += 32) {
    theta = 4096;
    alpha = A[i];
    beta = A[i + 16];
    A[i] = alpha + beta;
    A[i + 16] = alpha - beta;
    alpha = A[i + 8];
    beta = A[i + 24];
    A[i + 8] = alpha + beta;
    A[i + 24] = alpha - beta;
    for (j = 1; j < 8; j++) {
      y0 = sinTab[theta];
      y1 = sinTab[theta + 32768];
      alpha = A[i + j];
      beta = A[i - j + 16];
      beta1 = A[i + j + 16] * y1 + A[i - j + 32] * y0;
      beta2 = A[i + j + 16] * y0 - A[i - j + 32] * y1;
      theta += 4096;
      A[i + j] = alpha + beta1;
      A[i + j + 16] = alpha - beta1;
      A[i - j + 16] = beta + beta2;
      A[i - j + 32] = beta - beta2;
    }
  }
  for (i = 0; i < 131072; i += 64) {
    theta = 2048;
    alpha = A[i];
    beta = A[i + 32];
    A[i] = alpha + beta;
    A[i + 32] = alpha - beta;
    alpha = A[i + 16];
    beta = A[i + 48];
    A[i + 16] = alpha + beta;
    A[i + 48] = alpha - beta;
    for (j = 1; j < 16; j++) {
      y0 = sinTab[theta];
      y1 = sinTab[theta + 32768];
      alpha = A[i + j];
      beta = A[i - j + 32];
      beta1 = A[i + j + 32] * y1 + A[i - j + 64] * y0;
      beta2 = A[i + j + 32] * y0 - A[i - j + 64] * y1;
      theta += 2048;
      A[i + j] = alpha + beta1;
      A[i + j + 32] = alpha - beta1;
      A[i - j + 32] = beta + beta2;
      A[i - j + 64] = beta - beta2;
    }
  }
  for (i = 0; i < 131072; i += 128) {
    theta = 1024;
    alpha = A[i];
    beta = A[i + 64];
    A[i] = alpha + beta;
    A[i + 64] = alpha - beta;
    alpha = A[i + 32];
    beta = A[i + 96];
    A[i + 32] = alpha + beta;
    A[i + 96] = alpha - beta;
    for (j = 1; j < 32; j++) {
      y0 = sinTab[theta];
      y1 = sinTab[theta + 32768];
      alpha = A[i + j];
      beta = A[i - j + 64];
      beta1 = A[i + j + 64] * y1 + A[i - j + 128] * y0;
      beta2 = A[i + j + 64] * y0 - A[i - j + 128] * y1;
      theta += 1024;
      A[i + j] = alpha + beta1;
      A[i + j + 64] = alpha - beta1;
      A[i - j + 64] = beta + beta2;
      A[i - j + 128] = beta - beta2;
    }
  }
  for (i = 0; i < 131072; i += 256) {
    theta = 512;
    alpha = A[i];
    beta = A[i + 128];
    A[i] = alpha + beta;
    A[i + 128] = alpha - beta;
    alpha = A[i + 64];
    beta = A[i + 192];
    A[i + 64] = alpha + beta;
    A[i + 192] = alpha - beta;
    for (j = 1; j < 64; j++) {
      y0 = sinTab[theta];
      y1 = sinTab[theta + 32768];
      alpha = A[i + j];
      beta = A[i - j + 128];
      beta1 = A[i + j + 128] * y1 + A[i - j + 256] * y0;
      beta2 = A[i + j + 128] * y0 - A[i - j + 256] * y1;
      theta += 512;
      A[i + j] = alpha + beta1;
      A[i + j + 128] = alpha - beta1;
      A[i - j + 128] = beta + beta2;
      A[i - j + 256] = beta - beta2;
    }
  }
  for (i = 0; i < 131072; i += 512) {
    theta = 256;
    alpha = A[i];
    beta = A[i + 256];
    A[i] = alpha + beta;
    A[i + 256] = alpha - beta;
    alpha = A[i + 128];
    beta = A[i + 384];
    A[i + 128] = alpha + beta;
    A[i + 384] = alpha - beta;
    for (j = 1; j < 128; j++) {
      y0 = sinTab[theta];
      y1 = sinTab[theta + 32768];
      alpha = A[i + j];
      beta = A[i - j + 256];
      beta1 = A[i + j + 256] * y1 + A[i - j + 512] * y0;
      beta2 = A[i + j + 256] * y0 - A[i - j + 512] * y1;
      theta += 256;
      A[i + j] = alpha + beta1;
      A[i + j + 256] = alpha - beta1;
      A[i - j + 256] = beta + beta2;
      A[i - j + 512] = beta - beta2;
    }
  }
  for (i = 0; i < 131072; i += 1024) {
    theta = 128;
    alpha = A[i];
    beta = A[i + 512];
    A[i] = alpha + beta;
    A[i + 512] = alpha - beta;
    alpha = A[i + 256];
    beta = A[i + 768];
    A[i + 256] = alpha + beta;
    A[i + 768] = alpha - beta;
    for (j = 1; j < 256; j++) {
      y0 = sinTab[theta];
      y1 = sinTab[theta + 32768];
      alpha = A[i + j];
      beta = A[i - j + 512];
      beta1 = A[i + j + 512] * y1 + A[i - j + 1024] * y0;
      beta2 = A[i + j + 512] * y0 - A[i - j + 1024] * y1;
      theta += 128;
      A[i + j] = alpha + beta1;
      A[i + j + 512] = alpha - beta1;
      A[i - j + 512] = beta + beta2;
      A[i - j + 1024] = beta - beta2;
    }
  }
  for (i = 0; i < 131072; i += 2048) {
    theta = 64;
    alpha = A[i];
    beta = A[i + 1024];
    A[i] = alpha + beta;
    A[i + 1024] = alpha - beta;
    alpha = A[i + 512];
    beta = A[i + 1536];
    A[i + 512] = alpha + beta;
    A[i + 1536] = alpha - beta;
    for (j = 1; j < 512; j++) {
      y0 = sinTab[theta];
      y1 = sinTab[theta + 32768];
      alpha = A[i + j];
      beta = A[i - j + 1024];
      beta1 = A[i + j + 1024] * y1 + A[i - j + 2048] * y0;
      beta2 = A[i + j + 1024] * y0 - A[i - j + 2048] * y1;
      theta += 64;
      A[i + j] = alpha + beta1;
      A[i + j + 1024] = alpha - beta1;
      A[i - j + 1024] = beta + beta2;
      A[i - j + 2048] = beta - beta2;
    }
  }
  for (i = 0; i < 131072; i += 4096) {
    theta = 32;
    alpha = A[i];
    beta = A[i + 2048];
    A[i] = alpha + beta;
    A[i + 2048] = alpha - beta;
    alpha = A[i + 1024];
    beta = A[i + 3072];
    A[i + 1024] = alpha + beta;
    A[i + 3072] = alpha - beta;
    for (j = 1; j < 1024; j++) {
      y0 = sinTab[theta];
      y1 = sinTab[theta + 32768];
      alpha = A[i + j];
      beta = A[i - j + 2048];
      beta1 = A[i + j + 2048] * y1 + A[i - j + 4096] * y0;
      beta2 = A[i + j + 2048] * y0 - A[i - j + 4096] * y1;
      theta += 32;
      A[i + j] = alpha + beta1;
      A[i + j + 2048] = alpha - beta1;
      A[i - j + 2048] = beta + beta2;
      A[i - j + 4096] = beta - beta2;
    }
  }
  for (i = 0; i < 131072; i += 8192) {
    theta = 16;
    alpha = A[i];
    beta = A[i + 4096];
    A[i] = alpha + beta;
    A[i + 4096] = alpha - beta;
    alpha = A[i + 2048];
    beta = A[i + 6144];
    A[i + 2048] = alpha + beta;
    A[i + 6144] = alpha - beta;
    for (j = 1; j < 2048; j++) {
      y0 = sinTab[theta];
      y1 = sinTab[theta + 32768];
      alpha = A[i + j];
      beta = A[i - j + 4096];
      beta1 = A[i + j + 4096] * y1 + A[i - j + 8192] * y0;
      beta2 = A[i + j + 4096] * y0 - A[i - j + 8192] * y1;
      theta += 16;
      A[i + j] = alpha + beta1;
      A[i + j + 4096] = alpha - beta1;
      A[i - j + 4096] = beta + beta2;
      A[i - j + 8192] = beta - beta2;
    }
  }
  for (i = 0; i < 131072; i += 16384) {
    theta = 8;
    alpha = A[i];
    beta = A[i + 8192];
    A[i] = alpha + beta;
    A[i + 8192] = alpha - beta;
    alpha = A[i + 4096];
    beta = A[i + 12288];
    A[i + 4096] = alpha + beta;
    A[i + 12288] = alpha - beta;
    for (j = 1; j < 4096; j++) {
      y0 = sinTab[theta];
      y1 = sinTab[theta + 32768];
      alpha = A[i + j];
      beta = A[i - j + 8192];
      beta1 = A[i + j + 8192] * y1 + A[i - j + 16384] * y0;
      beta2 = A[i + j + 8192] * y0 - A[i - j + 16384] * y1;
      theta += 8;
      A[i + j] = alpha + beta1;
      A[i + j + 8192] = alpha - beta1;
      A[i - j + 8192] = beta + beta2;
      A[i - j + 16384] = beta - beta2;
    }
  }
  for (i = 0; i < 131072; i += 32768) {
    theta = 4;
    alpha = A[i];
    beta = A[i + 16384];
    A[i] = alpha + beta;
    A[i + 16384] = alpha - beta;
    alpha = A[i + 8192];
    beta = A[i + 24576];
    A[i + 8192] = alpha + beta;
    A[i + 24576] = alpha - beta;
    for (j = 1; j < 8192; j++) {
      y0 = sinTab[theta];
      y1 = sinTab[theta + 32768];
      alpha = A[i + j];
      beta = A[i - j + 16384];
      beta1 = A[i + j + 16384] * y1 + A[i - j + 32768] * y0;
      beta2 = A[i + j + 16384] * y0 - A[i - j + 32768] * y1;
      theta += 4;
      A[i + j] = alpha + beta1;
      A[i + j + 16384] = alpha - beta1;
      A[i - j + 16384] = beta + beta2;
      A[i - j + 32768] = beta - beta2;
    }
  }
  for (i = 0; i < 131072; i += 65536) {
    theta = 2;
    alpha = A[i];
    beta = A[i + 32768];
    A[i] = alpha + beta;
    A[i + 32768] = alpha - beta;
    alpha = A[i + 16384];
    beta = A[i + 49152];
    A[i + 16384] = alpha + beta;
    A[i + 49152] = alpha - beta;
    for (j = 1; j < 16384; j++) {
      y0 = sinTab[theta];
      y1 = sinTab[theta + 32768];
      alpha = A[i + j];
      beta = A[i - j + 32768];
      beta1 = A[i + j + 32768] * y1 + A[i - j + 65536] * y0;
      beta2 = A[i + j + 32768] * y0 - A[i - j + 65536] * y1;
      theta += 2;
      A[i + j] = alpha + beta1;
      A[i + j + 32768] = alpha - beta1;
      A[i - j + 32768] = beta + beta2;
      A[i - j + 65536] = beta - beta2;
    }
  }
  theta = 1;
  alpha = A[0];
  beta = A[65536];
  A[0] = alpha + beta;
  A[65536] = alpha - beta;
  alpha = A[32768];
  beta = A[98304];
  A[32768] = alpha + beta;
  A[98304] = alpha - beta;
  for (j = 1; j < 32768; j++) {
    y0 = sinTab[theta];
    y1 = sinTab[theta + 32768];
    alpha = A[j];
    beta = A[-j + 65536];
    beta1 = A[j + 65536] * y1 + A[-j + 131072] * y0;
    beta2 = A[j + 65536] * y0 - A[-j + 131072] * y1;
    theta += 1;
    A[j] = alpha + beta1;
    A[j + 65536] = alpha - beta1;
    A[-j + 65536] = beta + beta2;
    A[-j + 131072] = beta - beta2;
  }
}
```