user: 请将这段汇编代码片段转换成等效的C代码：

```asm
<passf3>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  mov    %edi,-0x24(%rsp)
  mov    %esi,%r15d
  mov    %rdx,%rbx
  mov    %rcx,%r13
  cmp    $0x2,%edi
  je     L20
  test   %esi,%esi
  jle    L65
  mov    %edi,%eax
  imul   %esi,%eax
  lea    (%rax,%rax,1),%edx
  add    $0x1,%r15d
  movslq %edi,%rsi
  mov    %rsi,-0x20(%rsp)
  mov    %rsi,%rcx
  neg    %rcx
  lea    0x0(,%rcx,8),%rsi
  mov    %rsi,-0x18(%rsp)
  mov    $0x0,%r12d
  mov    $0x1,%r14d
  lea    -0x1(%rdi),%ebp
  movsd  D24(%rip),%xmm8
  cltq
  mov    %rax,-0x10(%rsp)
  movslq %edx,%rax
  mov    %rax,-0x8(%rsp)
  movsd  D11(%rip),%xmm7
  jmp    L26
L20:
  test   %esi,%esi
  jle    L65
  pxor   %xmm4,%xmm4
  cvtsi2sdl 0x38(%rsp),%xmm4
  mulsd  D24(%rip),%xmm4
  lea    (%rsi,%rsi,1),%ecx
  lea    0x0(,%rsi,4),%edx
  mov    %r13,%rax
  lea    -0x1(%rsi),%esi
  shl    $0x4,%rsi
  lea    0x10(%r13,%rsi,1),%rsi
  movsd  D11(%rip),%xmm5
  movslq %ecx,%rcx
  movslq %edx,%rdx
L58:
  movsd  0x10(%rbx),%xmm1
  addsd  0x20(%rbx),%xmm1
  movsd  (%rbx),%xmm0
  movapd %xmm1,%xmm2
  mulsd  %xmm5,%xmm2
  addsd  %xmm0,%xmm2
  addsd  %xmm1,%xmm0
  movsd  %xmm0,(%rax)
  movsd  0x18(%rbx),%xmm3
  addsd  0x28(%rbx),%xmm3
  movsd  0x8(%rbx),%xmm1
  movapd %xmm3,%xmm0
  mulsd  %xmm5,%xmm0
  addsd  %xmm1,%xmm0
  addsd  %xmm3,%xmm1
  movsd  %xmm1,0x8(%rax)
  movsd  0x10(%rbx),%xmm1
  subsd  0x20(%rbx),%xmm1
  mulsd  %xmm4,%xmm1
  movsd  0x18(%rbx),%xmm3
  subsd  0x28(%rbx),%xmm3
  mulsd  %xmm4,%xmm3
  movapd %xmm2,%xmm6
  subsd  %xmm3,%xmm6
  movsd  %xmm6,(%rax,%rcx,8)
  addsd  %xmm3,%xmm2
  movsd  %xmm2,(%rax,%rdx,8)
  movapd %xmm0,%xmm2
  addsd  %xmm1,%xmm2
  movsd  %xmm2,0x8(%rax,%rcx,8)
  subsd  %xmm1,%xmm0
  movsd  %xmm0,0x8(%rax,%rdx,8)
  add    $0x30,%rbx
  add    $0x10,%rax
  cmp    %rsi,%rax
  jne    L58
L65:
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L75:
  pxor   %xmm5,%xmm5
  cvtsi2sdl 0x38(%rsp),%xmm5
  movapd %xmm5,%xmm6
  mulsd  %xmm8,%xmm6
  lea    (%r12,%r12,2),%eax
  add    -0x24(%rsp),%eax
  cltq
  lea    0x0(,%rax,8),%rsi
  lea    (%rbx,%rsi,1),%rcx
  add    -0x20(%rsp),%rax
  lea    (%rbx,%rax,8),%rdx
  add    -0x18(%rsp),%rsi
  add    %rbx,%rsi
  movslq %r12d,%rax
  lea    0x0(%r13,%rax,8),%r11
  mov    -0x10(%rsp),%rdi
  add    %rax,%rdi
  lea    0x0(%r13,%rdi,8),%r10
  add    -0x8(%rsp),%rax
  lea    0x0(%r13,%rax,8),%rdi
  mov    $0x0,%eax
L80:
  movsd  (%rcx),%xmm2
  addsd  (%rdx),%xmm2
  movsd  (%rsi,%rax,8),%xmm1
  movapd %xmm2,%xmm0
  mulsd  %xmm7,%xmm0
  addsd  %xmm1,%xmm0
  addsd  %xmm2,%xmm1
  movsd  %xmm1,(%r11,%rax,8)
  movsd  0x8(%rcx),%xmm3
  addsd  0x8(%rdx),%xmm3
  movsd  0x8(%rsi,%rax,8),%xmm2
  movapd %xmm3,%xmm1
  mulsd  %xmm7,%xmm1
  addsd  %xmm2,%xmm1
  addsd  %xmm3,%xmm2
  movsd  %xmm2,0x8(%r11,%rax,8)
  movsd  (%rcx),%xmm3
  subsd  (%rdx),%xmm3
  mulsd  %xmm6,%xmm3
  movsd  0x8(%rcx),%xmm4
  subsd  0x8(%rdx),%xmm4
  mulsd  %xmm6,%xmm4
  movapd %xmm0,%xmm2
  subsd  %xmm4,%xmm2
  addsd  %xmm4,%xmm0
  movapd %xmm1,%xmm4
  addsd  %xmm3,%xmm4
  subsd  %xmm3,%xmm1
  movapd %xmm5,%xmm3
  mulsd  0x8(%r8,%rax,8),%xmm3
  mulsd  %xmm2,%xmm3
  movapd %xmm4,%xmm9
  mulsd  (%r8,%rax,8),%xmm9
  addsd  %xmm9,%xmm3
  movsd  %xmm3,0x8(%r10,%rax,8)
  mulsd  (%r8,%rax,8),%xmm2
  movapd %xmm5,%xmm3
  mulsd  0x8(%r8,%rax,8),%xmm3
  mulsd  %xmm4,%xmm3
  subsd  %xmm3,%xmm2
  movsd  %xmm2,(%r10,%rax,8)
  movapd %xmm5,%xmm2
  mulsd  0x8(%r9,%rax,8),%xmm2
  mulsd  %xmm0,%xmm2
  movapd %xmm1,%xmm3
  mulsd  (%r9,%rax,8),%xmm3
  addsd  %xmm3,%xmm2
  movsd  %xmm2,0x8(%rdi,%rax,8)
  mulsd  (%r9,%rax,8),%xmm0
  movapd %xmm5,%xmm2
  mulsd  0x8(%r9,%rax,8),%xmm2
  mulsd  %xmm2,%xmm1
  subsd  %xmm1,%xmm0
  movsd  %xmm0,(%rdi,%rax,8)
  add    $0x2,%rax
  add    $0x10,%rcx
  add    $0x10,%rdx
  cmp    %eax,%ebp
  jg     L80
L16:
  add    $0x1,%r14d
  add    -0x24(%rsp),%r12d
  cmp    %r15d,%r14d
  je     L65
L26:
  test   %ebp,%ebp
  jg     L75
  jmp    L16
```

