user: Demonstrate the C code that generates the assembly output below:

```asm
<Moon>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0xa0,%rsp
  movsd  %xmm0,-0x38(%rbp)
  movsd  %xmm1,-0x40(%rbp)
  movsd  %xmm2,-0x48(%rbp)
  movsd  %xmm3,-0x50(%rbp)
  movsd  %xmm4,-0x58(%rbp)
  movsd  %xmm5,-0x60(%rbp)
  mov    %rdi,-0x68(%rbp)
  mov    %rsi,-0x70(%rbp)
  mov    %rdx,-0x78(%rbp)
  mov    %rcx,-0x80(%rbp)
  mov    %r8,-0x88(%rbp)
  mov    %r9,-0x90(%rbp)
  movsd  -0x40(%rbp),%xmm0
  mulsd  -0x48(%rbp),%xmm0
  movsd  %xmm0,-0x30(%rbp)
  movsd  -0x40(%rbp),%xmm1
  movsd  D312(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movsd  D290(%rip),%xmm0
  addsd  %xmm1,%xmm0
  movsd  -0x48(%rbp),%xmm2
  movsd  D252(%rip),%xmm1
  mulsd  %xmm2,%xmm1
  subsd  %xmm1,%xmm0
  movsd  -0x30(%rbp),%xmm1
  movsd  D273(%rip),%xmm2
  divsd  %xmm2,%xmm1
  subsd  %xmm1,%xmm0
  mulsd  -0x38(%rbp),%xmm0
  mov    -0x68(%rbp),%rax
  movsd  %xmm0,(%rax)
  movsd  -0x40(%rbp),%xmm1
  movsd  D52(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movsd  D260(%rip),%xmm0
  addsd  %xmm1,%xmm0
  mulsd  -0x38(%rbp),%xmm0
  mov    -0x70(%rbp),%rax
  movsd  %xmm0,(%rax)
  movsd  -0x40(%rbp),%xmm1
  movsd  D169(%rip),%xmm0
  movapd %xmm1,%xmm2
  mulsd  %xmm0,%xmm2
  movsd  D224(%rip),%xmm0
  movapd %xmm0,%xmm1
  subsd  %xmm2,%xmm1
  movsd  -0x48(%rbp),%xmm2
  movsd  D302(%rip),%xmm0
  mulsd  %xmm2,%xmm0
  addsd  %xmm0,%xmm1
  movsd  -0x30(%rbp),%xmm0
  movsd  D123(%rip),%xmm2
  divsd  %xmm2,%xmm0
  addsd  %xmm1,%xmm0
  mulsd  -0x38(%rbp),%xmm0
  mov    -0x78(%rbp),%rax
  movsd  %xmm0,(%rax)
  movsd  -0x40(%rbp),%xmm1
  movsd  D119(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movsd  D223(%rip),%xmm0
  addsd  %xmm0,%xmm1
  movsd  -0x48(%rbp),%xmm2
  movsd  D159(%rip),%xmm0
  mulsd  %xmm2,%xmm0
  addsd  %xmm0,%xmm1
  movsd  -0x30(%rbp),%xmm0
  movsd  D285(%rip),%xmm2
  divsd  %xmm2,%xmm0
  addsd  %xmm1,%xmm0
  movsd  -0x38(%rbp),%xmm1
  mulsd  %xmm1,%xmm0
  movsd  %xmm0,-0x28(%rbp)
  movsd  -0x40(%rbp),%xmm1
  movsd  D97(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movsd  D5(%rip),%xmm0
  addsd  %xmm1,%xmm0
  movsd  -0x48(%rbp),%xmm2
  movsd  D250(%rip),%xmm1
  mulsd  %xmm1,%xmm2
  movapd %xmm0,%xmm1
  subsd  %xmm2,%xmm1
  movsd  -0x30(%rbp),%xmm0
  movsd  D320(%rip),%xmm2
  divsd  %xmm2,%xmm0
  addsd  %xmm1,%xmm0
  addsd  %xmm0,%xmm0
  movsd  -0x38(%rbp),%xmm1
  mulsd  %xmm1,%xmm0
  movsd  %xmm0,-0x20(%rbp)
  mov    -0x28(%rbp),%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movsd  D328(%rip),%xmm1
  mulsd  %xmm1,%xmm0
  movsd  %xmm0,-0x98(%rbp)
  movsd  -0x20(%rbp),%xmm0
  movapd %xmm0,%xmm3
  subsd  -0x28(%rbp),%xmm3
  movq   %xmm3,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movsd  D242(%rip),%xmm1
  mulsd  %xmm1,%xmm0
  movsd  -0x98(%rbp),%xmm6
  subsd  %xmm0,%xmm6
  movsd  %xmm6,-0x98(%rbp)
  mov    -0x20(%rbp),%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movsd  D14(%rip),%xmm1
  mulsd  %xmm0,%xmm1
  movsd  -0x98(%rbp),%xmm0
  subsd  %xmm1,%xmm0
  movsd  %xmm0,-0x18(%rbp)
  movsd  -0x18(%rbp),%xmm1
  movsd  D218(%rip),%xmm0
  addsd  %xmm1,%xmm0
  mov    -0x90(%rbp),%rax
  movsd  %xmm0,(%rax)
  mov    -0x68(%rbp),%rax
  mov    (%rax),%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movsd  D35(%rip),%xmm1
  mulsd  %xmm1,%xmm0
  movsd  %xmm0,-0x98(%rbp)
  mov    -0x68(%rbp),%rax
  movsd  (%rax),%xmm0
  movapd %xmm0,%xmm5
  addsd  -0x28(%rbp),%xmm5
  movq   %xmm5,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movsd  D233(%rip),%xmm1
  mulsd  %xmm1,%xmm0
  movapd %xmm0,%xmm6
  addsd  -0x98(%rbp),%xmm6
  movsd  %xmm6,-0x98(%rbp)
  mov    -0x68(%rbp),%rax
  movsd  (%rax),%xmm1
  movsd  -0x28(%rbp),%xmm0
  subsd  %xmm1,%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movsd  D308(%rip),%xmm1
  mulsd  %xmm1,%xmm0
  addsd  -0x98(%rbp),%xmm0
  movsd  %xmm0,-0x98(%rbp)
  mov    -0x68(%rbp),%rax
  movsd  (%rax),%xmm1
  movsd  -0x20(%rbp),%xmm0
  movapd %xmm0,%xmm7
  subsd  %xmm1,%xmm7
  movq   %xmm7,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movsd  D137(%rip),%xmm1
  mulsd  %xmm1,%xmm0
  addsd  -0x98(%rbp),%xmm0
  mov    -0x88(%rbp),%rax
  movsd  %xmm0,(%rax)
  mov    -0x28(%rbp),%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movsd  D133(%rip),%xmm1
  mulsd  %xmm1,%xmm0
  movsd  %xmm0,-0x98(%rbp)
  movsd  -0x20(%rbp),%xmm0
  movapd %xmm0,%xmm5
  subsd  -0x28(%rbp),%xmm5
  movq   %xmm5,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movsd  D9(%rip),%xmm1
  mulsd  %xmm1,%xmm0
  movapd %xmm0,%xmm4
  addsd  -0x98(%rbp),%xmm4
  movsd  %xmm4,-0x98(%rbp)
  mov    -0x20(%rbp),%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movsd  D225(%rip),%xmm1
  mulsd  %xmm1,%xmm0
  addsd  -0x98(%rbp),%xmm0
  movsd  %xmm0,-0x98(%rbp)
  movsd  -0x28(%rbp),%xmm0
  movapd %xmm0,%xmm7
  addsd  %xmm0,%xmm7
  movq   %xmm7,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movsd  D130(%rip),%xmm1
  mulsd  %xmm1,%xmm0
  addsd  -0x98(%rbp),%xmm0
  movsd  %xmm0,-0x98(%rbp)
  mov    -0x60(%rbp),%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movsd  D2(%rip),%xmm1
  mulsd  %xmm1,%xmm0
  movsd  -0x98(%rbp),%xmm7
  subsd  %xmm0,%xmm7
  movsd  %xmm7,-0x98(%rbp)
  mov    -0x68(%rbp),%rax
  movsd  (%rax),%xmm0
  movapd %xmm0,%xmm5
  addsd  %xmm0,%xmm5
  movq   %xmm5,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movsd  D188(%rip),%xmm1
  mulsd  %xmm0,%xmm1
  movsd  -0x98(%rbp),%xmm0
  subsd  %xmm1,%xmm0
  movsd  %xmm0,-0x10(%rbp)
  mov    -0x70(%rbp),%rax
  movsd  (%rax),%xmm1
  movsd  -0x10(%rbp),%xmm0
  mulsd  -0x38(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  mov    -0x80(%rbp),%rax
  movsd  %xmm0,(%rax)
  mov    -0x90(%rbp),%rax
  movsd  (%rax),%xmm0
  divsd  -0x58(%rbp),%xmm0
  movsd  %xmm0,-0x8(%rbp)
  movsd  -0x50(%rbp),%xmm1
  movsd  D161(%rip),%xmm0
  addsd  %xmm0,%xmm1
  movsd  %xmm1,-0x98(%rbp)
  mov    -0x88(%rbp),%rax
  mov    (%rax),%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movq   %xmm0,%rax
  movq   %rax,%xmm3
  mulsd  -0x8(%rbp),%xmm3
  movsd  %xmm3,-0xa0(%rbp)
  movsd  -0x50(%rbp),%xmm0
  mulsd  -0x38(%rbp),%xmm0
  mov    -0x80(%rbp),%rax
  movsd  (%rax),%xmm1
  subsd  %xmm1,%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  mulsd  -0xa0(%rbp),%xmm0
  divsd  -0x38(%rbp),%xmm0
  addsd  -0x98(%rbp),%xmm0
  mulsd  -0x38(%rbp),%xmm0
  mov    0x10(%rbp),%rax
  movsd  %xmm0,(%rax)
  mov    -0x88(%rbp),%rax
  movsd  (%rax),%xmm0
  mulsd  -0x8(%rbp),%xmm0
  mulsd  -0x38(%rbp),%xmm0
  mov    0x18(%rbp),%rax
  movsd  %xmm0,(%rax)
  nop
  leave
  ret
```

