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

```asm
<HO_38>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x108,%rsp
  movsd  %xmm1,(%rsp)
  movsd  D340(%rip),%xmm1
  movsd  %xmm0,0x8(%rsp)
  call   <pow@plt>
  movsd  D378(%rip),%xmm1
  movq   %xmm0,%rbx
  movsd  0x8(%rsp),%xmm0
  call   <pow@plt>
  movsd  D487(%rip),%xmm1
  movsd  %xmm0,0xf8(%rsp)
  movsd  (%rsp),%xmm0
  call   <pow@plt>
  movsd  D22(%rip),%xmm13
  movsd  %xmm0,0x10(%rsp)
  movsd  0x8(%rsp),%xmm0
  movapd %xmm13,%xmm1
  call   <pow@plt>
  movsd  D148(%rip),%xmm1
  movq   %xmm0,%r14
  movsd  (%rsp),%xmm0
  call   <pow@plt>
  movsd  D298(%rip),%xmm1
  movsd  %xmm0,0x18(%rsp)
  movsd  0x8(%rsp),%xmm0
  call   <pow@plt>
  movsd  D131(%rip),%xmm1
  movq   %xmm0,%r15
  movsd  (%rsp),%xmm0
  call   <pow@plt>
  movsd  D36(%rip),%xmm15
  movsd  %xmm0,0x20(%rsp)
  movsd  0x8(%rsp),%xmm0
  movapd %xmm15,%xmm1
  call   <pow@plt>
  movsd  D199(%rip),%xmm1
  movsd  %xmm0,0xf0(%rsp)
  movsd  (%rsp),%xmm0
  call   <pow@plt>
  movsd  D601(%rip),%xmm1
  movsd  %xmm0,0x28(%rsp)
  movsd  0x8(%rsp),%xmm0
  call   <pow@plt>
  movsd  D385(%rip),%xmm1
  movsd  %xmm0,0xe8(%rsp)
  movsd  (%rsp),%xmm0
  call   <pow@plt>
  movsd  D276(%rip),%xmm12
  movsd  %xmm0,0x30(%rsp)
  movsd  0x8(%rsp),%xmm0
  movapd %xmm12,%xmm1
  call   <pow@plt>
  movsd  D350(%rip),%xmm1
  movsd  %xmm0,0xe0(%rsp)
  movsd  (%rsp),%xmm0
  call   <pow@plt>
  movsd  D453(%rip),%xmm1
  movsd  %xmm0,0x38(%rsp)
  movsd  0x8(%rsp),%xmm0
  call   <pow@plt>
  movsd  D488(%rip),%xmm1
  movsd  %xmm0,0xd8(%rsp)
  movsd  (%rsp),%xmm0
  call   <pow@plt>
  movsd  D212(%rip),%xmm3
  movsd  %xmm0,0x40(%rsp)
  movsd  0x8(%rsp),%xmm0
  movapd %xmm3,%xmm1
  call   <pow@plt>
  movsd  D456(%rip),%xmm1
  movsd  %xmm0,0xd0(%rsp)
  movsd  (%rsp),%xmm0
  call   <pow@plt>
  movsd  D438(%rip),%xmm1
  movsd  %xmm0,0x48(%rsp)
  movsd  0x8(%rsp),%xmm0
  call   <pow@plt>
  movsd  D35(%rip),%xmm1
  movsd  %xmm0,0xc8(%rsp)
  movsd  (%rsp),%xmm0
  call   <pow@plt>
  movsd  D4(%rip),%xmm14
  movsd  %xmm0,0x50(%rsp)
  movsd  0x8(%rsp),%xmm0
  movapd %xmm14,%xmm1
  call   <pow@plt>
  movsd  D64(%rip),%xmm1
  movsd  %xmm0,0xc0(%rsp)
  movsd  (%rsp),%xmm0
  call   <pow@plt>
  movsd  D280(%rip),%xmm1
  movsd  %xmm0,0x58(%rsp)
  movsd  0x8(%rsp),%xmm0
  call   <pow@plt>
  mov    D22(%rip),%rax
  movsd  %xmm0,0xb8(%rsp)
  movsd  (%rsp),%xmm0
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  D147(%rip),%xmm13
  movsd  %xmm0,0x60(%rsp)
  movsd  0x8(%rsp),%xmm0
  movapd %xmm13,%xmm1
  call   <pow@plt>
  mov    D36(%rip),%rax
  movq   %xmm0,%rbp
  movsd  (%rsp),%xmm0
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  D527(%rip),%xmm1
  movsd  %xmm0,0x68(%rsp)
  movsd  0x8(%rsp),%xmm0
  call   <pow@plt>
  mov    D276(%rip),%rax
  movsd  %xmm0,0xb0(%rsp)
  movsd  (%rsp),%xmm0
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  D482(%rip),%xmm12
  movsd  %xmm0,0x70(%rsp)
  movsd  0x8(%rsp),%xmm0
  movapd %xmm12,%xmm1
  call   <pow@plt>
  mov    D212(%rip),%rax
  movq   %xmm0,%r12
  movsd  (%rsp),%xmm0
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  D505(%rip),%xmm1
  movsd  %xmm0,0x78(%rsp)
  movsd  0x8(%rsp),%xmm0
  call   <pow@plt>
  mov    D4(%rip),%rax
  movsd  %xmm0,0xa8(%rsp)
  movsd  (%rsp),%xmm0
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  D239(%rip),%xmm14
  movsd  %xmm0,0x80(%rsp)
  movsd  0x8(%rsp),%xmm0
  movapd %xmm14,%xmm1
  call   <pow@plt>
  mov    D147(%rip),%rax
  movq   %xmm0,%r13
  movsd  (%rsp),%xmm0
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  D251(%rip),%xmm1
  movsd  %xmm0,0x88(%rsp)
  movsd  0x8(%rsp),%xmm0
  call   <pow@plt>
  mov    D482(%rip),%rax
  movsd  %xmm0,0xa0(%rsp)
  movsd  (%rsp),%xmm0
  movq   %rax,%xmm1
  call   <pow@plt>
  mov    D239(%rip),%rax
  movsd  %xmm0,0x90(%rsp)
  movsd  (%rsp),%xmm0
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  0x8(%rsp),%xmm5
  movsd  (%rsp),%xmm6
  xorpd  D562(%rip),%xmm5
  movsd  %xmm0,0x98(%rsp)
  movapd %xmm5,%xmm0
  mulsd  %xmm6,%xmm0
  mulsd  %xmm6,%xmm0
  mulsd  D338(%rip),%xmm0
  call   <exp@plt>
  movq   %r14,%xmm1
  movsd  0xf8(%rsp),%xmm2
  movsd  0xf0(%rsp),%xmm11
  mulsd  D451(%rip),%xmm2
  movsd  0xe8(%rsp),%xmm10
  mulsd  D406(%rip),%xmm1
  movsd  0xe0(%rsp),%xmm9
  mulsd  0x18(%rsp),%xmm1
  movsd  0xd8(%rsp),%xmm8
  mulsd  0x10(%rsp),%xmm2
  movsd  0xd0(%rsp),%xmm7
  mulsd  D133(%rip),%xmm11
  movsd  0xc8(%rsp),%xmm6
  mulsd  0x28(%rsp),%xmm11
  movsd  0xc0(%rsp),%xmm5
  mulsd  D205(%rip),%xmm10
  movsd  0xb8(%rsp),%xmm4
  mulsd  0x30(%rsp),%xmm10
  subsd  %xmm1,%xmm2
  movq   %r15,%xmm1
  mulsd  D371(%rip),%xmm1
  mulsd  0x20(%rsp),%xmm1
  mulsd  D141(%rip),%xmm9
  mulsd  0x38(%rsp),%xmm9
  mulsd  D318(%rip),%xmm8
  mulsd  0x40(%rsp),%xmm8
  addsd  %xmm1,%xmm2
  mulsd  D61(%rip),%xmm7
  mulsd  0x48(%rsp),%xmm7
  mulsd  D526(%rip),%xmm6
  subsd  %xmm11,%xmm2
  mulsd  0x50(%rsp),%xmm6
  mulsd  D197(%rip),%xmm5
  mulsd  0x58(%rsp),%xmm5
  addsd  %xmm10,%xmm2
  mulsd  D149(%rip),%xmm4
  mulsd  0x60(%rsp),%xmm4
  subsd  %xmm9,%xmm2
  addsd  %xmm8,%xmm2
  movapd %xmm2,%xmm1
  movq   %rbp,%xmm2
  subsd  %xmm7,%xmm1
  mulsd  D561(%rip),%xmm2
  mulsd  0x68(%rsp),%xmm2
  movsd  0xb0(%rsp),%xmm15
  mulsd  D101(%rip),%xmm15
  movsd  0xa8(%rsp),%xmm3
  addsd  %xmm6,%xmm1
  movsd  (%rsp),%xmm6
  mulsd  0x70(%rsp),%xmm15
  mulsd  D549(%rip),%xmm3
  movsd  0xa0(%rsp),%xmm13
  mulsd  0x80(%rsp),%xmm3
  mulsd  D302(%rip),%xmm13
  subsd  %xmm5,%xmm1
  mulsd  0x90(%rsp),%xmm13
  addsd  %xmm4,%xmm1
  movsd  0x8(%rsp),%xmm4
  subsd  %xmm2,%xmm1
  movq   %r12,%xmm2
  mulsd  D463(%rip),%xmm2
  mulsd  0x78(%rsp),%xmm2
  addsd  %xmm15,%xmm1
  subsd  %xmm2,%xmm1
  movq   %r13,%xmm2
  mulsd  D348(%rip),%xmm2
  mulsd  0x88(%rsp),%xmm2
  addsd  %xmm3,%xmm1
  subsd  %xmm2,%xmm1
  movsd  D409(%rip),%xmm2
  mulsd  %xmm4,%xmm2
  addsd  %xmm13,%xmm1
  mulsd  %xmm4,%xmm2
  mulsd  0x98(%rsp),%xmm2
  mulsd  D119(%rip),%xmm4
  subsd  %xmm2,%xmm1
  movapd %xmm4,%xmm2
  mulsd  %xmm6,%xmm2
  mulsd  %xmm6,%xmm2
  addsd  %xmm2,%xmm1
  movq   %rbx,%xmm2
  subsd  D240(%rip),%xmm1
  mulsd  D178(%rip),%xmm2
  mulsd  %xmm2,%xmm1
  mulsd  %xmm1,%xmm0
  mulsd  D152(%rip),%xmm0
  divsd  D58(%rip),%xmm0
  add    $0x108,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
```

