user: What is the c source code of the assembly code below?

```asm
<HO_21>:
  endbr64
  sub    $0xa8,%rsp
  movsd  %xmm1,(%rsp)
  movsd  D251(%rip),%xmm1
  movsd  %xmm0,0x8(%rsp)
  call   <pow@plt>
  movsd  D270(%rip),%xmm3
  movsd  %xmm0,0x98(%rsp)
  movsd  0x8(%rsp),%xmm0
  movapd %xmm3,%xmm1
  call   <pow@plt>
  movsd  D91(%rip),%xmm1
  movsd  %xmm0,0x90(%rsp)
  movsd  (%rsp),%xmm0
  call   <pow@plt>
  movsd  D106(%rip),%xmm1
  movsd  %xmm0,0x10(%rsp)
  movsd  0x8(%rsp),%xmm0
  call   <pow@plt>
  movsd  D102(%rip),%xmm1
  movsd  %xmm0,0x88(%rsp)
  movsd  (%rsp),%xmm0
  call   <pow@plt>
  movsd  D339(%rip),%xmm5
  movsd  %xmm0,0x18(%rsp)
  movsd  0x8(%rsp),%xmm0
  movapd %xmm5,%xmm1
  call   <pow@plt>
  movsd  D316(%rip),%xmm1
  movsd  %xmm0,0x80(%rsp)
  movsd  (%rsp),%xmm0
  call   <pow@plt>
  movsd  D221(%rip),%xmm1
  movsd  %xmm0,0x20(%rsp)
  movsd  0x8(%rsp),%xmm0
  call   <pow@plt>
  movsd  D138(%rip),%xmm1
  movsd  %xmm0,0x78(%rsp)
  movsd  (%rsp),%xmm0
  call   <pow@plt>
  movsd  D99(%rip),%xmm12
  movsd  %xmm0,0x28(%rsp)
  movsd  0x8(%rsp),%xmm0
  movapd %xmm12,%xmm1
  call   <pow@plt>
  movsd  D200(%rip),%xmm1
  movsd  %xmm0,0x70(%rsp)
  movsd  (%rsp),%xmm0
  call   <pow@plt>
  movsd  D248(%rip),%xmm1
  movsd  %xmm0,0x30(%rsp)
  movsd  0x8(%rsp),%xmm0
  call   <pow@plt>
  mov    D270(%rip),%rax
  movsd  %xmm0,0x68(%rsp)
  movsd  (%rsp),%xmm0
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  D322(%rip),%xmm3
  movsd  %xmm0,0x38(%rsp)
  movsd  0x8(%rsp),%xmm0
  movapd %xmm3,%xmm1
  call   <pow@plt>
  mov    D339(%rip),%rax
  movsd  %xmm0,0x60(%rsp)
  movsd  (%rsp),%xmm0
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  D64(%rip),%xmm1
  movsd  %xmm0,0x40(%rsp)
  movsd  0x8(%rsp),%xmm0
  call   <pow@plt>
  mov    D99(%rip),%rax
  movsd  %xmm0,0x58(%rsp)
  movsd  (%rsp),%xmm0
  movq   %rax,%xmm1
  call   <pow@plt>
  mov    D322(%rip),%rax
  movsd  %xmm0,0x48(%rsp)
  movsd  (%rsp),%xmm0
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  0x8(%rsp),%xmm6
  movsd  (%rsp),%xmm7
  xorpd  D275(%rip),%xmm6
  movsd  %xmm0,0x50(%rsp)
  movapd %xmm6,%xmm0
  mulsd  %xmm7,%xmm0
  mulsd  %xmm7,%xmm0
  mulsd  D111(%rip),%xmm0
  call   <exp@plt>
  movsd  D175(%rip),%xmm1
  movsd  0x88(%rsp),%xmm11
  movapd %xmm0,%xmm3
  movsd  0x18(%rsp),%xmm0
  movsd  0x90(%rsp),%xmm2
  mulsd  D336(%rip),%xmm11
  movsd  0x78(%rsp),%xmm9
  mulsd  %xmm2,%xmm1
  movsd  0x70(%rsp),%xmm8
  movsd  0x80(%rsp),%xmm10
  mulsd  0x10(%rsp),%xmm1
  movsd  0x68(%rsp),%xmm7
  mulsd  D243(%rip),%xmm10
  movsd  D53(%rip),%xmm4
  mulsd  D291(%rip),%xmm9
  movsd  0x60(%rsp),%xmm6
  mulsd  %xmm11,%xmm0
  movsd  D58(%rip),%xmm5
  movsd  0x8(%rsp),%xmm2
  mulsd  D167(%rip),%xmm8
  mulsd  %xmm7,%xmm4
  movsd  D242(%rip),%xmm7
  mulsd  %xmm6,%xmm5
  movsd  (%rsp),%xmm6
  mulsd  %xmm2,%xmm7
  subsd  %xmm0,%xmm1
  movsd  0x20(%rsp),%xmm0
  mulsd  %xmm10,%xmm0
  addsd  %xmm0,%xmm1
  movsd  0x28(%rsp),%xmm0
  mulsd  %xmm9,%xmm0
  subsd  %xmm0,%xmm1
  movsd  0x30(%rsp),%xmm0
  mulsd  %xmm8,%xmm0
  addsd  %xmm0,%xmm1
  movsd  0x38(%rsp),%xmm0
  mulsd  %xmm4,%xmm0
  movsd  0x98(%rsp),%xmm4
  mulsd  D23(%rip),%xmm4
  subsd  %xmm0,%xmm1
  movsd  0x40(%rsp),%xmm0
  mulsd  %xmm6,%xmm4
  mulsd  %xmm5,%xmm0
  movsd  0x58(%rsp),%xmm5
  mulsd  D315(%rip),%xmm5
  addsd  %xmm0,%xmm1
  movsd  0x48(%rsp),%xmm0
  mulsd  %xmm5,%xmm0
  subsd  %xmm0,%xmm1
  movapd %xmm7,%xmm0
  mulsd  %xmm2,%xmm0
  mulsd  0x50(%rsp),%xmm0
  mulsd  D338(%rip),%xmm2
  addsd  %xmm1,%xmm0
  movapd %xmm2,%xmm1
  mulsd  %xmm6,%xmm1
  mulsd  %xmm6,%xmm1
  subsd  %xmm1,%xmm0
  addsd  D186(%rip),%xmm0
  mulsd  %xmm4,%xmm0
  mulsd  %xmm3,%xmm0
  mulsd  D227(%rip),%xmm0
  divsd  D16(%rip),%xmm0
  add    $0xa8,%rsp
  ret
```