tool_calls: name: parse_data
arguments: data_label: D24
data_type: f64
name: parse_data
arguments: data_label: D11
data_type: byte[8]

tool: D24: 0.866025403784439

tool: {"D11": [0x00,0x00,0x00,0x00,0x00,0x00,0xe0,0xbf]}

assistant: ```c
void passf3(int ido, int l1, const double cc[], double ch[], const double wa1[], const double wa2[], int isign) {
  static const double taur = -0.5;
  static const double taui = 0.866025403784439;
  int i, k, ac, ah;
  double ci2, ci3, di2, di3, cr2, cr3, dr2, dr3, ti2, tr2;
  if (ido == 2) {
    for (k = 1; k <= l1; k++) {
      ac = (3 * k - 2) * ido;
      tr2 = cc[ac] + cc[ac + ido];
      cr2 = cc[ac - ido] + taur * tr2;
      ah = (k - 1) * ido;
      ch[ah] = cc[ac - ido] + tr2;
      ti2 = cc[ac + 1] + cc[ac + ido + 1];
      ci2 = cc[ac - ido + 1] + taur * ti2;
      ch[ah + 1] = cc[ac - ido + 1] + ti2;
      cr3 = isign * taui * (cc[ac] - cc[ac + ido]);
      ci3 = isign * taui * (cc[ac + 1] - cc[ac + ido + 1]);
      ch[ah + l1 * ido] = cr2 - ci3;
      ch[ah + 2 * l1 * ido] = cr2 + ci3;
      ch[ah + l1 * ido + 1] = ci2 + cr3;
      ch[ah + 2 * l1 * ido + 1] = ci2 - cr3;
    }
  } else {
    for (k = 1; k <= l1; k++) {
      for (i = 0; i < ido - 1; i += 2) {
        ac = i + (3 * k - 2) * ido;
        tr2 = cc[ac] + cc[ac + ido];
        cr2 = cc[ac - ido] + taur * tr2;
        ah = i + (k - 1) * ido;
        ch[ah] = cc[ac - ido] + tr2;
        ti2 = cc[ac + 1] + cc[ac + ido + 1];
        ci2 = cc[ac - ido + 1] + taur * ti2;
        ch[ah + 1] = cc[ac - ido + 1] + ti2;
        cr3 = isign * taui * (cc[ac] - cc[ac + ido]);
        ci3 = isign * taui * (cc[ac + 1] - cc[ac + ido + 1]);
        dr2 = cr2 - ci3;
        dr3 = cr2 + ci3;
        di2 = ci2 + cr3;
        di3 = ci2 - cr3;
        ch[ah + l1 * ido + 1] = wa1[i] * di2 + isign * wa1[i + 1] * dr2;
        ch[ah + l1 * ido] = wa1[i] * dr2 - isign * wa1[i + 1] * di2;
        ch[ah + 2 * l1 * ido + 1] = wa2[i] * di3 + isign * wa2[i + 1] * dr3;
        ch[ah + 2 * l1 * ido] = wa2[i] * dr3 - isign * wa2[i + 1] * di3;
      }
    }
  }
}
```