tool_calls: name: retrieve_data
arguments: label: D340
data_type: byte[8]
name: retrieve_data
arguments: label: D378
data_type: f64
name: retrieve_data
arguments: label: D487
data_type: f64
name: retrieve_data
arguments: label: D22
data_type: f64
name: retrieve_data
arguments: label: D148
data_type: f64
name: retrieve_data
arguments: label: D298
data_type: f64
name: retrieve_data
arguments: label: D131
data_type: f64
name: retrieve_data
arguments: label: D36
data_type: f64
name: retrieve_data
arguments: label: D199
data_type: f64
name: retrieve_data
arguments: label: D601
data_type: f64
name: retrieve_data
arguments: label: D385
data_type: f64
name: retrieve_data
arguments: label: D276
data_type: f64
name: retrieve_data
arguments: label: D350
data_type: f64
name: retrieve_data
arguments: label: D453
data_type: f64
name: retrieve_data
arguments: label: D488
data_type: f64
name: retrieve_data
arguments: label: D212
data_type: f64
name: retrieve_data
arguments: label: D456
data_type: f64
name: retrieve_data
arguments: label: D438
data_type: f64
name: retrieve_data
arguments: label: D35
data_type: f64
name: retrieve_data
arguments: label: D4
data_type: f64
name: retrieve_data
arguments: label: D64
data_type: f64
name: retrieve_data
arguments: label: D280
data_type: f64
name: retrieve_data
arguments: label: D147
data_type: f64
name: retrieve_data
arguments: label: D527
data_type: f64
name: retrieve_data
arguments: label: D482
data_type: f64
name: retrieve_data
arguments: label: D505
data_type: f64
name: retrieve_data
arguments: label: D239
data_type: f64
name: retrieve_data
arguments: label: D251
data_type: f64
name: retrieve_data
arguments: label: D562
data_type: byte[16]
name: retrieve_data
arguments: label: D338
data_type: byte[8]
name: retrieve_data
arguments: label: D451
data_type: f64
name: retrieve_data
arguments: label: D406
data_type: f64
name: retrieve_data
arguments: label: D133
data_type: f64
name: retrieve_data
arguments: label: D205
data_type: f64
name: retrieve_data
arguments: label: D371
data_type: f64
name: retrieve_data
arguments: label: D141
data_type: f64
name: retrieve_data
arguments: label: D318
data_type: f64
name: retrieve_data
arguments: label: D61
data_type: f64
name: retrieve_data
arguments: label: D526
data_type: f64
name: retrieve_data
arguments: label: D197
data_type: f64
name: retrieve_data
arguments: label: D149
data_type: f64
name: retrieve_data
arguments: label: D561
data_type: f64
name: retrieve_data
arguments: label: D101
data_type: f64
name: retrieve_data
arguments: label: D549
data_type: f64
name: retrieve_data
arguments: label: D302
data_type: f64
name: retrieve_data
arguments: label: D463
data_type: f64
name: retrieve_data
arguments: label: D348
data_type: f64
name: retrieve_data
arguments: label: D409
data_type: f64
name: retrieve_data
arguments: label: D119
data_type: f64
name: retrieve_data
arguments: label: D240
data_type: f64
name: retrieve_data
arguments: label: D178
data_type: byte[8]
name: retrieve_data
arguments: label: D152
data_type: byte[8]
name: retrieve_data
arguments: label: D58
data_type: f64