tool_calls: name: extract_symbolic_data
arguments: data_label: D251
datatype: byte[8]
name: extract_symbolic_data
arguments: data_label: D270
datatype: f64
name: extract_symbolic_data
arguments: data_label: D91
datatype: f64
name: extract_symbolic_data
arguments: data_label: D106
datatype: f64
name: extract_symbolic_data
arguments: data_label: D102
datatype: f64
name: extract_symbolic_data
arguments: data_label: D339
datatype: f64
name: extract_symbolic_data
arguments: data_label: D316
datatype: f64
name: extract_symbolic_data
arguments: data_label: D221
datatype: f64
name: extract_symbolic_data
arguments: data_label: D138
datatype: f64
name: extract_symbolic_data
arguments: data_label: D99
datatype: f64
name: extract_symbolic_data
arguments: data_label: D200
datatype: f64
name: extract_symbolic_data
arguments: data_label: D248
datatype: f64
name: extract_symbolic_data
arguments: data_label: D322
datatype: f64
name: extract_symbolic_data
arguments: data_label: D64
datatype: f64
name: extract_symbolic_data
arguments: data_label: D275
datatype: byte[16]
name: extract_symbolic_data
arguments: data_label: D111
datatype: byte[8]
name: extract_symbolic_data
arguments: data_label: D175
datatype: f64
name: extract_symbolic_data
arguments: data_label: D336
datatype: f64
name: extract_symbolic_data
arguments: data_label: D243
datatype: f64
name: extract_symbolic_data
arguments: data_label: D53
datatype: f64
name: extract_symbolic_data
arguments: data_label: D291
datatype: f64
name: extract_symbolic_data
arguments: data_label: D58
datatype: f64
name: extract_symbolic_data
arguments: data_label: D167
datatype: f64
name: extract_symbolic_data
arguments: data_label: D242
datatype: f64
name: extract_symbolic_data
arguments: data_label: D23
datatype: byte[8]
name: extract_symbolic_data
arguments: data_label: D315
datatype: f64
name: extract_symbolic_data
arguments: data_label: D338
datatype: f64
name: extract_symbolic_data
arguments: data_label: D186
datatype: f64
name: extract_symbolic_data
arguments: data_label: D227
datatype: byte[8]
name: extract_symbolic_data
arguments: data_label: D16
datatype: f64

tool: {"D251": [0x00,0x00,0x00,0x00,0x00,0x00,0xe8,0x3f]}

tool: D270: 10

tool: D91: 20

tool: D106: 9

tool: D102: 18

tool: D339: 8

tool: D316: 16

tool: D221: 7

tool: D138: 14

tool: D99: 6

tool: D200: 12

tool: D248: 5

tool: D322: 4

tool: D64: 3

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

tool: {"D111": [0x00,0x00,0x00,0x00,0x00,0x00,0xe0,0x3f]}

tool: D175: 1024

tool: D336: 107520

tool: D243: 4596480

tool: D53: 10666131840

tool: D291: 104186880

tool: D58: 48886437600

tool: D167: 1367452800

tool: D242: 164991726900

tool: {"D23": [0x9a,0x4a,0x25,0x2b,0x44,0xc3,0x95,0x40]}

tool: D315: 125707982400

tool: D338: 91662070500

tool: D186: 13749310575

tool: {"D227": [0x5f,0xfa,0x11,0x70,0x38,0x09,0xe8,0x3f]}

tool: D16: 7039647014400

assistant: ```c
double HO_21(const double a, const double x) {
  double retval = sqrt(0.1939938e7) * pow(a, 0.3e1 / 0.4e1) * x * (0.1024e4 * pow(a, 0.10e2) * pow(x, 0.20e2) - 0.107520e6 * pow(a, 0.9e1) * pow(x, 0.18e2) + 0.4596480e7 * pow(a, 0.8e1) * pow(x, 0.16e2) - 0.104186880e9 * pow(a, 0.7e1) * pow(x, 0.14e2) + 0.1367452800e10 * pow(a, 0.6e1) * pow(x, 0.12e2) - 0.10666131840e11 * pow(a, 0.5e1) * pow(x, 0.10e2) + 0.48886437600e11 * pow(a, 0.4e1) * pow(x, 0.8e1) - 0.125707982400e12 * pow(a, 0.3e1) * pow(x, 0.6e1) + 0.164991726900e12 * a * a * pow(x, 0.4e1) - 0.91662070500e11 * a * x * x + 0.13749310575e11) * exp(-a * x * x / 0.2e1) * pow(0.3141592654e1, -0.1e1 / 0.4e1) / 0.7039647014400e13;
  return retval;
}
```