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

```asm
<passf>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x10,%rsp
  mov    %rdi,-0x8(%rsp)
  mov    %esi,%ebx
  mov    %esi,-0x5c(%rsp)
  mov    %edx,%edi
  mov    %edx,-0x40(%rsp)
  mov    %ecx,%esi
  mov    %r8d,(%rsp)
  mov    %r9,-0x48(%rsp)
  mov    0x58(%rsp),%rbp
  mov    0x60(%rsp),%r14
  mov    0x68(%rsp),%r15
  mov    %ebx,%eax
  shr    $0x1f,%eax
  add    %ebx,%eax
  sar    %eax
  mov    %eax,0xc(%rsp)
  lea    0x1(%rdx),%edx
  mov    %edx,%eax
  shr    $0x1f,%eax
  add    %edx,%eax
  sar    %eax
  mov    %eax,-0x78(%rsp)
  mov    %ebx,%eax
  imul   %edi,%ebx
  mov    %ebx,0x4(%rsp)
  cmp    %ecx,%eax
  jge    L623
  cmp    $0x2,%edi
  jle    L415
  mov    -0x40(%rsp),%edi
  lea    -0x1(%rdi),%eax
  imul   %eax,%ecx
  mov    -0x5c(%rsp),%ebx
  mov    %ebx,%r12d
  imul   %ebx,%eax
  mov    %eax,%edx
  imul   %esi,%r12d
  mov    %r12d,%eax
  mov    %r12d,-0x58(%rsp)
  mov    %ebx,%r12d
  imul   %ebx,%edi
  movslq %edi,%r8
  shl    $0x3,%r8
  movslq %ebx,%r10
  shl    $0x3,%r10
  mov    %ebx,-0x60(%rsp)
  mov    %eax,-0x68(%rsp)
  mov    %esi,-0x6c(%rsp)
  movl   $0x1,-0x70(%rsp)
  mov    %rbp,0x58(%rsp)
  mov    %r14,0x60(%rsp)
  mov    %ecx,%r14d
  mov    %r15,0x68(%rsp)
  mov    %edx,%r15d
  jmp    L75
L623:
  mov    -0x40(%rsp),%ecx
  cmp    $0x2,%ecx
  jle    L365
  mov    -0x5c(%rsp),%edi
  mov    %edi,%ebx
  imul   %esi,%ebx
  mov    %ebx,-0x3c(%rsp)
  mov    %edi,%eax
  add    %eax,%eax
  neg    %eax
  mov    %eax,-0x10(%rsp)
  lea    -0x2(%rcx),%eax
  mov    %eax,%r13d
  imul   %edi,%r13d
  lea    (%rsi,%rsi,1),%eax
  neg    %eax
  mov    %eax,%edx
  mov    %edi,%eax
  imul   %edi,%edx
  mov    %edx,-0x38(%rsp)
  mov    %esi,%edi
  imul   %r13d,%edi
  mov    %edi,-0x6c(%rsp)
  mov    %eax,%edi
  imul   %ecx,%edi
  mov    %edi,-0x70(%rsp)
  mov    %ebx,-0x50(%rsp)
  mov    %eax,-0x58(%rsp)
  movl   $0x1,-0x60(%rsp)
  lea    -0x1(%rax),%ebx
  mov    %rbx,-0x68(%rsp)
  mov    -0x48(%rsp),%rbx
  lea    0x8(%rbx),%r12
  mov    %r14,0x60(%rsp)
  mov    %eax,%r14d
  mov    %r15,0x68(%rsp)
  mov    %rbx,%r15
  jmp    L84
L398:
  lea    (%r10,%r13,1),%ecx
  movslq %r10d,%rdi
  lea    (%r15,%rdi,8),%rax
  mov    -0x6c(%rsp),%edx
  lea    (%r11,%rdx,1),%r9d
  movslq %r9d,%r9
  lea    0x0(%rbp,%r9,8),%rdx
  mov    -0x68(%rsp),%r8
  add    %rdi,%r8
  lea    (%r12,%r8,8),%r8
  movslq %ecx,%rcx
  sub    %rdi,%rcx
  movslq %r11d,%rdi
  sub    %r9,%rdi
L98:
  movsd  (%rax),%xmm0
  addsd  (%rax,%rcx,8),%xmm0
  movsd  %xmm0,(%rdx,%rdi,8)
  movsd  (%rax),%xmm0
  subsd  (%rax,%rcx,8),%xmm0
  movsd  %xmm0,(%rdx)
  add    $0x8,%rax
  add    $0x8,%rdx
  cmp    %r8,%rax
  jne    L98
L278:
  add    $0x1,%ebx
  add    -0x70(%rsp),%r10d
  add    %r14d,%r11d
  cmp    %ebx,%esi
  je     L232
L362:
  test   %r14d,%r14d
  jg     L398
  jmp    L278
L232:
  addl   $0x1,-0x60(%rsp)
  mov    -0x60(%rsp),%eax
  add    %r14d,-0x58(%rsp)
  mov    -0x3c(%rsp),%edi
  add    %edi,-0x50(%rsp)
  add    -0x10(%rsp),%r13d
  mov    -0x38(%rsp),%edi
  add    %edi,-0x6c(%rsp)
  cmp    %eax,-0x78(%rsp)
  jle    L517
L84:
  mov    -0x50(%rsp),%r11d
  mov    -0x58(%rsp),%r10d
  mov    $0x0,%ebx
  test   %esi,%esi
  jg     L362
  jmp    L232
L365:
  test   %esi,%esi
  jg     L634
  mov    $0x2,%eax
  sub    -0x5c(%rsp),%eax
  mov    %eax,-0xc(%rsp)
  jmp    L612
L632:
  movslq %r11d,%rax
  lea    0x0(%r13,%rax,8),%rdi
  movslq %r10d,%rax
  lea    0x0(%rbp,%rax,8),%rcx
  mov    $0x0,%eax
L759:
  movsd  (%rdi,%rax,8),%xmm0
  movsd  %xmm0,(%rcx,%rax,8)
  mov    %rax,%rdx
  add    $0x1,%rax
  cmp    %r8,%rdx
  jne    L759
L512:
  add    $0x1,%r9d
  add    %ebx,%r11d
  add    %r12d,%r10d
  cmp    %r9d,%esi
  jle    L463
L433:
  test   %r12d,%r12d
  jg     L632
  jmp    L512
L17:
  lea    (%r11,%r13,1),%rcx
  mov    %rbp,%rdx
  mov    %r11,%rax
  mov    $0x0,%edi
L100:
  movsd  (%rcx),%xmm0
  addsd  (%rax),%xmm0
  movsd  %xmm0,(%rdx)
  movsd  (%rcx),%xmm0
  subsd  (%rax),%xmm0
  movsd  %xmm0,(%rdx,%r9,8)
  add    $0x1,%edi
  add    %r8,%rcx
  add    %r8,%rax
  add    %r10,%rdx
  cmp    %edi,%esi
  jne    L100
L200:
  add    $0x1,%ebx
  add    $0x8,%r11
  add    $0x8,%rbp
  cmp    %ebx,%r12d
  je     L536
L64:
  test   %esi,%esi
  jg     L17
  jmp    L200
L536:
  addl   $0x1,-0x70(%rsp)
  mov    -0x70(%rsp),%eax
  add    %esi,-0x6c(%rsp)
  sub    %esi,%r14d
  sub    %r12d,%r15d
  mov    -0x58(%rsp),%edi
  add    %edi,-0x68(%rsp)
  add    %r12d,-0x60(%rsp)
  cmp    %eax,-0x78(%rsp)
  jle    L54
L75:
  test   %r12d,%r12d
  jle    L536
  movslq %r15d,%rax
  mov    -0x48(%rsp),%rbx
  lea    (%rbx,%rax,8),%r11
  movslq -0x68(%rsp),%rdx
  mov    0x58(%rsp),%rbx
  lea    (%rbx,%rdx,8),%rbp
  movslq -0x60(%rsp),%r13
  sub    %rax,%r13
  shl    $0x3,%r13
  mov    %r14d,%r9d
  imul   %r12d,%r9d
  movslq %r9d,%r9
  mov    -0x6c(%rsp),%eax
  imul   %r12d,%eax
  cltq
  sub    %rax,%r9
  mov    $0x0,%ebx
  jmp    L64
L349:
  movsd  (%rdx),%xmm0
  movsd  %xmm0,(%rcx)
  add    $0x1,%eax
  add    %r10,%rdx
  add    %r11,%rcx
  cmp    %eax,%esi
  jne    L349
L647:
  add    $0x1,%edi
  add    $0x8,%r9
  add    $0x8,%r8
  cmp    %edi,%ebx
  je     L463
L427:
  mov    %r8,%rcx
  mov    %r9,%rdx
  mov    $0x0,%eax
  test   %esi,%esi
  jg     L349
  jmp    L647
L463:
  mov    $0x2,%eax
  sub    -0x5c(%rsp),%eax
  mov    %eax,-0xc(%rsp)
  cmpl   $0x2,-0x40(%rsp)
  jle    L612
L590:
  mov    -0x40(%rsp),%ecx
  lea    -0x1(%rcx),%eax
  mov    %eax,%ebx
  mov    (%rsp),%r9d
  imul   %r9d,%ebx
  mov    %ebx,0x8(%rsp)
  mov    -0x5c(%rsp),%edi
  movslq %edi,%rdx
  lea    0x0(,%rdx,8),%rax
  mov    %rax,-0x50(%rsp)
  mov    -0xc(%rsp),%r11d
  movslq %r11d,%rax
  add    %rdx,%rax
  lea    -0x8(%r15,%rax,8),%r13
  movslq %r9d,%rax
  lea    (%r14,%rax,8),%rax
  mov    %rax,-0x38(%rsp)
  movslq %ebx,%rax
  lea    (%r14,%rax,8),%rax
  mov    %rax,-0x30(%rsp)
  lea    (%r9,%r9,1),%eax
  mov    %eax,-0x3c(%rsp)
  lea    -0x2(%rcx),%eax
  imul   %r9d,%eax
  mov    %eax,-0x10(%rsp)
  mov    %ebx,-0x60(%rsp)
  mov    %r9d,-0x68(%rsp)
  movl   $0x0,-0x70(%rsp)
  movl   $0x1,-0x6c(%rsp)
  add    %r11d,%edi
  mov    %edi,-0x48(%rsp)
  mov    %r9d,%eax
  mov    %rax,-0x28(%rsp)
  lea    -0x1(%r9),%eax
  mov    %rax,-0x20(%rsp)
  mov    0x50(%rsp),%rax
  add    $0x8,%rax
  mov    %rax,-0x18(%rsp)
  mov    0x4(%rsp),%r12d
  mov    %esi,0x4(%rsp)
  mov    %rbp,0x58(%rsp)
L479:
  mov    -0x48(%rsp),%r8d
  add    -0x70(%rsp),%r8d
  test   %r9d,%r9d
  jle    L704
  movslq -0x68(%rsp),%rax
  mov    0x50(%rsp),%rbx
  lea    (%rbx,%rax,8),%rcx
  movslq -0x60(%rsp),%rax
  lea    (%rbx,%rax,8),%rdx
  mov    $0x0,%eax
  pxor   %xmm1,%xmm1
  cvtsi2sdl 0x70(%rsp),%xmm1
  mov    -0x38(%rsp),%rsi
  mov    -0x30(%rsp),%rdi
  mov    -0x28(%rsp),%r10
L266:
  movsd  -0x8(%r13),%xmm0
  mulsd  (%rsi,%rax,8),%xmm0
  addsd  (%r14,%rax,8),%xmm0
  movsd  %xmm0,(%rcx,%rax,8)
  movapd %xmm1,%xmm0
  mulsd  0x0(%r13),%xmm0
  mulsd  (%rdi,%rax,8),%xmm0
  movsd  %xmm0,(%rdx,%rax,8)
  add    $0x1,%rax
  cmp    %r10,%rax
  jne    L266
L704:
  mov    -0x5c(%rsp),%ebx
  add    %ebx,-0x70(%rsp)
  cmpl   $0x4,-0x40(%rsp)
  jle    L125
  movslq -0x68(%rsp),%rax
  mov    0x50(%rsp),%rbx
  lea    (%rbx,%rax,8),%rsi
  mov    -0x20(%rsp),%rbx
  lea    (%rbx,%rax,1),%rdx
  mov    -0x18(%rsp),%rbx
  lea    (%rbx,%rdx,8),%rdi
  mov    -0x10(%rsp),%ebx
  mov    -0x3c(%rsp),%r11d
  mov    $0x2,%r10d
  movslq -0x60(%rsp),%rcx
  sub    %rax,%rcx
  mov    %r13,-0x58(%rsp)
  mov    %rsi,%r13
L757:
  add    -0x70(%rsp),%r8d
  mov    %r8d,%eax
  sub    %r12d,%eax
  cmp    %r8d,%r12d
  cmovl  %eax,%r8d
  movslq %r8d,%rax
  shl    $0x3,%rax
  movsd  -0x10(%r15,%rax,1),%xmm2
  movsd  -0x8(%r15,%rax,1),%xmm0
  test   %r9d,%r9d
  jle    L413
  pxor   %xmm1,%xmm1
  cvtsi2sdl 0x70(%rsp),%xmm1
  mulsd  %xmm0,%xmm1
  movslq %ebx,%rbp
  lea    (%r14,%rbp,8),%rdx
  mov    %r13,%rax
  movslq %r11d,%rsi
  sub    %rbp,%rsi
L185:
  movapd %xmm2,%xmm0
  mulsd  (%rdx,%rsi,8),%xmm0
  addsd  (%rax),%xmm0
  movsd  %xmm0,(%rax)
  movapd %xmm1,%xmm0
  mulsd  (%rdx),%xmm0
  addsd  (%rax,%rcx,8),%xmm0
  movsd  %xmm0,(%rax,%rcx,8)
  add    $0x8,%rax
  add    $0x8,%rdx
  cmp    %rdi,%rax
  jne    L185
L413:
  add    $0x1,%r10d
  add    %r9d,%r11d
  sub    %r9d,%ebx
  cmp    %r10d,-0x78(%rsp)
  jg     L757
  mov    -0x58(%rsp),%r13
L125:
  addl   $0x1,-0x6c(%rsp)
  mov    -0x6c(%rsp),%eax
  add    %r9d,-0x68(%rsp)
  sub    %r9d,-0x60(%rsp)
  add    -0x50(%rsp),%r13
  cmp    %eax,-0x78(%rsp)
  jg     L479
  mov    0x4(%rsp),%esi
  mov    0x58(%rsp),%rbp
  mov    (%rsp),%r9d
  lea    -0x1(%r9),%eax
  lea    0x8(%r14,%rax,8),%rcx
  mov    %r9d,%r8d
  mov    $0x1,%edi
  mov    -0x78(%rsp),%r10d
  jmp    L304
L622:
  movsd  (%rax),%xmm0
  addsd  (%rax,%rdx,8),%xmm0
  movsd  %xmm0,(%rax)
  add    $0x8,%rax
  cmp    %rcx,%rax
  jne    L622
L34:
  add    $0x1,%edi
  add    %r9d,%r8d
  cmp    %edi,%r10d
  jle    L342
L304:
  mov    %r14,%rax
  movslq %r8d,%rdx
  test   %r9d,%r9d
  jg     L622
  jmp    L34
L342:
  mov    (%rsp),%r9d
  lea    -0x2(%r9),%eax
  shr    %eax
  mov    %eax,%eax
  lea    (%rax,%rax,1),%r12
  mov    %r9d,%r11d
  mov    $0x1,%r10d
  lea    0x10(%r14),%rbx
  mov    %esi,-0x70(%rsp)
  mov    0x50(%rsp),%r13
  mov    %rbp,0x58(%rsp)
  mov    0x8(%rsp),%ebp
  mov    %r15,0x68(%rsp)
  mov    -0x78(%rsp),%r15d
L320:
  cmp    $0x1,%r9d
  jle    L244
  movslq %r11d,%r8
  lea    0x0(,%r8,8),%rax
  lea    0x0(%r13,%rax,1),%rcx
  movslq %ebp,%rsi
  lea    0x0(%r13,%rsi,8),%rdx
  add    %r14,%rax
  lea    (%r8,%r12,1),%rdi
  lea    (%rbx,%rdi,8),%rdi
  sub    %r8,%rsi
L88:
  movsd  (%rcx),%xmm0
  subsd  0x8(%rdx),%xmm0
  movsd  %xmm0,(%rax)
  movsd  (%rcx),%xmm0
  addsd  0x8(%rdx),%xmm0
  movsd  %xmm0,(%rax,%rsi,8)
  movsd  0x8(%rcx),%xmm0
  addsd  (%rdx),%xmm0
  movsd  %xmm0,0x8(%rax)
  movsd  0x8(%rcx),%xmm0
  subsd  (%rdx),%xmm0
  movsd  %xmm0,0x8(%rax,%rsi,8)
  add    $0x10,%rcx
  add    $0x10,%rdx
  add    $0x10,%rax
  cmp    %rdi,%rax
  jne    L88
L244:
  add    $0x1,%r10d
  add    %r9d,%r11d
  sub    %r9d,%ebp
  cmp    %r10d,%r15d
  jg     L320
  mov    -0x70(%rsp),%esi
  mov    0x58(%rsp),%rbp
  mov    0x68(%rsp),%r15
L612:
  cmpl   $0x2,-0x5c(%rsp)
  je     L513
  mov    -0x8(%rsp),%rax
  movl   $0x0,(%rax)
  mov    (%rsp),%eax
  test   %eax,%eax
  jle    L311
  mov    %eax,%edx
  mov    $0x0,%eax
  mov    0x50(%rsp),%rcx
L438:
  movsd  (%r14,%rax,8),%xmm0
  movsd  %xmm0,(%rcx,%rax,8)
  add    $0x1,%rax
  cmp    %rdx,%rax
  jne    L438
L311:
  mov    -0x40(%rsp),%r9d
  cmp    $0x1,%r9d
  jle    L167
  mov    -0x5c(%rsp),%eax
  mov    %eax,%edx
  imul   %esi,%edx
  mov    %edx,-0x78(%rsp)
  movslq %eax,%r8
  shl    $0x3,%r8
  mov    $0x1,%ebx
  mov    0x48(%rsp),%rdi
  jmp    L327
L402:
  movsd  0x0(%rbp,%rax,1),%xmm0
  movsd  %xmm0,(%rdi,%rax,1)
  movsd  0x8(%rbp,%rax,1),%xmm0
  movsd  %xmm0,0x8(%rdi,%rax,1)
  add    $0x1,%ecx
  add    %r8,%rax
  cmp    %ecx,%esi
  jne    L402
L280:
  lea    0x1(%rbx),%eax
  add    -0x78(%rsp),%edx
  cmp    %eax,%r9d
  je     L55
  mov    %eax,%ebx
L327:
  movslq %edx,%rax
  shl    $0x3,%rax
  mov    $0x0,%ecx
  test   %esi,%esi
  jg     L402
  jmp    L280
L109:
  mov    %eax,%r14d
L121:
  lea    0x2(%r12),%eax
  cmpl   $0x3,-0x5c(%rsp)
  jle    L503
  cltq
  mov    0x68(%rsp),%rdi
  lea    (%rdi,%rax,8),%rdx
  movslq %r13d,%rax
  lea    0x18(,%rax,8),%r9
  mov    $0x2,%r10d
L395:
  test   %esi,%esi
  jle    L173
  lea    0x0(%rbp,%r9,1),%rax
  lea    (%r15,%r9,1),%rcx
  mov    $0x0,%edi
  pxor   %xmm2,%xmm2
  cvtsi2sdl 0x70(%rsp),%xmm2
L6:
  movsd  (%rdx),%xmm0
  mulsd  -0x8(%rax),%xmm0
  movapd %xmm2,%xmm1
  mulsd  0x8(%rdx),%xmm1
  mulsd  (%rax),%xmm1
  subsd  %xmm1,%xmm0
  movsd  %xmm0,-0x8(%rcx)
  movapd %xmm2,%xmm0
  mulsd  0x8(%rdx),%xmm0
  mulsd  -0x8(%rax),%xmm0
  movsd  (%rdx),%xmm1
  mulsd  (%rax),%xmm1
  addsd  %xmm1,%xmm0
  movsd  %xmm0,(%rcx)
  add    $0x1,%edi
  add    %r8,%rax
  add    %r8,%rcx
  cmp    %edi,%esi
  jne    L6
L173:
  add    $0x10,%rdx
  add    $0x2,%r10d
  add    $0x10,%r9
  cmp    %r10d,%r11d
  jne    L395
  mov    -0x70(%rsp),%eax
  lea    0x4(%rax,%r12,1),%r12d
L130:
  lea    0x1(%r14),%eax
  add    -0x78(%rsp),%r13d
  cmp    %r14d,%ebx
  jne    L109
L167:
  add    $0x10,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L503:
  mov    %eax,%r12d
  jmp    L130
L367:
  movslq %r9d,%rdx
  lea    0x0(,%rdx,8),%rcx
  lea    0x0(%rbp,%rcx,1),%rax
  add    %r14,%rcx
  add    %r13,%rdx
  lea    (%r11,%rdx,8),%rdi
  mov    %r10,%rdx
  pxor   %xmm2,%xmm2
  cvtsi2sdl 0x70(%rsp),%xmm2
L651:
  movsd  (%rdx),%xmm0
  mulsd  0x10(%rax),%xmm0
  movapd %xmm2,%xmm1
  mulsd  0x8(%rdx),%xmm1
  mulsd  0x18(%rax),%xmm1
  subsd  %xmm1,%xmm0
  movsd  %xmm0,0x10(%rcx)
  movapd %xmm2,%xmm0
  mulsd  0x8(%rdx),%xmm0
  mulsd  0x10(%rax),%xmm0
  movsd  (%rdx),%xmm1
  mulsd  0x18(%rax),%xmm1
  addsd  %xmm1,%xmm0
  movsd  %xmm0,0x18(%rcx)
  add    $0x10,%rdx
  add    $0x10,%rax
  add    $0x10,%rcx
  cmp    %rdi,%rax
  jne    L651
L416:
  add    $0x1,%r8d
  add    %r15d,%r9d
  cmp    %r8d,%esi
  je     L114
L262:
  cmp    $0x3,%r15d
  jg     L367
  jmp    L416
L114:
  add    $0x1,%ebx
  add    -0x78(%rsp),%r10
  add    -0x70(%rsp),%r12d
  cmp    %ebx,-0x40(%rsp)
  je     L167
L137:
  mov    %r12d,%r9d
  mov    $0x0,%r8d
  test   %esi,%esi
  jg     L262
  jmp    L114
L513:
  mov    -0x8(%rsp),%rax
  movl   $0x1,(%rax)
  jmp    L167
L55:
  cmp    %esi,0xc(%rsp)
  jg     L233
  mov    -0x5c(%rsp),%eax
  sub    $0x4,%eax
  mov    %eax,%edi
  and    $0xfffffffe,%edi
  mov    %edi,-0x70(%rsp)
  mov    -0x78(%rsp),%r13d
  mov    $0x1,%r14d
  mov    $0x0,%r12d
  lea    0x4(%rdi),%r11d
  mov    %r15,0x68(%rsp)
  mov    0x48(%rsp),%r15
  jmp    L121
L505:
  mov    $0x2,%eax
  sub    -0x5c(%rsp),%eax
  mov    %eax,-0xc(%rsp)
  jmp    L590
L517:
  mov    0x60(%rsp),%r14
  mov    0x68(%rsp),%r15
  test   %esi,%esi
  jle    L505
L634:
  mov    -0x40(%rsp),%ebx
  mov    -0x5c(%rsp),%r12d
  imul   %r12d,%ebx
  mov    $0x0,%r10d
  mov    $0x0,%r11d
  mov    $0x0,%r9d
  lea    -0x1(%r12),%r8d
  mov    -0x48(%rsp),%r13
  jmp    L433
L233:
  mov    -0x5c(%rsp),%ebx
  movslq %ebx,%rdx
  lea    0x0(,%rdx,8),%rax
  mov    %rax,-0x78(%rsp)
  movslq -0xc(%rsp),%rax
  add    %rdx,%rax
  lea    (%r15,%rax,8),%r10
  mov    %ebx,%r15d
  imul   %esi,%r15d
  mov    %r15d,%r14d
  mov    %ebx,%r15d
  lea    -0x4(%rbx),%eax
  shr    %eax
  mov    %eax,%eax
  lea    (%rax,%rax,1),%r13
  mov    %r14d,%r12d
  mov    $0x1,%ebx
  lea    0x10(%rbp),%r11
  mov    %r14d,-0x70(%rsp)
  mov    0x48(%rsp),%r14
  jmp    L137
L415:
  cmpl   $0x0,-0x5c(%rsp)
  jg     L195
  mov    $0x2,%eax
  sub    -0x5c(%rsp),%eax
  mov    %eax,-0xc(%rsp)
  jmp    L612
L769:
  mov    $0x2,%eax
  sub    -0x5c(%rsp),%eax
  mov    %eax,-0xc(%rsp)
  jmp    L590
L54:
  mov    0x58(%rsp),%rbp
  mov    0x60(%rsp),%r14
  mov    0x68(%rsp),%r15
  cmpl   $0x0,-0x5c(%rsp)
  jle    L769
L195:
  mov    -0x48(%rsp),%r9
  mov    %rbp,%r8
  mov    -0x5c(%rsp),%ebx
  mov    %ebx,%eax
  imul   -0x40(%rsp),%eax
  cltq
  lea    0x0(,%rax,8),%r10
  movslq %ebx,%rax
  lea    0x0(,%rax,8),%r11
  mov    $0x0,%edi
  jmp    L427
```

