user: 请显示与下面列出的汇编代码相匹配的C语言实现:

```asm
<Sun>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x28,%rsp
  movapd %xmm0,%xmm3
  movsd  %xmm1,(%rsp)
  movsd  %xmm2,0x8(%rsp)
  mov    %rdi,%rbp
  mov    %rdx,%r13
  mov    %rcx,%r12
  movapd %xmm1,%xmm4
  movapd %xmm1,%xmm5
  mulsd  D75(%rip),%xmm5
  movapd %xmm5,%xmm0
  addsd  D2(%rip),%xmm0
  movsd  %xmm0,(%rdi)
  movapd %xmm1,%xmm6
  mulsd  D3(%rip),%xmm6
  movapd %xmm6,%xmm0
  addsd  D138(%rip),%xmm0
  movapd %xmm2,%xmm1
  mulsd  D212(%rip),%xmm1
  subsd  %xmm1,%xmm0
  movapd %xmm2,%xmm1
  mulsd  %xmm4,%xmm1
  divsd  D100(%rip),%xmm1
  addsd  %xmm1,%xmm0
  movsd  %xmm3,0x10(%rsp)
  mulsd  %xmm3,%xmm0
  movq   %xmm0,%rbx
  movsd  %xmm0,(%rsi)
  call   <sin@plt>
  movq   %xmm0,%r14
  movq   %rbx,%xmm0
  addsd  %xmm0,%xmm0
  call   <sin@plt>
  movq   %xmm0,%r15
  movq   %rbx,%xmm0
  mulsd  D140(%rip),%xmm0
  call   <sin@plt>
  movsd  (%rsp),%xmm4
  movapd %xmm4,%xmm2
  mulsd  D178(%rip),%xmm2
  movsd  D142(%rip),%xmm1
  subsd  %xmm2,%xmm1
  movsd  0x8(%rsp),%xmm2
  mulsd  D81(%rip),%xmm2
  subsd  %xmm2,%xmm1
  movq   %r14,%xmm7
  mulsd  %xmm7,%xmm1
  movapd %xmm4,%xmm3
  mulsd  D76(%rip),%xmm3
  movsd  D26(%rip),%xmm2
  subsd  %xmm3,%xmm2
  movq   %r15,%xmm6
  mulsd  %xmm6,%xmm2
  addsd  %xmm2,%xmm1
  mulsd  D136(%rip),%xmm0
  movapd %xmm1,%xmm5
  addsd  %xmm0,%xmm5
  movsd  0x10(%rsp),%xmm0
  movsd  %xmm5,0x18(%rsp)
  mulsd  %xmm5,%xmm0
  movq   %rbx,%xmm7
  addsd  %xmm7,%xmm0
  call   <cos@plt>
  movapd %xmm0,%xmm2
  movsd  (%rsp),%xmm4
  movapd %xmm4,%xmm1
  mulsd  D119(%rip),%xmm1
  movsd  D18(%rip),%xmm0
  subsd  %xmm1,%xmm0
  movsd  0x8(%rsp),%xmm1
  mulsd  D148(%rip),%xmm1
  subsd  %xmm1,%xmm0
  mulsd  %xmm2,%xmm0
  addsd  D170(%rip),%xmm0
  movsd  D203(%rip),%xmm1
  divsd  %xmm0,%xmm1
  mulsd  D9(%rip),%xmm1
  movsd  %xmm1,0x0(%r13)
  mulsd  D176(%rip),%xmm4
  movsd  D49(%rip),%xmm0
  subsd  %xmm4,%xmm0
  mulsd  0x10(%rsp),%xmm0
  call   <sin@plt>
  movsd  0x18(%rsp),%xmm5
  addsd  0x0(%rbp),%xmm5
  movapd %xmm5,%xmm1
  subsd  D130(%rip),%xmm1
  mulsd  D44(%rip),%xmm0
  subsd  %xmm0,%xmm1
  movsd  %xmm1,(%r12)
  add    $0x28,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
```

tool_calls: name: extract_symbolic_data
arguments: data_label: D75
type: f64
name: extract_symbolic_data
arguments: data_label: D2
type: f64
name: extract_symbolic_data
arguments: data_label: D3
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D138
type: f64
name: extract_symbolic_data
arguments: data_label: D212
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D100
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D140
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D178
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D142
type: f64
name: extract_symbolic_data
arguments: data_label: D81
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D76
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D26
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D136
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D119
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D18
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D148
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D170
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D203
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D9
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D176
type: f64
name: extract_symbolic_data
arguments: data_label: D49
type: f64
name: extract_symbolic_data
arguments: data_label: D130
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D44
type: byte[8]

tool: D75: 36000.8

tool: D2: 280.466

tool: {"D3": [0x00,0x00,0x00,0x00,0xe0,0x93,0xe1,0x40]}

tool: D138: 357.529

tool: {"D212": [0x76,0x83,0x0d,0xf4,0xf5,0x21,0x24,0x3f]}

tool: {"D100": [0x00,0x00,0x00,0x00,0x01,0x5b,0x77,0x41]}

tool: {"D140": [0x00,0x00,0x00,0x00,0x00,0x00,0x08,0x40]}

tool: {"D178": [0xae,0xf3,0x6f,0x97,0xfd,0xba,0x73,0x3f]}

tool: D142: 1.915

tool: {"D81": [0xb7,0x5f,0x3e,0x59,0x31,0x5c,0xed,0x3e]}

tool: {"D76": [0xe3,0x1a,0x9f,0xc9,0xfe,0x79,0x1a,0x3f]}

tool: {"D26": [0x0e,0xf8,0xfc,0x30,0x42,0x78,0x94,0x3f]}

tool: {"D136": [0x1a,0x17,0x0e,0x84,0x64,0x01,0x33,0x3f]}

tool: {"D119": [0xec,0x53,0xa7,0x66,0x83,0x0a,0x06,0x3f]}

tool: {"D18": [0x3f,0x8c,0x10,0x1e,0x6d,0x1c,0x91,0x3f]}

tool: {"D148": [0x01,0xb4,0xf8,0x18,0xdd,0x96,0x80,0x3e]}

tool: {"D170": [0x00,0x00,0x00,0x00,0x00,0x00,0xf0,0x3f]}

tool: {"D203": [0x21,0x07,0x25,0xcc,0xb4,0xfd,0xef,0x3f]}

tool: {"D9": [0x00,0x00,0x00,0xc0,0xf4,0x66,0xa1,0x41]}

tool: D176: 1934.1

tool: D49: 125.04

tool: {"D130": [0x1f,0xba,0xa0,0xbe,0x65,0x4e,0x77,0x3f]}

tool: {"D44": [0xf9,0x4e,0xcc,0x7a,0x31,0x94,0x73,0x3f]}

assistant: ```c
void Sun(double RAD, double T, double T2, double *L, double *M, double *R, double *LAM0) {
  double T3, C, V, E, THETA, OM;
  T3 = T2 * T;
  *L = 280.466 + 36000.8 * T;
  *M = 357.529 + 35999 * T - .0001536 * T2 + T3 / 24490000;
  *M = *M * RAD;
  C = (1.915 - .004817 * T - .000014 * T2) * sin(*M) + (.01999 - .000101 * T) * sin(2 * *M) + .00029 * sin(3 * *M);
  V = *M + C * RAD;
  E = .01671 - .00004204 * T - .0000001236 * T2;
  *R = .99972 / (1 + E * cos(V)) * 145980000;
  THETA = *L + C;
  OM = 125.04 - 1934.1 * T;
  *LAM0 = THETA - .00569 - .00478 * sin(OM * RAD);
}
```