user: 请从给定的汇编指令推导出C源代码:

```asm
<makewt>:
  endbr64
  mov    %edi,(%rsi)
  movl   $0x1,0x4(%rsi)
  cmp    $0x2,%edi
  jg     L54
  ret
  nopl   0x0(%rax,%rax,1)
L54:
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  mov    %edi,%ebp
  push   %rbx
  mov    %rdx,%rbx
  sar    %ebp
  sub    $0x10,%rsp
  mov    D15(%rip),%rax
  movq   %rax,%xmm0
  call   <atan@plt>
  pxor   %xmm4,%xmm4
  pxor   %xmm0,%xmm0
  cltd
  cvtsi2sd %ebp,%xmm0
  idiv   %ebp
  cvtsi2sd %eax,%xmm4
  mulsd  %xmm4,%xmm0
  movsd  %xmm4,(%rsp)
  cvttsd2si %xmm0,%edi
  call   <cos@plt>
  mov    D15(%rip),%rax
  movq   %xmm0,%r14
  movsd  %xmm0,0x8(%rbx)
  mov    %rax,(%rbx)
  cmp    $0x3,%ebp
  jg     L44
L57:
  cmp    $0x2,%ebp
  jg     L56
  add    $0x10,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  ret
L44:
  movsd  (%rsp),%xmm4
  movapd %xmm4,%xmm0
  addsd  %xmm4,%xmm0
  cvttsd2si %xmm0,%edi
  call   <cos@plt>
  movsd  D69(%rip),%xmm5
  divsd  %xmm0,%xmm5
  movsd  (%rsp),%xmm0
  mulsd  D43(%rip),%xmm0
  cvttsd2si %xmm0,%edi
  movsd  %xmm5,0x10(%rbx)
  call   <cos@plt>
  movapd %xmm0,%xmm1
  movsd  D69(%rip),%xmm0
  divsd  %xmm1,%xmm0
  movsd  %xmm0,0x18(%rbx)
  cmp    $0x4,%ebp
  jle    L57
  mov    $0x4,%r12d
  nopl   (%rax)
L25:
  pxor   %xmm1,%xmm1
  movsd  (%rsp),%xmm0
  cvtsi2sd %r12d,%xmm1
  mulsd  %xmm1,%xmm0
  movsd  %xmm1,0x8(%rsp)
  cvttsd2si %xmm0,%r13d
  mov    %r13d,%edi
  call   <cos@plt>
  mov    %r13d,%edi
  movsd  %xmm0,(%rbx,%r12,8)
  call   <sin@plt>
  movsd  D67(%rip),%xmm6
  mulsd  (%rsp),%xmm6
  movsd  0x8(%rsp),%xmm1
  movsd  %xmm0,0x8(%rbx,%r12,8)
  movapd %xmm6,%xmm0
  mulsd  %xmm1,%xmm0
  cvttsd2si %xmm0,%r13d
  mov    %r13d,%edi
  call   <cos@plt>
  mov    %r13d,%edi
  movsd  %xmm0,0x10(%rbx,%r12,8)
  call   <sin@plt>
  movsd  %xmm0,0x18(%rbx,%r12,8)
  add    $0x4,%r12
  cmp    %r12d,%ebp
  jg     L25
L56:
  movsd  D69(%rip),%xmm4
  xor    %edx,%edx
  lea    0x20(%rbx),%rdi
  nopl   0x0(%rax,%rax,1)
L40:
  lea    (%rdx,%rbp,1),%esi
  mov    D15(%rip),%r10
  sar    %ebp
  movslq %esi,%r8
  lea    0x0(,%r8,8),%rcx
  lea    (%rbx,%rcx,1),%rax
  mov    %r10,(%rax)
  mov    %r14,0x8(%rbx,%rcx,1)
  cmp    $0x3,%ebp
  jle    L70
  lea    0x4(%rdx),%r9
  movapd %xmm4,%xmm0
  movsd  0x10(%rbx,%r9,8),%xmm1
  divsd  (%rbx,%r9,8),%xmm0
  movsd  %xmm0,0x10(%rbx,%rcx,1)
  movapd %xmm4,%xmm0
  divsd  %xmm1,%xmm0
  movsd  %xmm0,0x18(%rbx,%rcx,1)
  cmp    $0x4,%ebp
  je     L1
  lea    -0x5(%rbp),%ecx
  lea    (%rbx,%rdx,8),%rdx
  shr    $0x2,%ecx
  lea    (%r8,%rcx,4),%rcx
  lea    (%rdi,%rcx,8),%rcx
  nopl   0x0(%rax)
L12:
  movsd  0x40(%rdx),%xmm3
  movsd  0x48(%rdx),%xmm2
  add    $0x20,%rax
  add    $0x40,%rdx
  movsd  0x10(%rdx),%xmm1
  movsd  0x18(%rdx),%xmm0
  movsd  %xmm3,(%rax)
  movsd  %xmm2,0x8(%rax)
  movsd  %xmm1,0x10(%rax)
  movsd  %xmm0,0x18(%rax)
  cmp    %rax,%rcx
  jne    L12
L1:
  movslq %esi,%rdx
  jmp    L40
  nopl   0x0(%rax)
L70:
  je     L1
  add    $0x10,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  ret
```

tool_calls: name: extract_symbolic_data
arguments: data_tag: D15
type: f64
name: extract_symbolic_data
arguments: data_tag: D69
type: f64
name: extract_symbolic_data
arguments: data_tag: D43
type: byte[8]
name: extract_symbolic_data
arguments: data_tag: D67
type: byte[8]

tool: D15: 1

tool: D69: 0.5

tool: {"D43": [0x00,0x00,0x00,0x00,0x00,0x00,0x18,0x40]}

tool: {"D67": [0x00,0x00,0x00,0x00,0x00,0x00,0x08,0x40]}

assistant: ```c
void makewt(int nw, int *ip, double *w) {
  int j, nwh, nw0, nw1;
  double delta, wn4r, wk1r, wk1i, wk3r, wk3i;
  ip[0] = nw;
  ip[1] = 1;
  if (nw > 2) {
    nwh = nw >> 1;
    delta = atan(1.0) / nwh;
    wn4r = cos(delta * nwh);
    w[0] = 1;
    w[1] = wn4r;
    if (nwh >= 4) {
      w[2] = 0.5 / cos(delta * 2);
      w[3] = 0.5 / cos(delta * 6);
    }
    for (j = 4; j < nwh; j += 4) {
      w[j] = cos(delta * j);
      w[j + 1] = sin(delta * j);
      w[j + 2] = cos(3 * delta * j);
      w[j + 3] = sin(3 * delta * j);
    }
    nw0 = 0;
    while (nwh > 2) {
      nw1 = nw0 + nwh;
      nwh >>= 1;
      w[nw1] = 1;
      w[nw1 + 1] = wn4r;
      if (nwh >= 4) {
        wk1r = w[nw0 + 4];
        wk3r = w[nw0 + 6];
        w[nw1 + 2] = 0.5 / wk1r;
        w[nw1 + 3] = 0.5 / wk3r;
      }
      for (j = 4; j < nwh; j += 4) {
        wk1r = w[nw0 + 2 * j];
        wk1i = w[nw0 + 2 * j + 1];
        wk3r = w[nw0 + 2 * j + 2];
        wk3i = w[nw0 + 2 * j + 3];
        w[nw1 + j] = wk1r;
        w[nw1 + j + 1] = wk1i;
        w[nw1 + j + 2] = wk3r;
        w[nw1 + j + 3] = wk3i;
      }
      nw0 = nw1;
    }
  }
}
```