assistant: ```c
void passf(int *nac, int ido, int ip, int l1, int idl1, const double cc[], double c1[], double c2[], double ch[], double ch2[], const double wa[], int isign) {
  int idij, idlj, idot, ipph, i, j, k, l, jc, lc, ik, nt, idj, idl, inc, idp;
  double wai, war;
  idot = ido / 2;
  nt = ip * idl1;
  ipph = (ip + 1) / 2;
  idp = ip * ido;
  if (ido >= l1) {
    for (j = 1; j < ipph; j++) {
      jc = ip - j;
      for (k = 0; k < l1; k++) {
        for (i = 0; i < ido; i++) {
          ch[i + (k + j * l1) * ido] = cc[i + (j + k * ip) * ido] + cc[i + (jc + k * ip) * ido];
          ch[i + (k + jc * l1) * ido] = cc[i + (j + k * ip) * ido] - cc[i + (jc + k * ip) * ido];
        }
      }
    }
    for (k = 0; k < l1; k++)
      for (i = 0; i < ido; i++)
        ch[i + k * ido] = cc[i + k * ip * ido];
  } else {
    for (j = 1; j < ipph; j++) {
      jc = ip - j;
      for (i = 0; i < ido; i++) {
        for (k = 0; k < l1; k++) {
          ch[i + (k + j * l1) * ido] = cc[i + (j + k * ip) * ido] + cc[i + (jc + k * ip) * ido];
          ch[i + (k + jc * l1) * ido] = cc[i + (j + k * ip) * ido] - cc[i + (jc + k * ip) * ido];
        }
      }
    }
    for (i = 0; i < ido; i++)
      for (k = 0; k < l1; k++)
        ch[i + k * ido] = cc[i + k * ip * ido];
  }
  idl = 2 - ido;
  inc = 0;
  for (l = 1; l < ipph; l++) {
    lc = ip - l;
    idl += ido;
    for (ik = 0; ik < idl1; ik++) {
      c2[ik + l * idl1] = ch2[ik] + wa[idl - 2] * ch2[ik + idl1];
      c2[ik + lc * idl1] = isign * wa[idl - 1] * ch2[ik + (ip - 1) * idl1];
    }
    idlj = idl;
    inc += ido;
    for (j = 2; j < ipph; j++) {
      jc = ip - j;
      idlj += inc;
      if (idlj > idp)
        idlj -= idp;
      war = wa[idlj - 2];
      wai = wa[idlj - 1];
      for (ik = 0; ik < idl1; ik++) {
        c2[ik + l * idl1] += war * ch2[ik + j * idl1];
        c2[ik + lc * idl1] += isign * wai * ch2[ik + jc * idl1];
      }
    }
  }
  for (j = 1; j < ipph; j++)
    for (ik = 0; ik < idl1; ik++)
      ch2[ik] += ch2[ik + j * idl1];
  for (j = 1; j < ipph; j++) {
    jc = ip - j;
    for (ik = 1; ik < idl1; ik += 2) {
      ch2[ik - 1 + j * idl1] = c2[ik - 1 + j * idl1] - c2[ik + jc * idl1];
      ch2[ik - 1 + jc * idl1] = c2[ik - 1 + j * idl1] + c2[ik + jc * idl1];
      ch2[ik + j * idl1] = c2[ik + j * idl1] + c2[ik - 1 + jc * idl1];
      ch2[ik + jc * idl1] = c2[ik + j * idl1] - c2[ik - 1 + jc * idl1];
    }
  }
  *nac = 1;
  if (ido == 2)
    return;
  *nac = 0;
  for (ik = 0; ik < idl1; ik++)
    c2[ik] = ch2[ik];
  for (j = 1; j < ip; j++) {
    for (k = 0; k < l1; k++) {
      c1[(k + j * l1) * ido + 0] = ch[(k + j * l1) * ido + 0];
      c1[(k + j * l1) * ido + 1] = ch[(k + j * l1) * ido + 1];
    }
  }
  if (idot <= l1) {
    idij = 0;
    for (j = 1; j < ip; j++) {
      idij += 2;
      for (i = 3; i < ido; i += 2) {
        idij += 2;
        for (k = 0; k < l1; k++) {
          c1[i - 1 + (k + j * l1) * ido] = wa[idij - 2] * ch[i - 1 + (k + j * l1) * ido] - isign * wa[idij - 1] * ch[i + (k + j * l1) * ido];
          c1[i + (k + j * l1) * ido] = wa[idij - 2] * ch[i + (k + j * l1) * ido] + isign * wa[idij - 1] * ch[i - 1 + (k + j * l1) * ido];
        }
      }
    }
  } else {
    idj = 2 - ido;
    for (j = 1; j < ip; j++) {
      idj += ido;
      for (k = 0; k < l1; k++) {
        idij = idj;
        for (i = 3; i < ido; i += 2) {
          idij += 2;
          c1[i - 1 + (k + j * l1) * ido] = wa[idij - 2] * ch[i - 1 + (k + j * l1) * ido] - isign * wa[idij - 1] * ch[i + (k + j * l1) * ido];
          c1[i + (k + j * l1) * ido] = wa[idij - 2] * ch[i + (k + j * l1) * ido] + isign * wa[idij - 1] * ch[i - 1 + (k + j * l1) * ido];
        }
      }
    }
  }
}
```