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

```asm
<Moon>:
  endbr64
  push   %r15
  movapd %xmm0,%xmm6
  movapd %xmm1,%xmm7
  push   %r14
  mulsd  %xmm2,%xmm7
  mov    %rdi,%r14
  push   %r13
  push   %r12
  mov    %rsi,%r12
  push   %rbp
  mov    %r9,%rbp
  push   %rbx
  mov    %r8,%rbx
  sub    $0x78,%rsp
  movsd  D168(%rip),%xmm0
  movsd  %xmm5,0x58(%rsp)
  lea    0x68(%rsp),%r15
  lea    0x60(%rsp),%r13
  movsd  D203(%rip),%xmm5
  mulsd  %xmm1,%xmm0
  movsd  %xmm3,0x10(%rsp)
  movapd %xmm7,%xmm3
  divsd  D282(%rip),%xmm3
  mulsd  %xmm2,%xmm5
  addsd  D246(%rip),%xmm0
  mov    %rcx,0x50(%rsp)
  movsd  %xmm4,0x18(%rsp)
  movsd  %xmm1,0x38(%rsp)
  movsd  %xmm2,0x30(%rsp)
  movsd  %xmm7,0x20(%rsp)
  subsd  %xmm5,%xmm0
  movapd %xmm7,%xmm5
  divsd  D132(%rip),%xmm5
  movsd  %xmm6,0x8(%rsp)
  subsd  %xmm5,%xmm0
  movsd  D86(%rip),%xmm5
  mulsd  %xmm1,%xmm5
  mulsd  %xmm6,%xmm0
  movsd  %xmm0,(%rdi)
  movsd  D217(%rip),%xmm0
  mov    %r15,%rdi
  mulsd  %xmm1,%xmm0
  addsd  D219(%rip),%xmm0
  mulsd  %xmm6,%xmm0
  movsd  %xmm0,(%rsi)
  movsd  D145(%rip),%xmm0
  mov    %r13,%rsi
  subsd  %xmm5,%xmm0
  movsd  D157(%rip),%xmm5
  mulsd  %xmm2,%xmm5
  addsd  %xmm5,%xmm0
  movapd %xmm2,%xmm5
  mulsd  D162(%rip),%xmm5
  addsd  %xmm3,%xmm0
  movapd %xmm7,%xmm3
  divsd  D259(%rip),%xmm3
  mulsd  %xmm6,%xmm0
  movsd  %xmm0,(%rdx)
  movapd %xmm1,%xmm0
  mulsd  D151(%rip),%xmm0
  addsd  D319(%rip),%xmm0
  addsd  %xmm5,%xmm0
  addsd  %xmm3,%xmm0
  mulsd  %xmm6,%xmm0
  movsd  %xmm0,(%rsp)
  call   <sincos@plt>
  movsd  0x38(%rsp),%xmm1
  mov    %r13,%rsi
  movsd  0x30(%rsp),%xmm2
  movsd  0x20(%rsp),%xmm7
  mulsd  D286(%rip),%xmm1
  divsd  D177(%rip),%xmm7
  mov    %r15,%rdi
  mulsd  D226(%rip),%xmm2
  movsd  D88(%rip),%xmm0
  movsd  0x8(%rsp),%xmm6
  movsd  0x68(%rsp),%xmm3
  movsd  0x60(%rsp),%xmm4
  movsd  %xmm3,0x48(%rsp)
  addsd  %xmm1,%xmm0
  movsd  %xmm4,0x28(%rsp)
  movsd  %xmm6,0x40(%rsp)
  subsd  %xmm2,%xmm0
  addsd  %xmm7,%xmm0
  addsd  %xmm0,%xmm0
  movapd %xmm0,%xmm1
  mulsd  %xmm6,%xmm1
  movapd %xmm1,%xmm0
  movsd  %xmm1,0x20(%rsp)
  call   <sincos@plt>
  movsd  0x20(%rsp),%xmm1
  mov    %r13,%rsi
  mov    %r15,%rdi
  movsd  0x60(%rsp),%xmm2
  movsd  0x68(%rsp),%xmm7
  movapd %xmm1,%xmm6
  subsd  (%rsp),%xmm6
  movsd  %xmm1,0x30(%rsp)
  movsd  %xmm2,0x8(%rsp)
  movsd  %xmm7,0x38(%rsp)
  movapd %xmm6,%xmm0
  call   <sincos@plt>
  movsd  0x28(%rsp),%xmm4
  movsd  D77(%rip),%xmm0
  mulsd  D160(%rip),%xmm4
  movsd  0x8(%rsp),%xmm2
  mulsd  0x60(%rsp),%xmm0
  mulsd  D310(%rip),%xmm2
  subsd  %xmm0,%xmm4
  subsd  %xmm2,%xmm4
  addsd  D218(%rip),%xmm4
  movsd  %xmm4,0x0(%rbp)
  movsd  (%r14),%xmm7
  movapd %xmm7,%xmm0
  movsd  %xmm7,0x8(%rsp)
  call   <sin@plt>
  movsd  0x8(%rsp),%xmm7
  addsd  (%rsp),%xmm7
  movsd  %xmm0,0x28(%rsp)
  movapd %xmm7,%xmm0
  call   <sin@plt>
  movsd  %xmm0,0x20(%rsp)
  movsd  (%rsp),%xmm0
  subsd  0x8(%rsp),%xmm0
  call   <sin@plt>
  movsd  0x30(%rsp),%xmm1
  subsd  0x8(%rsp),%xmm1
  movq   %xmm0,%r15
  movapd %xmm1,%xmm0
  call   <sin@plt>
  movsd  0x28(%rsp),%xmm2
  movsd  0x20(%rsp),%xmm4
  movq   %r15,%xmm6
  mulsd  D45(%rip),%xmm2
  movapd %xmm0,%xmm8
  movsd  (%rsp),%xmm0
  mulsd  D185(%rip),%xmm4
  mulsd  D131(%rip),%xmm6
  addsd  %xmm0,%xmm0
  mulsd  D265(%rip),%xmm8
  movapd %xmm2,%xmm1
  addsd  %xmm4,%xmm1
  addsd  %xmm6,%xmm1
  addsd  %xmm8,%xmm1
  movsd  %xmm1,(%rbx)
  call   <sin@plt>
  movsd  0x58(%rsp),%xmm5
  movsd  %xmm0,(%rsp)
  movapd %xmm5,%xmm0
  call   <sin@plt>
  movq   %xmm0,%r15
  movsd  (%r14),%xmm0
  addsd  %xmm0,%xmm0
  call   <sin@plt>
  movsd  0x48(%rsp),%xmm3
  movsd  D117(%rip),%xmm1
  movapd %xmm0,%xmm4
  movsd  D71(%rip),%xmm0
  movsd  0x38(%rsp),%xmm7
  mulsd  %xmm3,%xmm1
  movsd  (%rsp),%xmm2
  movsd  0x40(%rsp),%xmm6
  mulsd  0x68(%rsp),%xmm0
  mov    0x50(%rsp),%rax
  mulsd  D39(%rip),%xmm7
  movsd  %xmm6,(%rsp)
  mulsd  D224(%rip),%xmm2
  addsd  %xmm0,%xmm1
  movq   %r15,%xmm0
  mulsd  D144(%rip),%xmm0
  addsd  %xmm7,%xmm1
  addsd  %xmm2,%xmm1
  subsd  %xmm0,%xmm1
  movsd  D70(%rip),%xmm0
  mulsd  %xmm4,%xmm0
  subsd  %xmm0,%xmm1
  mulsd  %xmm6,%xmm1
  addsd  (%r12),%xmm1
  movsd  %xmm1,(%rax)
  movsd  (%rbx),%xmm0
  movsd  0x0(%rbp),%xmm2
  divsd  0x18(%rsp),%xmm2
  movsd  %xmm1,0x20(%rsp)
  movsd  %xmm2,0x8(%rsp)
  call   <cos@plt>
  movsd  (%rsp),%xmm6
  movsd  0x20(%rsp),%xmm1
  movq   %xmm0,%rbp
  movsd  0x10(%rsp),%xmm0
  mulsd  %xmm6,%xmm0
  subsd  %xmm1,%xmm0
  call   <sin@plt>
  movsd  0x8(%rsp),%xmm2
  movq   %rbp,%xmm4
  movsd  (%rsp),%xmm6
  movapd %xmm0,%xmm1
  mov    0xb0(%rsp),%rax
  mulsd  %xmm2,%xmm4
  movapd %xmm4,%xmm0
  mulsd  %xmm1,%xmm0
  movsd  0x10(%rsp),%xmm1
  addsd  D252(%rip),%xmm1
  divsd  %xmm6,%xmm0
  addsd  %xmm1,%xmm0
  mulsd  %xmm6,%xmm0
  movsd  %xmm0,(%rax)
  mulsd  (%rbx),%xmm2
  mov    0xb8(%rsp),%rax
  mulsd  %xmm6,%xmm2
  movsd  %xmm2,(%rax)
  add    $0x78,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
```

