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

```asm
<tide_pl>:
  endbr64
  push   %r14
  movq   %xmm0,%r14
  push   %r13
  mov    %rsi,%r13
  lea    D196(%rip),%rsi
  push   %r12
  mov    %rdx,%r12
  push   %rbp
  mov    %rcx,%rbp
  push   %rbx
  mov    %rdi,%rbx
  mov    $0x4,%edi
  add    $0xffffffffffffff80,%rsp
  movsd  D182(%rip),%xmm1
  movsd  (%rdx),%xmm0
  mov    %fs:0x28,%rax
  mov    %rax,0x78(%rsp)
  xor    %eax,%eax
  mov    $0x2,%eax
  mulsd  %xmm1,%xmm0
  mulsd  0x8(%rdx),%xmm1
  call   <trace@plt>
  mov    $0x3,%esi
  mov    %r13,%rdi
  call   <norm@plt>
  movapd %xmm0,%xmm2
  pxor   %xmm0,%xmm0
  comisd %xmm2,%xmm0
  jae    L5
  movsd  D194(%rip),%xmm5
  movq   %r14,%xmm3
  divsd  D197(%rip),%xmm3
  movsd  D221(%rip),%xmm8
  movsd  0x0(%r13),%xmm1
  movsd  0x8(%r13),%xmm4
  mulsd  %xmm5,%xmm3
  movsd  0x10(%r13),%xmm0
  divsd  %xmm2,%xmm1
  mulsd  %xmm5,%xmm3
  movapd %xmm2,%xmm5
  mulsd  %xmm2,%xmm5
  mulsd  %xmm2,%xmm5
  divsd  %xmm5,%xmm3
  movsd  %xmm1,0x60(%rsp)
  movsd  %xmm1,0x20(%rsp)
  divsd  %xmm2,%xmm4
  mulsd  %xmm3,%xmm8
  movsd  %xmm3,0x8(%rsp)
  divsd  %xmm2,%xmm8
  movsd  %xmm4,0x68(%rsp)
  movsd  %xmm4,0x18(%rsp)
  divsd  %xmm2,%xmm0
  movsd  %xmm8,0x28(%rsp)
  movsd  %xmm0,0x70(%rsp)
  call   <asin@plt>
  movsd  0x18(%rsp),%xmm4
  movsd  0x20(%rsp),%xmm1
  movsd  %xmm0,0x10(%rsp)
  movapd %xmm4,%xmm0
  call   <atan2@plt>
  movsd  0x10(%rsp),%xmm6
  movsd  %xmm0,0x20(%rsp)
  movapd %xmm6,%xmm0
  movsd  %xmm6,0x48(%rsp)
  call   <cos@plt>
  lea    0x58(%rsp),%rdi
  lea    0x50(%rsp),%rsi
  movsd  %xmm0,0x40(%rsp)
  movsd  (%r12),%xmm0
  call   <sincos@plt>
  movsd  0x58(%rsp),%xmm0
  movsd  0x50(%rsp),%xmm5
  lea    0x60(%rsp),%rdi
  movsd  D97(%rip),%xmm2
  mov    %rbx,%rsi
  mov    $0x3,%edx
  movsd  %xmm5,0x38(%rsp)
  mulsd  %xmm0,%xmm2
  mulsd  %xmm0,%xmm2
  subsd  D45(%rip),%xmm2
  mulsd  D37(%rip),%xmm2
  movapd %xmm2,%xmm1
  movsd  %xmm2,0x18(%rsp)
  mulsd  D156(%rip),%xmm1
  addsd  D190(%rip),%xmm1
  movsd  %xmm1,0x10(%rsp)
  call   <dot@plt>
  movsd  0x8(%rsp),%xmm7
  movsd  D97(%rip),%xmm10
  movsd  0x10(%rsp),%xmm1
  movapd %xmm0,%xmm9
  movsd  D155(%rip),%xmm11
  movapd %xmm0,%xmm3
  mulsd  %xmm7,%xmm10
  movsd  0x18(%rsp),%xmm2
  movsd  D80(%rip),%xmm5
  mulsd  %xmm11,%xmm9
  movsd  0x28(%rsp),%xmm8
  movsd  0x48(%rsp),%xmm6
  mulsd  D152(%rip),%xmm2
  mulsd  %xmm3,%xmm5
  addsd  %xmm6,%xmm6
  mulsd  %xmm1,%xmm10
  mulsd  D97(%rip),%xmm1
  movapd %xmm9,%xmm4
  mulsd  %xmm0,%xmm4
  subsd  D37(%rip),%xmm4
  mulsd  %xmm0,%xmm10
  movsd  D116(%rip),%xmm0
  mulsd  %xmm3,%xmm1
  subsd  %xmm2,%xmm0
  movapd %xmm8,%xmm2
  mulsd  %xmm0,%xmm4
  movapd %xmm5,%xmm0
  mulsd  %xmm3,%xmm1
  mulsd  %xmm3,%xmm0
  subsd  %xmm1,%xmm4
  movsd  D124(%rip),%xmm1
  subsd  %xmm11,%xmm0
  movsd  D143(%rip),%xmm11
  mulsd  %xmm3,%xmm1
  mulsd  %xmm11,%xmm2
  mulsd  %xmm7,%xmm4
  mulsd  %xmm3,%xmm1
  mulsd  %xmm0,%xmm2
  mulsd  %xmm11,%xmm0
  mulsd  %xmm3,%xmm1
  addsd  %xmm10,%xmm2
  mulsd  %xmm3,%xmm0
  movsd  %xmm2,0x30(%rsp)
  subsd  %xmm9,%xmm1
  mulsd  D159(%rip),%xmm1
  subsd  %xmm0,%xmm1
  movapd %xmm6,%xmm0
  mulsd  %xmm8,%xmm1
  addsd  %xmm4,%xmm1
  movsd  %xmm1,0x28(%rsp)
  call   <sin@plt>
  movsd  %xmm0,0x10(%rsp)
  movsd  (%r12),%xmm0
  addsd  %xmm0,%xmm0
  call   <sin@plt>
  movsd  0x8(%r12),%xmm1
  subsd  0x20(%rsp),%xmm1
  movsd  %xmm0,0x18(%rsp)
  movapd %xmm1,%xmm0
  movsd  %xmm1,0x20(%rsp)
  call   <sin@plt>
  movsd  0x8(%rsp),%xmm6
  mulsd  D22(%rip),%xmm6
  movapd %xmm0,%xmm3
  movsd  0x10(%rsp),%xmm0
  movsd  0x20(%rsp),%xmm1
  addsd  %xmm1,%xmm1
  mulsd  %xmm6,%xmm0
  mulsd  0x18(%rsp),%xmm0
  mulsd  %xmm3,%xmm0
  addsd  0x28(%rsp),%xmm0
  movsd  %xmm0,0x10(%rsp)
  movapd %xmm1,%xmm0
  call   <sin@plt>
  movsd  0x8(%rsp),%xmm3
  mulsd  D185(%rip),%xmm3
  lea    D79(%rip),%rsi
  movsd  0x40(%rsp),%xmm7
  movsd  0x38(%rsp),%xmm5
  mov    $0x5,%edi
  mov    $0x3,%eax
  mulsd  %xmm7,%xmm3
  mulsd  %xmm7,%xmm3
  mulsd  %xmm5,%xmm3
  mulsd  %xmm5,%xmm3
  mulsd  %xmm0,%xmm3
  addsd  0x10(%rsp),%xmm3
  movsd  (%rbx),%xmm1
  movsd  0x30(%rsp),%xmm2
  movsd  0x60(%rsp),%xmm0
  mulsd  %xmm3,%xmm1
  mulsd  %xmm2,%xmm0
  addsd  %xmm1,%xmm0
  movsd  0x68(%rsp),%xmm1
  mulsd  %xmm2,%xmm1
  movsd  %xmm0,0x0(%rbp)
  movsd  0x8(%rbx),%xmm4
  mulsd  0x70(%rsp),%xmm2
  mulsd  %xmm3,%xmm4
  addsd  %xmm4,%xmm1
  movsd  %xmm1,0x8(%rbp)
  mulsd  0x10(%rbx),%xmm3
  addsd  %xmm3,%xmm2
  movsd  %xmm2,0x10(%rbp)
  call   <trace@plt>
L5:
  mov    0x78(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L6
  sub    $0xffffffffffffff80,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  ret
L6:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: disassemble_data
arguments: data_label: D196
datatype: string
name: disassemble_data
arguments: data_label: D182
datatype: byte[8]
name: disassemble_data
arguments: data_label: D194
datatype: byte[8]
name: disassemble_data
arguments: data_label: D197
datatype: byte[8]
name: disassemble_data
arguments: data_label: D221
datatype: f64
name: disassemble_data
arguments: data_label: D97
datatype: f64
name: disassemble_data
arguments: data_label: D45
datatype: f64
name: disassemble_data
arguments: data_label: D37
datatype: f64
name: disassemble_data
arguments: data_label: D156
datatype: f64
name: disassemble_data
arguments: data_label: D190
datatype: f64
name: disassemble_data
arguments: data_label: D155
datatype: f64
name: disassemble_data
arguments: data_label: D80
datatype: f64
name: disassemble_data
arguments: data_label: D152
datatype: f64
name: disassemble_data
arguments: data_label: D116
datatype: f64
name: disassemble_data
arguments: data_label: D124
datatype: f64
name: disassemble_data
arguments: data_label: D143
datatype: f64
name: disassemble_data
arguments: data_label: D159
datatype: f64
name: disassemble_data
arguments: data_label: D22
datatype: byte[8]
name: disassemble_data
arguments: data_label: D185
datatype: byte[8]
name: disassemble_data
arguments: data_label: D79
datatype: string

tool: D196: tide_pl : pos=%.3f %.3f


tool: {"D182": [0xf8,0xc1,0x63,0x1a,0xdc,0xa5,0x4c,0x40]}

tool: {"D194": [0x80,0xb8,0x2f,0x4c,0xd9,0x7f,0xc2,0x42]}

tool: {"D197": [0x00,0x16,0x91,0x5b,0x66,0xa8,0xf6,0x42]}

tool: D221: 6378137

tool: D97: 3

tool: D45: 1

tool: D37: 0.5

tool: D156: 0.0002

tool: D190: 0.0847

tool: D155: 1.5

tool: D80: 7.5

tool: D152: 0.0006

tool: D116: 0.6078

tool: D124: 2.5

tool: D143: 0.015

tool: D159: 0.292

tool: {"D22": [0xb8,0x1e,0x85,0xeb,0x51,0xb8,0x5e,0x3f]}

tool: {"D185": [0x46,0x25,0x75,0x02,0x9a,0x08,0x5b,0x3f]}

tool: D79: tide_pl : dr=%.3f %.3f %.3f


assistant: ```c
void tide_pl(const double *eu, const double *rp, double GMp, const double *pos, double *dr) {
  const double H3 = 0.292, L3 = 0.015;
  double r, ep[3], latp, lonp, p, K2, K3, a, H2, L2, dp, du, cosp, sinl, cosl;
  int i;
  trace(4, "tide_pl : pos=%.3f %.3f\n", pos[0] * (180.0 / 3.1415926535897932), pos[1] * (180.0 / 3.1415926535897932));
  if ((r = norm(rp, 3)) <= 0.0)
    return;
  for (i = 0; i < 3; i++)
    ep[i] = rp[i] / r;
  K2 = GMp / 3.986004415E+14 * ((6378137.0) * (6378137.0)) * ((6378137.0) * (6378137.0)) / (r * r * r);
  K3 = K2 * 6378137.0 / r;
  latp = asin(ep[2]);
  lonp = atan2(ep[1], ep[0]);
  cosp = cos(latp);
  sinl = sin(pos[0]);
  cosl = cos(pos[0]);
  p = (3.0 * sinl * sinl - 1.0) / 2.0;
  H2 = 0.6078 - 0.0006 * p;
  L2 = 0.0847 + 0.0002 * p;
  a = dot(ep, eu, 3);
  dp = K2 * 3.0 * L2 * a;
  du = K2 * (H2 * (1.5 * a * a - 0.5) - 3.0 * L2 * a * a);
  dp += K3 * L3 * (7.5 * a * a - 1.5);
  du += K3 * (H3 * (2.5 * a * a * a - 1.5 * a) - L3 * (7.5 * a * a - 1.5) * a);
  du += 3.0 / 4.0 * 0.0025 * K2 * sin(2.0 * latp) * sin(2.0 * pos[0]) * sin(pos[1] - lonp);
  du += 3.0 / 4.0 * 0.0022 * K2 * cosp * cosp * cosl * cosl * sin(2.0 * (pos[1] - lonp));
  dr[0] = dp * ep[0] + du * eu[0];
  dr[1] = dp * ep[1] + du * eu[1];
  dr[2] = dp * ep[2] + du * eu[2];
  trace(5, "tide_pl : dr=%.3f %.3f %.3f\n", dr[0], dr[1], dr[2]);
}
```