user: 请将以下的汇编代码转换成C语言代码：

```asm
<sun_right_ascension_parallax_and_topocentric_dec>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %rbx
  sub    $0x98,%rsp
  movsd  %xmm0,-0x58(%rbp)
  movsd  %xmm1,-0x60(%rbp)
  movsd  %xmm2,-0x68(%rbp)
  movsd  %xmm3,-0x70(%rbp)
  movsd  %xmm4,-0x78(%rbp)
  mov    %rdi,-0x80(%rbp)
  mov    %rsi,-0x88(%rbp)
  mov    -0x58(%rbp),%rax
  movq   %rax,%xmm0
  call   <deg2rad@plt>
  movq   %xmm0,%rax
  mov    %rax,-0x50(%rbp)
  mov    -0x68(%rbp),%rax
  movq   %rax,%xmm0
  call   <deg2rad@plt>
  movq   %xmm0,%rax
  mov    %rax,-0x48(%rbp)
  mov    -0x70(%rbp),%rax
  movq   %rax,%xmm0
  call   <deg2rad@plt>
  movq   %xmm0,%rax
  mov    %rax,-0x40(%rbp)
  mov    -0x78(%rbp),%rax
  movq   %rax,%xmm0
  call   <deg2rad@plt>
  movq   %xmm0,%rax
  mov    %rax,-0x38(%rbp)
  mov    -0x50(%rbp),%rax
  movq   %rax,%xmm0
  call   <tan@plt>
  movsd  D39(%rip),%xmm1
  mulsd  %xmm1,%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <atanf@plt>
  movq   %xmm0,%rax
  mov    %rax,-0x30(%rbp)
  mov    -0x30(%rbp),%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movsd  D39(%rip),%xmm1
  mulsd  %xmm1,%xmm0
  movsd  %xmm0,-0x90(%rbp)
  mov    -0x50(%rbp),%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movq   %xmm0,%rax
  movq   %rax,%xmm6
  mulsd  -0x60(%rbp),%xmm6
  movapd %xmm6,%xmm0
  movsd  D20(%rip),%xmm1
  divsd  %xmm1,%xmm0
  addsd  -0x90(%rbp),%xmm0
  movsd  %xmm0,-0x28(%rbp)
  mov    -0x30(%rbp),%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movsd  %xmm0,-0x90(%rbp)
  mov    -0x50(%rbp),%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movq   %xmm0,%rax
  movq   %rax,%xmm7
  mulsd  -0x60(%rbp),%xmm7
  movapd %xmm7,%xmm0
  movsd  D20(%rip),%xmm1
  divsd  %xmm1,%xmm0
  addsd  -0x90(%rbp),%xmm0
  movsd  %xmm0,-0x20(%rbp)
  mov    -0x38(%rbp),%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movq   %xmm0,%rbx
  mov    -0x48(%rbp),%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movq   %xmm0,%rax
  movq   %rax,%xmm2
  mulsd  -0x20(%rbp),%xmm2
  movsd  %xmm2,-0x90(%rbp)
  mov    -0x40(%rbp),%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  mulsd  -0x90(%rbp),%xmm0
  movq   %rbx,%xmm3
  subsd  %xmm0,%xmm3
  movsd  %xmm3,-0x90(%rbp)
  movsd  -0x20(%rbp),%xmm0
  movq   D33(%rip),%xmm1
  xorpd  %xmm1,%xmm0
  movsd  %xmm0,-0x98(%rbp)
  mov    -0x48(%rbp),%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movapd %xmm0,%xmm5
  mulsd  -0x98(%rbp),%xmm5
  movsd  %xmm5,-0x98(%rbp)
  mov    -0x40(%rbp),%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  mulsd  -0x98(%rbp),%xmm0
  movq   %xmm0,%rax
  movsd  -0x90(%rbp),%xmm1
  movq   %rax,%xmm0
  call   <atan2@plt>
  movq   %xmm0,%rax
  mov    %rax,-0x18(%rbp)
  mov    -0x38(%rbp),%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movq   %xmm0,%rbx
  mov    -0x48(%rbp),%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movq   %xmm0,%rax
  movq   %rax,%xmm4
  mulsd  -0x20(%rbp),%xmm4
  movsd  %xmm4,-0x90(%rbp)
  mov    -0x40(%rbp),%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  mulsd  -0x90(%rbp),%xmm0
  movq   %rbx,%xmm6
  subsd  %xmm0,%xmm6
  movsd  %xmm6,-0x90(%rbp)
  mov    -0x38(%rbp),%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movq   %xmm0,%rbx
  mov    -0x48(%rbp),%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  mulsd  -0x28(%rbp),%xmm0
  movq   %rbx,%xmm7
  subsd  %xmm0,%xmm7
  movsd  %xmm7,-0x98(%rbp)
  mov    -0x18(%rbp),%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  mulsd  -0x98(%rbp),%xmm0
  movq   %xmm0,%rax
  movsd  -0x90(%rbp),%xmm1
  movq   %rax,%xmm0
  call   <atan2@plt>
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <rad2deg@plt>
  movq   %xmm0,%rax
  mov    -0x88(%rbp),%rdx
  mov    %rax,(%rdx)
  mov    -0x18(%rbp),%rax
  movq   %rax,%xmm0
  call   <rad2deg@plt>
  movq   %xmm0,%rax
  mov    -0x80(%rbp),%rdx
  mov    %rax,(%rdx)
  nop
  mov    -0x8(%rbp),%rbx
  leave
  ret
```

tool_calls: name: parse_data
arguments: tag: D39
type: f64
name: parse_data
arguments: tag: D20
type: f64
name: parse_data
arguments: tag: D33
type: byte[8]

tool: D39: 0.99664719

tool: D20: 6378140

tool: {"D33": [0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x80]}

assistant: ```c
void sun_right_ascension_parallax_and_topocentric_dec(double latitude, double elevation, double xi, double h, double delta, double *delta_alpha, double *delta_prime) {
  double delta_alpha_rad;
  double lat_rad = deg2rad(latitude);
  double xi_rad = deg2rad(xi);
  double h_rad = deg2rad(h);
  double delta_rad = deg2rad(delta);
  double u = atanf(0.99664719 * tan(lat_rad));
  double y = 0.99664719 * sin(u) + elevation * sin(lat_rad) / 6378140.0;
  double x = cos(u) + elevation * cos(lat_rad) / 6378140.0;
  delta_alpha_rad = atan2(-x * sin(xi_rad) * sin(h_rad), cos(delta_rad) - x * sin(xi_rad) * cos(h_rad));
  *delta_prime = rad2deg(atan2((sin(delta_rad) - y * sin(xi_rad)) * cos(delta_alpha_rad), cos(delta_rad) - x * sin(xi_rad) * cos(h_rad)));
  *delta_alpha = rad2deg(delta_alpha_rad);
}
```