tool: {"D340": [0x00,0x00,0x00,0x00,0x00,0x00,0xd0,0x3f]}

tool: D378: 19

tool: D487: 38

tool: D22: 18

tool: D148: 36

tool: D298: 17

tool: D131: 34

tool: D36: 16

tool: D199: 32

tool: D601: 15

tool: D385: 30

tool: D276: 14

tool: D350: 28

tool: D453: 13

tool: D488: 26

tool: D212: 12

tool: D456: 24

tool: D438: 11

tool: D35: 22

tool: D4: 10

tool: D64: 20

tool: D280: 9

tool: D147: 8

tool: D527: 7

tool: D482: 6

tool: D505: 5

tool: D239: 4

tool: D251: 3

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

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

tool: D451: 524288

tool: D406: 184287232

tool: D133: 2713859850240

tool: D205: 168259310714880

tool: D371: 29025239040

tool: D141: 7319280016097280.0

tool: D318: 2.3055732050706432e+17

tool: D61: 5.352223511771136e+18

tool: D526: 9.23258555780521e+19

tool: D197: 1.1848484799183352e+21

tool: D149: 1.1256060559224184e+22

tool: D561: 7.828078479824093e+22

tool: D101: 3.914039239912046e+23

tool: D549: 3.229082372927438e+24

