user: Converte this assembly snippet into its equivalent C code:

```asm
<bessi0>:
  endbr64
  sub    $0x18,%rsp
  movss  %xmm0,(%rsp)
  call   <fabs@plt>
  movsd  D58(%rip),%xmm2
  comisd %xmm0,%xmm2
  jbe    L21
  movss  (%rsp),%xmm3
  pxor   %xmm1,%xmm1
  movsd  D100(%rip),%xmm0
  cvtss2sd %xmm3,%xmm1
  divsd  %xmm2,%xmm1
  mulsd  %xmm1,%xmm1
  mulsd  %xmm1,%xmm0
  addsd  D137(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  addsd  D5(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  addsd  D52(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  addsd  D88(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  addsd  D116(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  addsd  D37(%rip),%xmm0
  add    $0x18,%rsp
  cvtsd2ss %xmm0,%xmm0
  ret
  xchg   %ax,%ax
L21:
  divsd  %xmm0,%xmm2
  movsd  %xmm0,(%rsp)
  movsd  %xmm2,0x8(%rsp)
  call   <exp@plt>
  movsd  (%rsp),%xmm1
  movsd  0x8(%rsp),%xmm2
  movapd %xmm0,%xmm3
  pxor   %xmm0,%xmm0
  ucomisd %xmm1,%xmm0
  ja     L6
  sqrtsd %xmm1,%xmm1
L11:
  movsd  D72(%rip),%xmm0
  divsd  %xmm1,%xmm3
  mulsd  %xmm2,%xmm0
  subsd  D50(%rip),%xmm0
  mulsd  %xmm2,%xmm0
  addsd  D96(%rip),%xmm0
  mulsd  %xmm2,%xmm0
  subsd  D2(%rip),%xmm0
  mulsd  %xmm2,%xmm0
  addsd  D59(%rip),%xmm0
  mulsd  %xmm2,%xmm0
  subsd  D56(%rip),%xmm0
  mulsd  %xmm2,%xmm0
  addsd  D131(%rip),%xmm0
  mulsd  %xmm2,%xmm0
  addsd  D113(%rip),%xmm0
  mulsd  %xmm2,%xmm0
  addsd  D70(%rip),%xmm0
  add    $0x18,%rsp
  mulsd  %xmm3,%xmm0
  cvtsd2ss %xmm0,%xmm0
  ret
L6:
  movapd %xmm1,%xmm0
  movsd  %xmm2,0x8(%rsp)
  movsd  %xmm3,(%rsp)
  call   <sqrt@plt>
  movsd  0x8(%rsp),%xmm2
  movsd  (%rsp),%xmm3
  movapd %xmm0,%xmm1
  jmp    L11
```

tool_calls: name: disassemble_data
arguments: data_label: D58
type_guessed: f64
name: disassemble_data
arguments: data_label: D100
type_guessed: byte[8]
name: disassemble_data
arguments: data_label: D137
type_guessed: byte[8]
name: disassemble_data
arguments: data_label: D5
type_guessed: f64
name: disassemble_data
arguments: data_label: D52
type_guessed: f64
name: disassemble_data
arguments: data_label: D88
type_guessed: f64
name: disassemble_data
arguments: data_label: D116
type_guessed: f64
name: disassemble_data
arguments: data_label: D37
type_guessed: f64
name: disassemble_data
arguments: data_label: D72
type_guessed: byte[8]
name: disassemble_data
arguments: data_label: D50
type_guessed: byte[8]
name: disassemble_data
arguments: data_label: D96
type_guessed: byte[8]
name: disassemble_data
arguments: data_label: D2
type_guessed: byte[8]
name: disassemble_data
arguments: data_label: D59
type_guessed: byte[8]
name: disassemble_data
arguments: data_label: D56
type_guessed: byte[8]
name: disassemble_data
arguments: data_label: D131
type_guessed: byte[8]
name: disassemble_data
arguments: data_label: D113
type_guessed: byte[8]
name: disassemble_data
arguments: data_label: D70
type_guessed: f64

tool: D58: 3.75

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

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

tool: D5: 0.2659732

tool: D52: 1.2067492

tool: D88: 3.0899424

tool: D116: 3.5156229

tool: D37: 1

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

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

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

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

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

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

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

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

tool: D70: 0.39894228

assistant: ```c
float bessi0(float x) {
  double ax = fabs(x);
  if (ax < 3.75) {
    double y = x / 3.75;
    y = y * y;
    return 1.0 + y * (3.5156229 + y * (3.0899424 + y * (1.2067492 + y * (0.2659732 + y * (0.360768e-1 + y * 0.45813e-2)))));
  } else {
    double y = 3.75 / ax;
    return (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))))))));
  }
}
```