user: 下面的汇编指令对应的C源代码是什么:

```asm
<DFT2048>:
  endbr64
  mov    %rdi,%rcx
  lea    0x2000(%rdi),%rdx
  mov    %rdi,%rax
L134:
  movss  (%rax),%xmm0
  movss  0x4(%rax),%xmm3
  movss  0x8(%rax),%xmm1
  movss  0xc(%rax),%xmm4
  movaps %xmm0,%xmm2
  addss  %xmm3,%xmm2
  subss  %xmm3,%xmm0
  movaps %xmm1,%xmm3
  addss  %xmm4,%xmm3
  subss  %xmm4,%xmm1
  movaps %xmm2,%xmm4
  addss  %xmm3,%xmm4
  movss  %xmm4,(%rax)
  subss  %xmm3,%xmm2
  movss  %xmm2,0x8(%rax)
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,0x4(%rax)
  subss  %xmm1,%xmm0
  movss  %xmm0,0xc(%rax)
  add    $0x10,%rax
  cmp    %rdx,%rax
  jne    L134
  mov    %rcx,%rax
  movss  D9(%rip),%xmm4
L174:
  movss  (%rax),%xmm0
  movss  0x10(%rax),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,(%rax)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x10(%rax)
  movss  0x8(%rax),%xmm0
  movss  0x18(%rax),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,0x8(%rax)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x18(%rax)
  movss  0x4(%rax),%xmm1
  movss  0x14(%rax),%xmm0
  movss  0x1c(%rax),%xmm3
  movaps %xmm0,%xmm2
  addss  %xmm3,%xmm2
  mulss  %xmm4,%xmm2
  subss  %xmm3,%xmm0
  mulss  %xmm4,%xmm0
  movaps %xmm1,%xmm3
  addss  %xmm2,%xmm3
  movss  %xmm3,0x4(%rax)
  subss  %xmm2,%xmm1
  movss  %xmm1,0x14(%rax)
  movss  0xc(%rax),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,0xc(%rax)
  subss  %xmm0,%xmm1
  movss  %xmm1,0x1c(%rax)
  add    $0x20,%rax
  cmp    %rdx,%rax
  jne    L174
  mov    %rcx,%r9
  mov    $0x0,%r10d
  lea    0x1000(%rsi),%r8
  jmp    L96
L2:
  add    $0x10,%r10d
  add    $0x40,%r9
  cmp    $0x800,%r10d
  je     L158
L96:
  movss  (%r9),%xmm0
  movss  0x20(%r9),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,(%r9)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x20(%r9)
  movss  0x10(%r9),%xmm0
  movss  0x30(%r9),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,0x10(%r9)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x30(%r9)
  lea    0xa00(%rsi),%rdi
  mov    %r9,%rdx
  mov    %r9,%rax
L136:
  movss  -0x800(%rdi),%xmm6
  movss  (%rdi),%xmm5
  movss  0x4(%rax),%xmm2
  movss  0x1c(%rdx),%xmm1
  movss  0x24(%rax),%xmm0
  movss  0x3c(%rdx),%xmm4
  movaps %xmm0,%xmm3
  mulss  %xmm5,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm6,%xmm7
  addss  %xmm7,%xmm3
  mulss  %xmm6,%xmm0
  mulss  %xmm5,%xmm4
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  addss  %xmm3,%xmm4
  movss  %xmm4,0x4(%rax)
  subss  %xmm3,%xmm2
  movss  %xmm2,0x24(%rax)
  movaps %xmm1,%xmm2
  addss  %xmm0,%xmm2
  movss  %xmm2,0x1c(%rdx)
  subss  %xmm0,%xmm1
  movss  %xmm1,0x3c(%rdx)
  add    $0x4,%rax
  sub    $0x4,%rdx
  add    $0x200,%rdi
  cmp    %r8,%rdi
  jne    L136
  jmp    L2
L158:
  mov    %rcx,%r9
  mov    $0x0,%r10d
  jmp    L119
L166:
  add    $0x20,%r10d
  sub    $0xffffffffffffff80,%r9
  cmp    $0x800,%r10d
  je     L75
L119:
  movss  (%r9),%xmm0
  movss  0x40(%r9),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,(%r9)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x40(%r9)
  movss  0x20(%r9),%xmm0
  movss  0x60(%r9),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,0x20(%r9)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x60(%r9)
  lea    0x900(%rsi),%rdi
  mov    %r9,%rdx
  mov    %r9,%rax
L199:
  movss  -0x800(%rdi),%xmm6
  movss  (%rdi),%xmm5
  movss  0x4(%rax),%xmm2
  movss  0x3c(%rdx),%xmm1
  movss  0x44(%rax),%xmm0
  movss  0x7c(%rdx),%xmm4
  movaps %xmm0,%xmm3
  mulss  %xmm5,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm6,%xmm7
  addss  %xmm7,%xmm3
  mulss  %xmm6,%xmm0
  mulss  %xmm5,%xmm4
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  addss  %xmm3,%xmm4
  movss  %xmm4,0x4(%rax)
  subss  %xmm3,%xmm2
  movss  %xmm2,0x44(%rax)
  movaps %xmm1,%xmm2
  addss  %xmm0,%xmm2
  movss  %xmm2,0x3c(%rdx)
  subss  %xmm0,%xmm1
  movss  %xmm1,0x7c(%rdx)
  add    $0x4,%rax
  sub    $0x4,%rdx
  add    $0x100,%rdi
  cmp    %r8,%rdi
  jne    L199
  jmp    L166
L75:
  lea    0x40(%rcx),%r8
  mov    $0x0,%r9d
  jmp    L131
L143:
  add    $0x40,%r9d
  add    $0x100,%r8
  cmp    $0x800,%r9d
  je     L179
L131:
  movss  -0x40(%r8),%xmm0
  movss  0x40(%r8),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,-0x40(%r8)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x40(%r8)
  movss  (%r8),%xmm0
  movss  0x80(%r8),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,(%r8)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x80(%r8)
  lea    0x80(%rsi),%rdi
  lea    -0x3c(%r8),%rax
  lea    0x3c(%r8),%rdx
L190:
  movss  (%rdi),%xmm6
  movss  0x800(%rdi),%xmm5
  movss  (%rax),%xmm2
  movss  (%rdx),%xmm1
  movss  0x80(%rax),%xmm0
  movss  0x80(%rdx),%xmm4
  movaps %xmm0,%xmm3
  mulss  %xmm5,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm6,%xmm7
  addss  %xmm7,%xmm3
  mulss  %xmm6,%xmm0
  mulss  %xmm5,%xmm4
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  addss  %xmm3,%xmm4
  movss  %xmm4,(%rax)
  subss  %xmm3,%xmm2
  movss  %xmm2,0x80(%rax)
  movaps %xmm1,%xmm2
  addss  %xmm0,%xmm2
  movss  %xmm2,(%rdx)
  subss  %xmm0,%xmm1
  movss  %xmm1,0x80(%rdx)
  sub    $0xffffffffffffff80,%rdi
  add    $0x4,%rax
  sub    $0x4,%rdx
  cmp    %r8,%rax
  jne    L190
  jmp    L143
L179:
  lea    0x80(%rcx),%r8
  mov    $0x0,%r9d
L89:
  movss  -0x80(%r8),%xmm0
  movss  0x80(%r8),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,-0x80(%r8)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x80(%r8)
  movss  (%r8),%xmm0
  movss  0x100(%r8),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,(%r8)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x100(%r8)
  lea    0x40(%rsi),%rdi
  lea    -0x7c(%r8),%rax
  lea    0x7c(%r8),%rdx
L144:
  movss  (%rdi),%xmm6
  movss  0x800(%rdi),%xmm5
  movss  (%rax),%xmm2
  movss  (%rdx),%xmm1
  movss  0x100(%rax),%xmm0
  movss  0x100(%rdx),%xmm4
  movaps %xmm0,%xmm3
  mulss  %xmm5,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm6,%xmm7
  addss  %xmm7,%xmm3
  mulss  %xmm6,%xmm0
  mulss  %xmm5,%xmm4
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  addss  %xmm3,%xmm4
  movss  %xmm4,(%rax)
  subss  %xmm3,%xmm2
  movss  %xmm2,0x100(%rax)
  movaps %xmm1,%xmm2
  addss  %xmm0,%xmm2
  movss  %xmm2,(%rdx)
  subss  %xmm0,%xmm1
  movss  %xmm1,0x100(%rdx)
  add    $0x40,%rdi
  add    $0x4,%rax
  sub    $0x4,%rdx
  cmp    %r8,%rax
  jne    L144
  sub    $0xffffff80,%r9d
  add    $0x200,%r8
  cmp    $0x800,%r9d
  jne    L89
  lea    0x100(%rcx),%r8
  mov    $0x0,%r9d
L141:
  movss  -0x100(%r8),%xmm0
  movss  0x100(%r8),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,-0x100(%r8)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x100(%r8)
  movss  (%r8),%xmm0
  movss  0x200(%r8),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,(%r8)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x200(%r8)
  lea    0x20(%rsi),%rdi
  lea    -0xfc(%r8),%rax
  lea    0xfc(%r8),%rdx
L30:
  movss  (%rdi),%xmm6
  movss  0x800(%rdi),%xmm5
  movss  (%rax),%xmm2
  movss  (%rdx),%xmm1
  movss  0x200(%rax),%xmm0
  movss  0x200(%rdx),%xmm4
  movaps %xmm0,%xmm3
  mulss  %xmm5,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm6,%xmm7
  addss  %xmm7,%xmm3
  mulss  %xmm6,%xmm0
  mulss  %xmm5,%xmm4
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  addss  %xmm3,%xmm4
  movss  %xmm4,(%rax)
  subss  %xmm3,%xmm2
  movss  %xmm2,0x200(%rax)
  movaps %xmm1,%xmm2
  addss  %xmm0,%xmm2
  movss  %xmm2,(%rdx)
  subss  %xmm0,%xmm1
  movss  %xmm1,0x200(%rdx)
  add    $0x20,%rdi
  add    $0x4,%rax
  sub    $0x4,%rdx
  cmp    %r8,%rax
  jne    L30
  add    $0x100,%r9d
  add    $0x400,%r8
  cmp    $0x800,%r9d
  jne    L141
  lea    0x200(%rcx),%r8
  mov    $0x0,%r9d
L12:
  movss  -0x200(%r8),%xmm0
  movss  0x200(%r8),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,-0x200(%r8)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x200(%r8)
  movss  (%r8),%xmm0
  movss  0x400(%r8),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,(%r8)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x400(%r8)
  lea    0x10(%rsi),%rdi
  lea    -0x1fc(%r8),%rax
  lea    0x1fc(%r8),%rdx
L148:
  movss  (%rdi),%xmm6
  movss  0x800(%rdi),%xmm5
  movss  (%rax),%xmm2
  movss  (%rdx),%xmm1
  movss  0x400(%rax),%xmm0
  movss  0x400(%rdx),%xmm4
  movaps %xmm0,%xmm3
  mulss  %xmm5,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm6,%xmm7
  addss  %xmm7,%xmm3
  mulss  %xmm6,%xmm0
  mulss  %xmm5,%xmm4
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  addss  %xmm3,%xmm4
  movss  %xmm4,(%rax)
  subss  %xmm3,%xmm2
  movss  %xmm2,0x400(%rax)
  movaps %xmm1,%xmm2
  addss  %xmm0,%xmm2
  movss  %xmm2,(%rdx)
  subss  %xmm0,%xmm1
  movss  %xmm1,0x400(%rdx)
  add    $0x10,%rdi
  add    $0x4,%rax
  sub    $0x4,%rdx
  cmp    %r8,%rax
  jne    L148
  add    $0x200,%r9d
  add    $0x800,%r8
  cmp    $0x800,%r9d
  jne    L12
  lea    0x400(%rcx),%r8
  mov    $0x0,%r9d
L60:
  movss  -0x400(%r8),%xmm0
  movss  0x400(%r8),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,-0x400(%r8)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x400(%r8)
  movss  (%r8),%xmm0
  movss  0x800(%r8),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,(%r8)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x800(%r8)
  lea    0x8(%rsi),%rdi
  lea    -0x3fc(%r8),%rax
  lea    0x3fc(%r8),%rdx
L53:
  movss  (%rdi),%xmm6
  movss  0x800(%rdi),%xmm5
  movss  (%rax),%xmm2
  movss  (%rdx),%xmm1
  movss  0x800(%rax),%xmm0
  movss  0x800(%rdx),%xmm4
  movaps %xmm0,%xmm3
  mulss  %xmm5,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm6,%xmm7
  addss  %xmm7,%xmm3
  mulss  %xmm6,%xmm0
  mulss  %xmm5,%xmm4
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  addss  %xmm3,%xmm4
  movss  %xmm4,(%rax)
  subss  %xmm3,%xmm2
  movss  %xmm2,0x800(%rax)
  movaps %xmm1,%xmm2
  addss  %xmm0,%xmm2
  movss  %xmm2,(%rdx)
  subss  %xmm0,%xmm1
  movss  %xmm1,0x800(%rdx)
  add    $0x8,%rdi
  add    $0x4,%rax
  sub    $0x4,%rdx
  cmp    %r8,%rax
  jne    L53
  add    $0x400,%r9d
  add    $0x1000,%r8
  cmp    $0x800,%r9d
  jne    L60
  movss  (%rcx),%xmm0
  movss  0x1000(%rcx),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,(%rcx)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x1000(%rcx)
  movss  0x800(%rcx),%xmm0
  movss  0x1800(%rcx),%xmm1
  movaps %xmm0,%xmm2
  addss  %xmm1,%xmm2
  movss  %xmm2,0x800(%rcx)
  subss  %xmm1,%xmm0
  movss  %xmm0,0x1800(%rcx)
  lea    0xffc(%rcx),%rax
  add    $0x804,%rsi
  lea    0x1004(%rcx),%rdx
  add    $0x800,%rcx
L47:
  movss  -0x800(%rsi),%xmm6
  movss  (%rsi),%xmm5
  movss  -0x1000(%rdx),%xmm2
  movss  (%rax),%xmm1
  movss  (%rdx),%xmm0
  movss  0x1000(%rax),%xmm4
  movaps %xmm0,%xmm3
  mulss  %xmm5,%xmm3
  movaps %xmm4,%xmm7
  mulss  %xmm6,%xmm7
  addss  %xmm7,%xmm3
  mulss  %xmm6,%xmm0
  mulss  %xmm5,%xmm4
  subss  %xmm4,%xmm0
  movaps %xmm2,%xmm4
  addss  %xmm3,%xmm4
  movss  %xmm4,-0x1000(%rdx)
  subss  %xmm3,%xmm2
  movss  %xmm2,(%rdx)
  movaps %xmm1,%xmm2
  addss  %xmm0,%xmm2
  movss  %xmm2,(%rax)
  subss  %xmm0,%xmm1
  movss  %xmm1,0x1000(%rax)
  sub    $0x4,%rax
  add    $0x4,%rsi
  add    $0x4,%rdx
  cmp    %rcx,%rax
  jne    L47
  ret
```

