user: Translate the below assembly code into C programming language:

```asm
<bessi0>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %rbx
  sub    $0x38,%rsp
  movsd  %xmm0,-0x38(%rbp)
  movsd  -0x38(%rbp),%xmm0
  movq   D100(%rip),%xmm1
  andpd  %xmm1,%xmm0
  movsd  %xmm0,-0x20(%rbp)
  movsd  D174(%rip),%xmm0
  comisd -0x20(%rbp),%xmm0
  jbe    L5
  movsd  -0x38(%rbp),%xmm0
  movsd  D174(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movsd  %xmm0,-0x18(%rbp)
  movsd  -0x18(%rbp),%xmm0
  mulsd  %xmm0,%xmm0
  movsd  %xmm0,-0x18(%rbp)
  movsd  -0x18(%rbp),%xmm1
  movsd  D150(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movsd  D136(%rip),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x18(%rbp),%xmm1
  movsd  D168(%rip),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x18(%rbp),%xmm1
  movsd  D164(%rip),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x18(%rbp),%xmm1
  movsd  D41(%rip),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x18(%rbp),%xmm1
  movsd  D28(%rip),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x18(%rbp),%xmm1
  movsd  D60(%rip),%xmm0
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x28(%rbp)
  jmp    L7
L5:
  movsd  D174(%rip),%xmm0
  divsd  -0x20(%rbp),%xmm0
  movsd  %xmm0,-0x18(%rbp)
  mov    -0x20(%rbp),%rax
  movq   %rax,%xmm0
  call   <exp@plt>
  movq   %xmm0,%rbx
  mov    -0x20(%rbp),%rax
  movq   %rax,%xmm0
  call   <sqrt@plt>
  movq   %rbx,%xmm1
  divsd  %xmm0,%xmm1
  movsd  -0x18(%rbp),%xmm2
  movsd  D184(%rip),%xmm0
  mulsd  %xmm2,%xmm0
  movsd  D31(%rip),%xmm2
  subsd  %xmm2,%xmm0
  movapd %xmm0,%xmm2
  mulsd  -0x18(%rbp),%xmm2
  movsd  D106(%rip),%xmm0
  addsd  %xmm2,%xmm0
  mulsd  -0x18(%rbp),%xmm0
  movsd  D137(%rip),%xmm2
  subsd  %xmm2,%xmm0
  movapd %xmm0,%xmm2
  mulsd  -0x18(%rbp),%xmm2
  movsd  D132(%rip),%xmm0
  addsd  %xmm2,%xmm0
  mulsd  -0x18(%rbp),%xmm0
  movsd  D140(%rip),%xmm2
  subsd  %xmm2,%xmm0
  movapd %xmm0,%xmm2
  mulsd  -0x18(%rbp),%xmm2
  movsd  D89(%rip),%xmm0
  addsd  %xmm2,%xmm0
  movapd %xmm0,%xmm2
  mulsd  -0x18(%rbp),%xmm2
  movsd  D24(%rip),%xmm0
  addsd  %xmm2,%xmm0
  movapd %xmm0,%xmm2
  mulsd  -0x18(%rbp),%xmm2
  movsd  D10(%rip),%xmm0
  addsd  %xmm2,%xmm0
  mulsd  %xmm1,%xmm0
  movsd  %xmm0,-0x28(%rbp)
L7:
  movsd  -0x28(%rbp),%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  mov    -0x8(%rbp),%rbx
  leave
  ret
```

tool_calls: name: extract_symbolic_data
arguments: label: D100
type_guessed: qword
name: extract_symbolic_data
arguments: label: D174
type_guessed: f64
name: extract_symbolic_data
arguments: label: D150
type_guessed: byte[8]
name: extract_symbolic_data
arguments: label: D136
type_guessed: byte[8]
name: extract_symbolic_data
arguments: label: D168
type_guessed: f64
name: extract_symbolic_data
arguments: label: D164
type_guessed: f64
name: extract_symbolic_data
arguments: label: D41
type_guessed: f64
name: extract_symbolic_data
arguments: label: D28
type_guessed: f64
name: extract_symbolic_data
arguments: label: D60
type_guessed: f64
name: extract_symbolic_data
arguments: label: D184
type_guessed: byte[8]
name: extract_symbolic_data
arguments: label: D31
type_guessed: byte[8]
name: extract_symbolic_data
arguments: label: D106
type_guessed: byte[8]
name: extract_symbolic_data
arguments: label: D137
type_guessed: byte[8]
name: extract_symbolic_data
arguments: label: D132
type_guessed: byte[8]
name: extract_symbolic_data
arguments: label: D140
type_guessed: byte[8]
name: extract_symbolic_data
arguments: label: D89
type_guessed: byte[8]
name: extract_symbolic_data
arguments: label: D24
type_guessed: byte[8]
name: extract_symbolic_data
arguments: label: D10
type_guessed: f64

tool: D100: 9223372036854775807

tool: D174: 3.75

tool: {"D150": [0x74,0x48,0xc5,0x5a,0xd7,0xc3,0x72,0x3f]}

tool: {"D136": [0xfd,0xe5,0x49,0x88,0xa8,0x78,0xa2,0x3f]}

tool: D168: 0.2659732

tool: D164: 1.2067492

tool: D41: 3.0899424

tool: D28: 3.5156229

tool: D60: 1

tool: {"D184": [0x88,0x7f,0x3b,0xfd,0x5e,0x12,0x70,0x3f]}

tool: {"D31": [0x55,0x4c,0x08,0xca,0x2b,0xdf,0x90,0x3f]}

tool: {"D106": [0xe3,0x5a,0xe5,0xf0,0xe6,0xfc,0x9a,0x3f]}

tool: {"D137": [0x16,0xc7,0xfd,0x1e,0x27,0x12,0x95,0x3f]}

tool: {"D132": [0x54,0xd1,0x50,0x8a,0xf3,0xc3,0x82,0x3f]}

tool: {"D140": [0x4a,0x89,0x13,0x4e,0xc1,0xd0,0x59,0x3f]}

tool: {"D89": [0xdb,0xd5,0x92,0x2b,0x48,0x75,0x62,0x3f]}

tool: {"D24": [0x1c,0x9d,0x2d,0xff,0xa5,0x35,0x8b,0x3f]}

tool: D10: 0.39894228

assistant: ```c
double bessi0(x)
double x;
{
  double ax, ans;
  double y;
  if ((ax = fabs(x)) < 3.75) {
    y = x / 3.75;
    y *= y;
    ans = 1.0 + y * (3.5156229 + y * (3.0899424 + y * (1.2067492 + y * (0.2659732 + y * (0.360768e-1 + y * 0.45813e-2)))));
  } else {
    y = 3.75 / ax;
    ans = (exp(ax) / sqrt(ax)) * (0.39894228 + y * (0.1328592e-1 + y * (0.225319e-2 + y * (-0.157565e-2 + y * (0.916281e-2 + y * (-0.2057706e-1 + y * (0.2635537e-1 + y * (-0.1647633e-1 + y * 0.392377e-2))))))));
  }
  return ans;
}
```