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

```asm
<anomaly>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x28,%rsp
  movq   %xmm0,%r13
  movsd  %xmm1,(%rsp)
  mov    %rdi,%r12
  mov    %rsi,%rbp
  movsd  D76(%rip),%xmm0
  comisd %xmm1,%xmm0
  jbe    L8
  movsd  D99(%rip),%xmm1
  movq   %r13,%xmm0
  divsd  %xmm1,%xmm0
  cvttsd2si %xmm0,%rax
  pxor   %xmm0,%xmm0
  cvtsi2sd %rax,%xmm0
  mulsd  %xmm1,%xmm0
  movq   %r13,%xmm2
  subsd  %xmm0,%xmm2
  movsd  %xmm2,0x8(%rsp)
  comisd D96(%rip),%xmm2
  jbe    L95
  subsd  %xmm1,%xmm2
  movsd  %xmm2,0x8(%rsp)
L95:
  movsd  D72(%rip),%xmm0
  movsd  0x8(%rsp),%xmm6
  comisd %xmm6,%xmm0
  jbe    L92
  addsd  D99(%rip),%xmm6
  movsd  %xmm6,0x8(%rsp)
L92:
  mov    0x8(%rsp),%rbx
  lea    0x18(%rsp),%r13
  jmp    L14
L50:
  movq   %r14,%xmm4
  mulsd  (%rsp),%xmm4
  movsd  D76(%rip),%xmm0
  subsd  %xmm4,%xmm0
  movsd  D12(%rip),%xmm6
  movapd %xmm0,%xmm1
  cmpnltsd %xmm6,%xmm1
  andpd  %xmm1,%xmm0
  andnpd %xmm6,%xmm1
  orpd   %xmm1,%xmm0
  movq   %r15,%xmm1
  divsd  %xmm0,%xmm1
  movq   %rbx,%xmm5
  subsd  %xmm1,%xmm5
  movq   %xmm5,%rbx
L14:
  lea    0x10(%rsp),%rsi
  mov    %r13,%rdi
  movq   %rbx,%xmm0
  call   <sincos@plt>
  mov    0x10(%rsp),%r14
  movsd  (%rsp),%xmm1
  mulsd  0x18(%rsp),%xmm1
  movq   %rbx,%xmm0
  subsd  %xmm1,%xmm0
  subsd  0x8(%rsp),%xmm0
  movq   %xmm0,%r15
  call   <fabs@plt>
  test   %eax,%eax
  jg     L50
  movsd  D76(%rip),%xmm1
  movsd  (%rsp),%xmm3
  movapd %xmm3,%xmm0
  addsd  %xmm1,%xmm0
  subsd  %xmm3,%xmm1
  divsd  %xmm1,%xmm0
  call   <sqrt@plt>
  mov    %eax,%r13d
  movq   %rbx,%xmm0
  mulsd  D130(%rip),%xmm0
  call   <tan@plt>
  mov    %r13d,%edi
  imul   %eax,%edi
  call   <atan@plt>
  add    %eax,%eax
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
L31:
  movsd  %xmm0,(%r12)
  mov    %rbx,0x0(%rbp)
  add    $0x28,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L8:
  movq   %r13,%xmm0
  call   <fabs@plt>
  pxor   %xmm5,%xmm5
  cvtsi2sd %eax,%xmm5
  movq   %xmm5,%r15
  movsd  (%rsp),%xmm3
  movapd %xmm3,%xmm6
  subsd  D76(%rip),%xmm6
  movsd  %xmm6,0x8(%rsp)
  movapd %xmm5,%xmm7
  divsd  %xmm6,%xmm7
  movq   %xmm7,%rbx
  mulsd  D98(%rip),%xmm5
  movapd %xmm5,%xmm0
  movapd %xmm3,%xmm1
  mulsd  %xmm3,%xmm1
  divsd  %xmm1,%xmm0
  cvttsd2si %xmm0,%edi
  mov    $0x0,%esi
  call   <pow@plt>
  movq   %rbx,%xmm4
  minsd  %xmm4,%xmm0
  movq   %xmm0,%rbx
  movsd  D76(%rip),%xmm0
  jmp    L69
L56:
  movq   %rbx,%xmm0
  call   <sinh@plt>
  movq   %xmm0,%r14
  movq   %rbx,%xmm0
  call   <cosh@plt>
  movapd %xmm0,%xmm1
  movq   %r14,%xmm2
  movsd  (%rsp),%xmm7
  mulsd  %xmm7,%xmm2
  movq   %r15,%xmm0
  subsd  %xmm2,%xmm0
  movq   %rbx,%xmm5
  addsd  %xmm5,%xmm0
  mulsd  %xmm7,%xmm1
  subsd  D76(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movq   %rbx,%xmm3
  addsd  %xmm0,%xmm3
  movq   %xmm3,%rbx
L69:
  call   <fabs@plt>
  test   %eax,%eax
  jg     L56
  pxor   %xmm0,%xmm0
  movq   %r13,%xmm2
  comisd %xmm2,%xmm0
  ja     L59
L3:
  movsd  (%rsp),%xmm0
  addsd  D76(%rip),%xmm0
  divsd  0x8(%rsp),%xmm0
  call   <sqrt@plt>
  mov    %eax,%r13d
  movq   %rbx,%xmm0
  mulsd  D130(%rip),%xmm0
  call   <tanh@plt>
  mov    %r13d,%edi
  imul   %eax,%edi
  call   <atan@plt>
  add    %eax,%eax
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  jmp    L31
L59:
  movq   %rbx,%xmm2
  xorpd  D115(%rip),%xmm2
  movq   %xmm2,%rbx
  jmp    L3
```

