user: 请将以下的汇编代码转换成C语言代码：

```asm
<bessi>:
  endbr64
  push   %rbx
  cvttsd2si %xmm0,%ebx
  sub    $0x20,%rsp
  test   %ebx,%ebx
  je     L154
  cmp    $0x1,%ebx
  je     L120
  pxor   %xmm5,%xmm5
  ucomisd %xmm5,%xmm1
  jp     L104
  movapd %xmm5,%xmm0
  jne    L104
L90:
  add    $0x20,%rsp
  pop    %rbx
  ret
  nopl   0x0(%rax)
L104:
  movq   D32(%rip),%xmm8
  movsd  D61(%rip),%xmm7
  movapd %xmm1,%xmm0
  andpd  %xmm8,%xmm0
  divsd  %xmm0,%xmm7
  pxor   %xmm0,%xmm0
  cvtsi2sd %ebx,%xmm0
  mulsd  D45(%rip),%xmm0
  ucomisd %xmm0,%xmm5
  ja     L50
  sqrtsd %xmm0,%xmm0
L29:
  cvttsd2si %xmm0,%eax
  movapd %xmm5,%xmm6
  add    %ebx,%eax
  add    %eax,%eax
  test   %eax,%eax
  jle    L152
  movsd  D38(%rip),%xmm0
  movsd  D29(%rip),%xmm4
  movapd %xmm5,%xmm3
  movsd  D31(%rip),%xmm9
  jmp    L44
  nopl   0x0(%rax,%rax,1)
L93:
  sub    $0x1,%eax
  je     L143
L100:
  movapd %xmm0,%xmm3
  movapd %xmm2,%xmm0
L44:
  pxor   %xmm2,%xmm2
  cvtsi2sd %eax,%xmm2
  mulsd  %xmm7,%xmm2
  mulsd  %xmm0,%xmm2
  addsd  %xmm3,%xmm2
  movapd %xmm2,%xmm3
  andpd  %xmm8,%xmm3
  comisd %xmm9,%xmm3
  jbe    L5
  mulsd  %xmm4,%xmm6
  mulsd  %xmm4,%xmm2
  mulsd  %xmm4,%xmm0
L5:
  cmp    %eax,%ebx
  jne    L93
  lea    -0x1(%rbx),%eax
  movapd %xmm0,%xmm6
  jmp    L100
  nopw   0x0(%rax,%rax,1)
L152:
  movsd  D38(%rip),%xmm2
L143:
  movapd %xmm1,%xmm0
  mov    $0x1,%eax
  movsd  %xmm2,0x18(%rsp)
  movsd  %xmm6,0x10(%rsp)
  movsd  %xmm1,0x8(%rsp)
  call   <bessi0@plt>
  pxor   %xmm0,%xmm0
  movsd  0x18(%rsp),%xmm2
  movsd  0x8(%rsp),%xmm1
  cvtsi2sd %eax,%xmm0
  pxor   %xmm5,%xmm5
  movsd  0x10(%rsp),%xmm6
  comisd %xmm1,%xmm5
  divsd  %xmm2,%xmm0
  mulsd  %xmm6,%xmm0
  jbe    L90
  and    $0x1,%ebx
  je     L90
  xorpd  D85(%rip),%xmm0
  jmp    L90
  cs nopw 0x0(%rax,%rax,1)
L154:
  movapd %xmm1,%xmm0
  mov    $0x1,%eax
  call   <bessi0@plt>
  pxor   %xmm0,%xmm0
  add    $0x20,%rsp
  cvtsi2sd %eax,%xmm0
  pop    %rbx
  ret
  nopl   0x0(%rax)
L120:
  movapd %xmm1,%xmm0
  mov    $0x1,%eax
  call   <bessi1@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  jmp    L90
L50:
  movsd  %xmm1,0x10(%rsp)
  movsd  %xmm7,0x8(%rsp)
  call   <sqrt@plt>
  movsd  0x10(%rsp),%xmm1
  movsd  0x8(%rsp),%xmm7
  pxor   %xmm5,%xmm5
  movq   D32(%rip),%xmm8
  jmp    L29
```

tool_calls: name: unpack_data
arguments: label: D32
data_type: qword
name: unpack_data
arguments: label: D61
data_type: f64
name: unpack_data
arguments: label: D45
data_type: f64
name: unpack_data
arguments: label: D38
data_type: f64
name: unpack_data
arguments: label: D29
data_type: byte[8]
name: unpack_data
arguments: label: D31
data_type: f64
name: unpack_data
arguments: label: D85
data_type: f32[4]

tool: D32: 9223372036854775807

tool: D61: 2

tool: D45: 40

tool: D38: 1

tool: {"D29": [0xbb,0xbd,0xd7,0xd9,0xdf,0x7c,0xdb,0x3d]}

tool: D31: 10000000000

tool: {"D85": [0.0,-0.0,0.0,0.0]}

assistant: ```c
double bessi(nn, x)
double x;
double nn;
{
  int j, n;
  double bi, bim, bip, tox, ans;
  n = (int)nn;
  if (n == 0)
    return bessi0(x);
  if (n == 1)
    return bessi1(x);
  if (x == 0.0)
    return 0.0;
  else {
    tox = 2.0 / fabs(x);
    bip = ans = 0.0;
    bi = 1.0;
    for (j = 2 * (n + (int)sqrt(40.0 * n)); j > 0; j--) {
      bim = bip + j * tox * bi;
      bip = bi;
      bi = bim;
      if (fabs(bi) > 1.0e10) {
        ans *= 1.0e-10;
        bi *= 1.0e-10;
        bip *= 1.0e-10;
      }
      if (j == n)
        ans = bip;
    }
    ans *= bessi0(x) / bi;
    return x < 0.0 && (n & 1) ? -ans : ans;
  }
}
```