tool_calls: name: disassemble_data
arguments: tag: D9
type_infered: byte[4]

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

assistant: ```c
void DFT2048(float *A, const float *sinTab) {
  int i, j, theta;
  float alpha, beta, beta1, beta2, y0, y1, y2, y3;
  for (i = 0; i < 2048; 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 < 2048; 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 < 2048; i += 16) {
    theta = 128;
    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 + 512];
      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 += 128;
      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 < 2048; i += 32) {
    theta = 64;
    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 + 512];
      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 += 64;
      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 < 2048; i += 64) {
    theta = 32;
    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 + 512];
      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 += 32;
      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 < 2048; i += 128) {
    theta = 16;
    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 + 512];
      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 += 16;
      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 < 2048; i += 256) {
    theta = 8;
    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 + 512];
      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 += 8;
      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 < 2048; i += 512) {
    theta = 4;
    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 + 512];
      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 += 4;
      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 < 2048; i += 1024) {
    theta = 2;
    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 + 512];
      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 += 2;
      A[i + j] = alpha + beta1;
      A[i + j + 512] = alpha - beta1;
      A[i - j + 512] = beta + beta2;
      A[i - j + 1024] = beta - beta2;
    }
  }
  theta = 1;
  alpha = A[0];
  beta = A[1024];
  A[0] = alpha + beta;
  A[1024] = alpha - beta;
  alpha = A[512];
  beta = A[1536];
  A[512] = alpha + beta;
  A[1536] = alpha - beta;
  for (j = 1; j < 512; j++) {
    y0 = sinTab[theta];
    y1 = sinTab[theta + 512];
    alpha = A[j];
    beta = A[-j + 1024];
    beta1 = A[j + 1024] * y1 + A[-j + 2048] * y0;
    beta2 = A[j + 1024] * y0 - A[-j + 2048] * y1;
    theta += 1;
    A[j] = alpha + beta1;
    A[j + 1024] = alpha - beta1;
    A[-j + 1024] = beta + beta2;
    A[-j + 2048] = beta - beta2;
  }
}
```