tool: D302: 4.2381706144672625e+24

tool: D463: 1.369913733969216e+24

tool: D348: 4.843623559391157e+24

tool: D409: 1.8697811534414392e+24

tool: D119: 3.116301922402399e+23

tool: D240: 8.200794532637892e+21

tool: {"D178": [0x59,0x5d,0xe4,0x82,0x15,0x5c,0xd2,0x40]}

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

tool: D58: 4.299578163927655e+26

assistant: ```c
double HO_38(const double a, const double x) {
  double retval = sqrt(0.353452638e9) * pow(a, 0.1e1 / 0.4e1) * (0.524288e6 * pow(a, 0.19e2) * pow(x, 0.38e2) - 0.184287232e9 * pow(a, 0.18e2) * pow(x, 0.36e2) + 0.29025239040e11 * pow(a, 0.17e2) * pow(x, 0.34e2) - 0.2713859850240e13 * pow(a, 0.16e2) * pow(x, 0.32e2) + 0.168259310714880e15 * pow(a, 0.15e2) * pow(x, 0.30e2) - 0.7319280016097280e16 * pow(a, 0.14e2) * pow(x, 0.28e2) + 0.230557320507064320e18 * pow(a, 0.13e2) * pow(x, 0.26e2) - 0.5352223511771136000e19 * pow(a, 0.12e2) * pow(x, 0.24e2) + 0.92325855578052096000e20 * pow(a, 0.11e2) * pow(x, 0.22e2) - 0.1184848479918335232000e22 * pow(a, 0.10e2) * pow(x, 0.20e2) + 0.11256060559224184704000e23 * pow(a, 0.9e1) * pow(x, 0.18e2) - 0.78280784798240920896000e23 * pow(a, 0.8e1) * pow(x, 0.16e2) + 0.391403923991204604480000e24 * pow(a, 0.7e1) * pow(x, 0.14e2) - 0.1369913733969216115680000e25 * pow(a, 0.6e1) * pow(x, 0.12e2) + 0.3229082372927437986960000e25 * pow(a, 0.5e1) * pow(x, 0.10e2) - 0.4843623559391156980440000e25 * pow(a, 0.4e1) * pow(x, 0.8e1) + 0.4238170614467262357885000e25 * pow(a, 0.3e1) * pow(x, 0.6e1) - 0.1869781153441439275537500e25 * a * a * pow(x, 0.4e1) + 0.311630192240239879256250e24 * a * x * x - 0.8200794532637891559375e22) * exp(-a * x * x / 0.2e1) * pow(0.3141592654e1, -0.1e1 / 0.4e1) / 0.429957816392765488988160000e27;
  return retval;
}
```