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

```asm
<bessi1>:
  endbr64
  push   %rbx
  sub    $0x10,%rsp
  movapd %xmm0,%xmm3
  andpd  D185(%rip),%xmm3
  movsd  %xmm3,(%rsp)
  movsd  D164(%rip),%xmm1
  comisd %xmm3,%xmm1
  jbe    L15
  movapd %xmm0,%xmm2
  divsd  %xmm1,%xmm2
  mulsd  %xmm2,%xmm2
  movapd %xmm2,%xmm1
  mulsd  D159(%rip),%xmm1
  addsd  D116(%rip),%xmm1
  mulsd  %xmm2,%xmm1
  addsd  D137(%rip),%xmm1
  mulsd  %xmm2,%xmm1
  addsd  D75(%rip),%xmm1
  mulsd  %xmm2,%xmm1
  addsd  D45(%rip),%xmm1
  mulsd  %xmm2,%xmm1
  addsd  D143(%rip),%xmm1
  mulsd  %xmm2,%xmm1
  addsd  D38(%rip),%xmm1
  mulsd  %xmm1,%xmm0
L14:
  add    $0x10,%rsp
  pop    %rbx
  ret
L15:
  movsd  D164(%rip),%xmm0
  movsd  (%rsp),%xmm5
  divsd  %xmm5,%xmm0
  movsd  %xmm0,0x8(%rsp)
  movapd %xmm5,%xmm0
  call   <exp@plt>
  movq   %xmm0,%rbx
  pxor   %xmm0,%xmm0
  movsd  (%rsp),%xmm5
  ucomisd %xmm5,%xmm0
  ja     L17
  sqrtsd %xmm5,%xmm5
  movapd %xmm5,%xmm1
L0:
  movsd  0x8(%rsp),%xmm4
  movapd %xmm4,%xmm0
  mulsd  D78(%rip),%xmm0
  addsd  D173(%rip),%xmm0
  mulsd  %xmm4,%xmm0
  subsd  D184(%rip),%xmm0
  mulsd  %xmm4,%xmm0
  addsd  D149(%rip),%xmm0
  mulsd  %xmm4,%xmm0
  subsd  D80(%rip),%xmm0
  mulsd  %xmm4,%xmm0
  addsd  D163(%rip),%xmm0
  mulsd  %xmm4,%xmm0
  subsd  D92(%rip),%xmm0
  mulsd  %xmm4,%xmm0
  subsd  D133(%rip),%xmm0
  mulsd  %xmm4,%xmm0
  addsd  D87(%rip),%xmm0
  movq   %rbx,%xmm2
  divsd  %xmm1,%xmm2
  mulsd  %xmm2,%xmm0
  jmp    L14
L17:
  movsd  (%rsp),%xmm0
  call   <sqrt@plt>
  movapd %xmm0,%xmm1
  jmp    L0
```

tool_calls: name: disassemble_data
arguments: data_label: D185
type: qword[2]
name: disassemble_data
arguments: data_label: D164
type: f64
name: disassemble_data
arguments: data_label: D159
type: byte[8]
name: disassemble_data
arguments: data_label: D116
type: byte[8]
name: disassemble_data
arguments: data_label: D137
type: byte[8]
name: disassemble_data
arguments: data_label: D75
type: f64
name: disassemble_data
arguments: data_label: D45
type: f64
name: disassemble_data
arguments: data_label: D143
type: f64
name: disassemble_data
arguments: data_label: D38
type: f64
name: disassemble_data
arguments: data_label: D78
type: byte[8]
name: disassemble_data
arguments: data_label: D173
type: byte[8]
name: disassemble_data
arguments: data_label: D184
type: byte[8]
name: disassemble_data
arguments: data_label: D149
type: byte[8]
name: disassemble_data
arguments: data_label: D80
type: byte[8]
name: disassemble_data
arguments: data_label: D163
type: byte[8]
name: disassemble_data
arguments: data_label: D92
type: byte[8]
name: disassemble_data
arguments: data_label: D133
type: byte[8]
name: disassemble_data
arguments: data_label: D87
type: f64

tool: {"D185": [0x7fffffffffffffff,0x0000000000000000]}

tool: D164: 3.75

tool: {"D159": [0xd3,0xb0,0xad,0xd9,0xa9,0x3d,0x35,0x3f]}

tool: {"D116": [0x9c,0xe5,0x2e,0x99,0x95,0xb3,0x68,0x3f]}

tool: {"D137": [0x1a,0x12,0x5a,0x83,0xb5,0x39,0x9b,0x3f]}

tool: D75: 0.15084934

tool: D45: 0.51498869

tool: D143: 0.87890594

tool: D38: 0.5

tool: {"D78": [0x3b,0x50,0xc8,0x4a,0xa3,0x34,0x71,0xbf]}

tool: {"D173": [0x71,0x9c,0xa9,0x4a,0x3a,0x4e,0x92,0x3f]}

tool: {"D184": [0x50,0x93,0x11,0xfe,0xe2,0xa5,0x9d,0x3f]}

tool: {"D149": [0xd9,0x27,0x1d,0x38,0xa9,0x60,0x97,0x3f]}

tool: {"D80": [0xdc,0x3c,0x1f,0xaf,0x51,0x20,0x85,0x3f]}

tool: {"D163": [0x96,0x74,0x5a,0xd8,0x4f,0xd6,0x5a,0x3f]}

tool: {"D92": [0x3f,0x8c,0x94,0x56,0x11,0xa8,0x6d,0x3f]}

tool: {"D133": [0xbe,0xfe,0x1c,0xcd,0x2e,0x6b,0xa4,0x3f]}

tool: D87: 0.39894228

assistant: ```c
double bessi1(double x) {
  double ax, ans;
  static double P[7] = {0.5, 0.87890594, 0.51498869, 0.15084934, 0.2658733e-1, 0.301532e-2, 0.32411e-3};
  static double Q[9] = {0.39894228, -0.3988024e-1, -0.362018e-2, 0.163801e-2, -0.1031555e-1, 0.2282967e-1, -0.2895312e-1, 0.1787654e-1, -0.420059e-2};
  double y;
  if ((ax = fabs(x)) < 3.75) {
    y = x / 3.75;
    y *= y;
    ans = x * (P[0] + y * (P[1] + y * (P[2] + y * (P[3] + y * (P[4] + y * (P[5] + y * P[6]))))));
  } else {
    y = 3.75 / ax;
    ans = (exp(ax) / sqrt(ax)) * (Q[0] + y * (Q[1] + y * (Q[2] + y * (Q[3] + y * (Q[4] + y * (Q[5] + y * (Q[6] + y * (Q[7] + y * Q[8]))))))));
  }
  return ans;
}
```