tool_calls: name: retrieve_data
arguments: data_tag: D76
type: f64
name: retrieve_data
arguments: data_tag: D99
type: byte[8]
name: retrieve_data
arguments: data_tag: D96
type: f64[2]
name: retrieve_data
arguments: data_tag: D72
type: byte[8]
name: retrieve_data
arguments: data_tag: D12
type: byte[8]
name: retrieve_data
arguments: data_tag: D130
type: f32[2]
name: retrieve_data
arguments: data_tag: D98
type: f32[2]
name: retrieve_data
arguments: data_tag: D115
type: f32[4]

tool: D76: 1

tool: {"D99": [0x18,0x2d,0x44,0x54,0xfb,0x21,0x19,0x40]}

tool: {"D96": [3.141592653589793,-3.141592653589793]}

tool: {"D72": [0x18,0x2d,0x44,0x54,0xfb,0x21,0x09,0xc0]}

tool: {"D12": [0x9a,0x99,0x99,0x99,0x99,0x99,0xb9,0x3f]}

tool: {"D130": [0.0,1.75]}

tool: {"D98": [0.0,2.375]}

tool: {"D115": [0.0,-0.0,0.0,0.0]}

assistant: ```c
void anomaly(double ma, double s, double *nu, double *ea) {
  double m, fea, corr;
  if (s < 1.0) {
    double dla;
    m = ma - (2 * 3.141592653589793) * (long)(ma / (2 * 3.141592653589793));
    if (m > 3.141592653589793)
      m -= (2 * 3.141592653589793);
    if (m < -3.141592653589793)
      m += (2 * 3.141592653589793);
    fea = m;
    for (;;) {
      dla = fea - (s * sin(fea)) - m;
      if (fabs(dla) < (1e-8))
        break;
      corr = 1 - (s * cos(fea));
      if (corr < .1)
        corr = .1;
      dla /= corr;
      fea -= dla;
    }
    *nu = 2 * atan(sqrt((1 + s) / (1 - s)) * tan(fea / 2));
  } else {
    double fea1;
    m = fabs(ma);
    fea = m / (s - 1.);
    fea1 = pow(6 * m / (s * s), 1. / 3.);
    if (fea1 < fea)
      fea = fea1;
    corr = 1;
    while (fabs(corr) > (1e-8)) {
      corr = (m - s * sinh(fea) + fea) / (s * cosh(fea) - 1);
      fea += corr;
    }
    if (ma < 0.)
      fea = -fea;
    *nu = 2 * atan(sqrt((s + 1) / (s - 1)) * tanh(fea / 2));
  }
  *ea = fea;
}
```