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

```asm
<sncndn>:
  endbr64
  push   %r15
  pxor   %xmm6,%xmm6
  push   %r14
  mov    %rdx,%r14
  push   %r13
  push   %r12
  push   %rbp
  mov    %rdi,%rbp
  push   %rbx
  sub    $0xb8,%rsp
  mov    %rsi,0x20(%rsp)
  movss  %xmm0,0x1c(%rsp)
  movss  %xmm1,0x18(%rsp)
  mov    %fs:0x28,%rax
  mov    %rax,0xa8(%rsp)
  xor    %eax,%eax
  ucomiss %xmm6,%xmm1
  jp     L51
  je     L40
L51:
  pxor   %xmm7,%xmm7
  comiss 0x18(%rsp),%xmm7
  ja     L125
  movss  D79(%rip),%xmm6
  movss  0x18(%rsp),%xmm1
  movss  %xmm6,0x28(%rsp)
L240:
  movss  0x28(%rsp),%xmm5
  mov    $0x1,%r15d
  lea    0x30(%rsp),%r13
  lea    0x70(%rsp),%r12
  movss  %xmm5,(%r14)
  movss  %xmm5,0xc(%rsp)
  nopw   0x0(%rax,%rax,1)
L210:
  movss  0xc(%rsp),%xmm4
  movaps %xmm1,%xmm0
  mov    %r15d,%ebx
  movss  %xmm4,0x0(%r13,%r15,4)
  call   <sqrt@plt>
  movss  0xc(%rsp),%xmm2
  pxor   %xmm1,%xmm1
  cvtsd2ss %xmm0,%xmm1
  movaps %xmm1,%xmm0
  movss  %xmm1,(%r12,%r15,4)
  addss  %xmm2,%xmm0
  mulss  D23(%rip),%xmm0
  movss  %xmm2,0x10(%rsp)
  movss  %xmm1,0x14(%rsp)
  movss  %xmm0,0xc(%rsp)
  movaps %xmm2,%xmm0
  subss  %xmm1,%xmm0
  call   <fabs@plt>
  movss  0x10(%rsp),%xmm2
  movapd %xmm0,%xmm3
  pxor   %xmm0,%xmm0
  cvtss2sd %xmm2,%xmm0
  mulsd  D48(%rip),%xmm0
  comisd %xmm3,%xmm0
  jae    L161
  movss  0x14(%rsp),%xmm1
  add    $0x1,%r15
  mulss  %xmm2,%xmm1
  cmp    $0xe,%r15
  jne    L210
L161:
  movss  0x1c(%rsp),%xmm1
  mulss  0xc(%rsp),%xmm1
  movaps %xmm1,%xmm0
  movss  %xmm1,0x10(%rsp)
  call   <sin@plt>
  movss  0x10(%rsp),%xmm1
  movss  %xmm0,0x0(%rbp)
  movaps %xmm1,%xmm0
  call   <cos@plt>
  mov    0x20(%rsp),%rax
  pxor   %xmm7,%xmm7
  movss  %xmm0,(%rax)
  movss  0x0(%rbp),%xmm1
  ucomiss %xmm7,%xmm1
  jp     L36
  je     L95
L36:
  divss  %xmm1,%xmm0
  movss  0xc(%rsp),%xmm1
  movslq %ebx,%rax
  movss  0x30(%rsp,%rax,4),%xmm3
  movss  0x70(%rsp,%rax,4),%xmm2
  mov    %ebx,%eax
  mulss  %xmm0,%xmm1
  mulss  %xmm1,%xmm0
  mulss  (%r14),%xmm1
  addss  %xmm0,%xmm2
  addss  %xmm3,%xmm0
  divss  %xmm0,%xmm2
  movaps %xmm1,%xmm0
  divss  %xmm3,%xmm0
  sub    $0x1,%eax
  je     L101
  mulss  %xmm1,%xmm0
  cltq
  movss  0x30(%rsp,%rax,4),%xmm3
  mulss  %xmm2,%xmm1
  movss  0x70(%rsp,%rax,4),%xmm2
  mov    %ebx,%eax
  addss  %xmm0,%xmm2
  addss  %xmm3,%xmm0
  divss  %xmm0,%xmm2
  movaps %xmm1,%xmm0
  divss  %xmm3,%xmm0
  sub    $0x2,%eax
  je     L101
  mulss  %xmm1,%xmm0
  cltq
  movss  0x30(%rsp,%rax,4),%xmm3
  mulss  %xmm2,%xmm1
  movss  0x70(%rsp,%rax,4),%xmm2
  mov    %ebx,%eax
  addss  %xmm0,%xmm2
  addss  %xmm3,%xmm0
  divss  %xmm0,%xmm2
  movaps %xmm1,%xmm0
  divss  %xmm3,%xmm0
  sub    $0x3,%eax
  je     L101
  mulss  %xmm1,%xmm0
  cltq
  movss  0x30(%rsp,%rax,4),%xmm3
  mulss  %xmm2,%xmm1
  movss  0x70(%rsp,%rax,4),%xmm2
  mov    %ebx,%eax
  addss  %xmm0,%xmm2
  addss  %xmm3,%xmm0
  divss  %xmm0,%xmm2
  movaps %xmm1,%xmm0
  divss  %xmm3,%xmm0
  sub    $0x4,%eax
  je     L101
  mulss  %xmm1,%xmm0
  cltq
  movss  0x30(%rsp,%rax,4),%xmm3
  mulss  %xmm2,%xmm1
  movss  0x70(%rsp,%rax,4),%xmm2
  mov    %ebx,%eax
  addss  %xmm0,%xmm2
  addss  %xmm3,%xmm0
  divss  %xmm0,%xmm2
  movaps %xmm1,%xmm0
  divss  %xmm3,%xmm0
  sub    $0x5,%eax
  je     L101
  mulss  %xmm1,%xmm0
  cltq
  movss  0x30(%rsp,%rax,4),%xmm3
  mulss  %xmm2,%xmm1
  movss  0x70(%rsp,%rax,4),%xmm2
  mov    %ebx,%eax
  addss  %xmm0,%xmm2
  addss  %xmm3,%xmm0
  divss  %xmm0,%xmm2
  movaps %xmm1,%xmm0
  divss  %xmm3,%xmm0
  sub    $0x6,%eax
  je     L101
  mulss  %xmm1,%xmm0
  cltq
  movss  0x30(%rsp,%rax,4),%xmm3
  mulss  %xmm2,%xmm1
  movss  0x70(%rsp,%rax,4),%xmm2
  mov    %ebx,%eax
  addss  %xmm0,%xmm2
  addss  %xmm3,%xmm0
  divss  %xmm0,%xmm2
  movaps %xmm1,%xmm0
  divss  %xmm3,%xmm0
  sub    $0x7,%eax
  je     L101
  mulss  %xmm1,%xmm0
  cltq
  movss  0x30(%rsp,%rax,4),%xmm3
  mulss  %xmm2,%xmm1
  movss  0x70(%rsp,%rax,4),%xmm2
  mov    %ebx,%eax
  addss  %xmm0,%xmm2
  addss  %xmm3,%xmm0
  divss  %xmm0,%xmm2
  movaps %xmm1,%xmm0
  divss  %xmm3,%xmm0
  sub    $0x8,%eax
  je     L101
  mulss  %xmm1,%xmm0
  cltq
  movss  0x30(%rsp,%rax,4),%xmm3
  mulss  %xmm2,%xmm1
  movss  0x70(%rsp,%rax,4),%xmm2
  mov    %ebx,%eax
  addss  %xmm0,%xmm2
  addss  %xmm3,%xmm0
  divss  %xmm0,%xmm2
  movaps %xmm1,%xmm0
  divss  %xmm3,%xmm0
  sub    $0x9,%eax
  je     L101
  mulss  %xmm1,%xmm0
  cltq
  movss  0x30(%rsp,%rax,4),%xmm3
  mulss  %xmm2,%xmm1
  movss  0x70(%rsp,%rax,4),%xmm2
  mov    %ebx,%eax
  addss  %xmm0,%xmm2
  addss  %xmm3,%xmm0
  divss  %xmm0,%xmm2
  movaps %xmm1,%xmm0
  divss  %xmm3,%xmm0
  sub    $0xa,%eax
  je     L101
  mulss  %xmm1,%xmm0
  cltq
  movss  0x30(%rsp,%rax,4),%xmm3
  mulss  %xmm2,%xmm1
  movss  0x70(%rsp,%rax,4),%xmm2
  mov    %ebx,%eax
  addss  %xmm0,%xmm2
  addss  %xmm3,%xmm0
  divss  %xmm0,%xmm2
  movaps %xmm1,%xmm0
  divss  %xmm3,%xmm0
  sub    $0xb,%eax
  je     L101
  mulss  %xmm1,%xmm0
  cltq
  mulss  %xmm2,%xmm1
  movss  0x30(%rsp,%rax,4),%xmm3
  movss  0x70(%rsp,%rax,4),%xmm2
  addss  %xmm0,%xmm2
  addss  %xmm3,%xmm0
  divss  %xmm0,%xmm2
  movaps %xmm1,%xmm0
  divss  %xmm3,%xmm0
  cmp    $0xc,%ebx
  je     L101
  mulss  %xmm1,%xmm0
  mulss  %xmm2,%xmm1
  movss  0x74(%rsp),%xmm2
  addss  %xmm0,%xmm2
  addss  0x34(%rsp),%xmm0
  divss  %xmm0,%xmm2
L101:
  movaps %xmm1,%xmm0
  movss  %xmm2,(%r14)
  mulss  %xmm1,%xmm0
  movss  %xmm1,0xc(%rsp)
  addss  0x28(%rsp),%xmm0
  call   <sqrt@plt>
  pxor   %xmm5,%xmm5
  movss  0xc(%rsp),%xmm1
  movapd %xmm0,%xmm2
  movsd  D9(%rip),%xmm0
  divsd  %xmm2,%xmm0
  movss  0x0(%rbp),%xmm2
  comiss %xmm5,%xmm2
  cvtsd2ss %xmm0,%xmm0
  jb     L150
L33:
  movss  %xmm0,0x0(%rbp)
  mulss  %xmm1,%xmm0
  mov    0x20(%rsp),%rax
  movss  %xmm0,(%rax)
L95:
  pxor   %xmm6,%xmm6
  comiss 0x18(%rsp),%xmm6
  jbe    L53
  movss  (%r14),%xmm1
  mov    0x20(%rsp),%rax
  movss  %xmm0,(%r14)
  movss  %xmm1,(%rax)
  movss  0x0(%rbp),%xmm0
  divss  0x2c(%rsp),%xmm0
  movss  %xmm0,0x0(%rbp)
L53:
  mov    0xa8(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L89
  add    $0xb8,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  nopl   0x0(%rax,%rax,1)
L40:
  call   <cosh@plt>
  mov    0x20(%rsp),%rax
  movapd %xmm0,%xmm1
  movsd  D9(%rip),%xmm0
  divsd  %xmm1,%xmm0
  cvtsd2ss %xmm0,%xmm0
  movss  %xmm0,(%rax)
  movss  %xmm0,(%r14)
  movss  0x1c(%rsp),%xmm0
  call   <tanh@plt>
  movss  %xmm0,0x0(%rbp)
  jmp    L53
  nopl   0x0(%rax)
L125:
  movss  D79(%rip),%xmm5
  movss  0x18(%rsp),%xmm7
  pxor   %xmm3,%xmm3
  pxor   %xmm1,%xmm1
  movsd  D39(%rip),%xmm0
  movaps %xmm5,%xmm2
  cvtss2sd %xmm7,%xmm1
  movss  %xmm5,0x28(%rsp)
  subss  %xmm7,%xmm2
  cvtss2sd %xmm2,%xmm3
  divsd  %xmm3,%xmm0
  divsd  %xmm0,%xmm1
  movaps %xmm2,%xmm0
  cvtsd2ss %xmm1,%xmm1
  movss  %xmm1,0xc(%rsp)
  call   <sqrt@plt>
  movss  0x1c(%rsp),%xmm6
  pxor   %xmm5,%xmm5
  movss  0xc(%rsp),%xmm1
  cvtsd2ss %xmm0,%xmm5
  movss  %xmm5,0x2c(%rsp)
  mulss  %xmm5,%xmm6
  movss  %xmm6,0x1c(%rsp)
  jmp    L240
  xchg   %ax,%ax
L150:
  xorps  D57(%rip),%xmm0
  jmp    L33
L89:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: unpack_data
arguments: label: D79
data_type: f32
name: unpack_data
arguments: label: D23
data_type: f32
name: unpack_data
arguments: label: D48
data_type: f64
name: unpack_data
arguments: label: D9
data_type: f32[2]
name: unpack_data
arguments: label: D39
data_type: f32[2]
name: unpack_data
arguments: label: D57
data_type: byte[16]

tool: D79: 1

tool: D23: 0.5

tool: D48: 0.0003

tool: {"D9": [0.0,1.875]}

tool: {"D39": [0.0,-1.875]}

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

assistant: ```c
void sncndn(float uu, float emmc, float *sn, float *cn, float *dn) {
  float a, b, c, d, emc, u;
  float em[14], en[14];
  int i, ii, l, bo;
  emc = emmc;
  u = uu;
  if (emc) {
    bo = (emc < 0.0);
    if (bo) {
      d = 1.0 - emc;
      emc /= -1.0 / d;
      u *= (d = sqrt(d));
    }
    a = 1.0;
    *dn = 1.0;
    for (i = 1; i <= 13; i++) {
      l = i;
      em[i] = a;
      en[i] = (emc = sqrt(emc));
      c = 0.5 * (a + emc);
      if (fabs(a - emc) <= 0.0003 * a)
        break;
      emc *= a;
      a = c;
    }
    u *= c;
    *sn = sin(u);
    *cn = cos(u);
    if (*sn) {
      a = (*cn) / (*sn);
      c *= a;
      for (ii = l; ii >= 1; ii--) {
        b = em[ii];
        a *= c;
        c *= (*dn);
        *dn = (en[ii] + a) / (b + a);
        a = c / b;
      }
      a = 1.0 / sqrt(c * c + 1.0);
      *sn = (*sn >= 0.0 ? a : -a);
      *cn = c * (*sn);
    }
    if (bo) {
      a = (*dn);
      *dn = (*cn);
      *cn = a;
      *sn /= d;
    }
  } else {
    *cn = 1.0 / cosh(u);
    *dn = (*cn);
    *sn = tanh(u);
  }
}
```