tool_calls: name: disassemble_data
arguments: data_label: D312
type: byte[8]
name: disassemble_data
arguments: data_label: D290
type: f64
name: disassemble_data
arguments: data_label: D252
type: byte[8]
name: disassemble_data
arguments: data_label: D273
type: byte[8]
name: disassemble_data
arguments: data_label: D52
type: f64
name: disassemble_data
arguments: data_label: D260
type: f64
name: disassemble_data
arguments: data_label: D169
type: f64
name: disassemble_data
arguments: data_label: D224
type: f64
name: disassemble_data
arguments: data_label: D302
type: byte[8]
name: disassemble_data
arguments: data_label: D123
type: byte[8]
name: disassemble_data
arguments: data_label: D119
type: byte[8]
name: disassemble_data
arguments: data_label: D223
type: f64
name: disassemble_data
arguments: data_label: D159
type: byte[8]
name: disassemble_data
arguments: data_label: D285
type: byte[8]
name: disassemble_data
arguments: data_label: D97
type: byte[8]
name: disassemble_data
arguments: data_label: D5
type: f64
name: disassemble_data
arguments: data_label: D250
type: byte[8]
name: disassemble_data
arguments: data_label: D320
type: byte[8]
name: disassemble_data
arguments: data_label: D328
type: byte[8]
name: disassemble_data
arguments: data_label: D242
type: byte[8]
name: disassemble_data
arguments: data_label: D14
type: byte[8]
name: disassemble_data
arguments: data_label: D218
type: byte[8]
name: disassemble_data
arguments: data_label: D35
type: f64
name: disassemble_data
arguments: data_label: D233
type: byte[8]
name: disassemble_data
arguments: data_label: D308
type: byte[8]
name: disassemble_data
arguments: data_label: D137
type: byte[8]
name: disassemble_data
arguments: data_label: D133
type: f64
name: disassemble_data
arguments: data_label: D9
type: f64
name: disassemble_data
arguments: data_label: D225
type: byte[8]
name: disassemble_data
arguments: data_label: D130
type: byte[8]
name: disassemble_data
arguments: data_label: D2
type: byte[8]
name: disassemble_data
arguments: data_label: D188
type: byte[8]
name: disassemble_data
arguments: data_label: D161
type: byte[8]

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

tool: D290: 93.2721

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

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

tool: D52: 481268

tool: D260: 218.316

tool: D169: 1934.14

tool: D224: 125.045

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

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

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

tool: D223: 134.963

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

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

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

tool: D5: 297.85

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

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

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

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

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

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

tool: D35: 5.128

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

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

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

tool: D133: 6.289

tool: D9: 1.274

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

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

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

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

tool: {"D161": [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;
}
```