tool_calls: name: disassemble_data
arguments: data_tag: D168
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D203
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D282
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D246
datatype: f64
name: disassemble_data
arguments: data_tag: D132
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D86
datatype: f64
name: disassemble_data
arguments: data_tag: D217
datatype: f64
name: disassemble_data
arguments: data_tag: D219
datatype: f64
name: disassemble_data
arguments: data_tag: D145
datatype: f64
name: disassemble_data
arguments: data_tag: D157
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D162
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D259
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D151
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D319
datatype: f64
name: disassemble_data
arguments: data_tag: D286
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D177
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D226
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D88
datatype: f64
name: disassemble_data
arguments: data_tag: D77
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D160
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D310
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D218
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D45
datatype: f64
name: disassemble_data
arguments: data_tag: D185
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D131
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D265
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D117
datatype: f64
name: disassemble_data
arguments: data_tag: D71
datatype: f64
name: disassemble_data
arguments: data_tag: D39
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D224
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D144
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D70
datatype: byte[8]
name: disassemble_data
arguments: data_tag: D252
datatype: byte[8]

tool: {"D168": [0x00,0x00,0x00,0x00,0x08,0x7e,0x1d,0x41]}

tool: {"D203": [0x99,0x4b,0xaa,0xb6,0x9b,0xe0,0x6b,0x3f]}

tool: {"D282": [0x00,0x00,0x00,0x00,0x40,0x77,0x1b,0x41]}

tool: D246: 93.2721

tool: {"D132": [0x00,0x00,0x00,0x00,0xb8,0xe6,0x4a,0x41]}

tool: D86: 1934.14

tool: D217: 481268

tool: D219: 218.316

tool: D145: 125.045

tool: {"D157": [0x98,0xf8,0xa3,0xa8,0x33,0xf7,0x60,0x3f]}

tool: {"D162": [0x2d,0xce,0x18,0xe6,0x04,0x6d,0x82,0x3f]}

tool: {"D259": [0x00,0x00,0x00,0x00,0x40,0x04,0xf1,0x40]}

tool: {"D151": [0x00,0x00,0x00,0x00,0x3c,0x20,0x1d,0x41]}

tool: D319: 134.963

tool: {"D286": [0x00,0x00,0x00,0x00,0x4c,0x2d,0x1b,0x41]}

tool: {"D177": [0x00,0x00,0x00,0x00,0xd8,0xa8,0x20,0x41]}

tool: {"D226": [0xa2,0x97,0x51,0x2c,0xb7,0xb4,0x5a,0x3f]}

tool: D88: 297.85

tool: {"D77": [0x00,0x00,0x00,0x00,0x00,0xe6,0xac,0x40]}

tool: {"D160": [0x00,0x00,0x00,0x00,0x80,0x76,0xd4,0xc0]}

tool: {"D310": [0x00,0x00,0x00,0x00,0x00,0x18,0xa7,0x40]}

tool: {"D218": [0x00,0x00,0x00,0x00,0xa0,0x7f,0x17,0x41]}

tool: D45: 5.128

tool: {"D185": [0x85,0x7c,0xd0,0xb3,0x59,0xf5,0xd1,0x3f]}

tool: {"D131": [0x4b,0x59,0x86,0x38,0xd6,0xc5,0xd1,0x3f]}

tool: {"D265": [0xcf,0x66,0xd5,0xe7,0x6a,0x2b,0xc6,0x3f]}

tool: D117: 6.289

tool: D71: 1.274

tool: {"D39": [0x1b,0x9e,0x5e,0x29,0xcb,0x10,0xe5,0x3f]}

tool: {"D224": [0x10,0x7a,0x36,0xab,0x3e,0x57,0xcb,0x3f]}

tool: {"D144": [0x36,0xab,0x3e,0x57,0x5b,0xb1,0xc7,0x3f]}

tool: {"D70": [0xfb,0xcb,0xee,0xc9,0xc3,0x42,0xbd,0x3f]}

tool: {"D252": [0x00,0x00,0x00,0x00,0x00,0x80,0x66,0x40]}

assistant: ```c
void Moon(double RAD, double T, double T2, double LAM0, double R, double M, double *F, double *L1, double *OM, double *LAM, double *B, double *DR, double *LAMH, double *BH) {
  double T3, M1, D2, SUMR, SUML, DIST;
  T3 = T * T2;
  *F = (93.2721 + 483202 * T - .003403 * T2 - T3 / 3526000) * RAD;
  *L1 = (218.316 + 481268. * T) * RAD;
  *OM = (125.045 - 1934.14 * T + .002071 * T2 + T3 / 450000) * RAD;
  M1 = (134.963 + 477199 * T + .008997 * T2 + T3 / 69700) * RAD;
  D2 = (297.85 + 445267 * T - .00163 * T2 + T3 / 545900) * 2 * RAD;
  SUMR = -20954 * cos(M1) - 3699 * cos(D2 - M1) - 2956 * cos(D2);
  *DR = 385000 + SUMR;
  *B = 5.128 * sin(*F) + .2806 * sin(M1 + *F) + .2777 * sin(M1 - *F) + .1732 * sin(D2 - *F);
  SUML = 6.289 * sin(M1) + 1.274 * sin(D2 - M1) + .6583 * sin(D2) + .2136 * sin(2 * M1) - .1851 * sin(M) - .1143 * sin(2 * *F);
  *LAM = *L1 + SUML * RAD;
  DIST = *DR / R;
  *LAMH = (LAM0 + 180 + DIST * cos(*B) * sin(LAM0 * RAD - *LAM) / RAD) * RAD;
  *BH = DIST * *B * RAD;
}
```