user: What is the c source code of the assembly code below:

```asm
<bioD7_3d>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0x60,%rsp
  mov    %rdi,-0x38(%rbp)
  mov    %rsi,-0x40(%rbp)
  mov    %rdx,-0x48(%rbp)
  mov    %rcx,-0x50(%rbp)
  mov    %r8,-0x58(%rbp)
  mov    %r9,-0x60(%rbp)
  movss  D52(%rip),%xmm0
  movss  %xmm0,-0x14(%rbp)
  movss  D43(%rip),%xmm0
  movss  %xmm0,-0x10(%rbp)
  movss  D67(%rip),%xmm0
  movss  %xmm0,-0xc(%rbp)
  cmpl   $0x1,0x28(%rbp)
  setg   %al
  movzbl %al,%edx
  cmpl   $0x1,0x30(%rbp)
  setg   %al
  movzbl %al,%eax
  add    %eax,%edx
  cmpl   $0x1,0x38(%rbp)
  setg   %al
  movzbl %al,%eax
  add    %edx,%eax
  mov    %eax,-0x8(%rbp)
  cmpl   $0x0,0x40(%rbp)
  je     L74
  movss  -0x14(%rbp),%xmm0
  movss  %xmm0,-0x28(%rbp)
  movss  -0x14(%rbp),%xmm0
  mulss  -0x10(%rbp),%xmm0
  movss  %xmm0,-0x24(%rbp)
  movss  -0x10(%rbp),%xmm0
  mulss  -0xc(%rbp),%xmm0
  movss  %xmm0,-0x20(%rbp)
  movss  D76(%rip),%xmm0
  divss  -0xc(%rbp),%xmm0
  movss  %xmm0,-0x1c(%rbp)
  jmp    L43
L74:
  movss  -0x14(%rbp),%xmm0
  movss  %xmm0,-0x28(%rbp)
  movss  -0x14(%rbp),%xmm0
  mulss  -0x10(%rbp),%xmm0
  movss  %xmm0,-0x24(%rbp)
  movss  D76(%rip),%xmm0
  movss  %xmm0,-0x20(%rbp)
  movss  D76(%rip),%xmm0
  divss  -0x10(%rbp),%xmm0
  movss  %xmm0,-0x1c(%rbp)
L43:
  cmpl   $0x3,-0x8(%rbp)
  jne    L44
  movss  -0x14(%rbp),%xmm0
  mulss  -0x10(%rbp),%xmm0
  movss  %xmm0,-0x18(%rbp)
L44:
  cmpl   $0x2,-0x8(%rbp)
  jne    L34
  movss  D76(%rip),%xmm0
  movss  %xmm0,-0x18(%rbp)
L34:
  cmpl   $0x1,-0x8(%rbp)
  jne    L102
  movss  -0x14(%rbp),%xmm0
  movaps %xmm0,%xmm1
  mulss  -0x10(%rbp),%xmm1
  movss  D76(%rip),%xmm0
  divss  %xmm1,%xmm0
  movss  %xmm0,-0x18(%rbp)
L102:
  cmpl   $0x1,0x28(%rbp)
  jle    L105
  pxor   %xmm0,%xmm0
  cvtss2sd -0x18(%rbp),%xmm0
  movsd  D18(%rip),%xmm1
  divsd  %xmm1,%xmm0
  cvtsd2ss %xmm0,%xmm0
  movss  %xmm0,-0x18(%rbp)
L105:
  cmpl   $0x1,0x30(%rbp)
  jle    L22
  pxor   %xmm0,%xmm0
  cvtss2sd -0x18(%rbp),%xmm0
  movsd  D18(%rip),%xmm1
  divsd  %xmm1,%xmm0
  cvtsd2ss %xmm0,%xmm0
  movss  %xmm0,-0x18(%rbp)
L22:
  cmpl   $0x1,0x38(%rbp)
  jle    L82
  pxor   %xmm0,%xmm0
  cvtss2sd -0x18(%rbp),%xmm0
  movsd  D18(%rip),%xmm1
  divsd  %xmm1,%xmm0
  cvtsd2ss %xmm0,%xmm0
  movss  %xmm0,-0x18(%rbp)
L82:
  cmpl   $0x0,-0x8(%rbp)
  jne    L39
  movss  D76(%rip),%xmm0
  movss  %xmm0,-0x18(%rbp)
  movss  D76(%rip),%xmm0
  movss  %xmm0,-0x28(%rbp)
  movss  D76(%rip),%xmm0
  movss  %xmm0,-0x24(%rbp)
  movss  D76(%rip),%xmm0
  movss  %xmm0,-0x20(%rbp)
  movss  D76(%rip),%xmm0
  movss  %xmm0,-0x1c(%rbp)
L39:
  movl   $0x0,-0x4(%rbp)
  pxor   %xmm2,%xmm2
  cvtss2sd -0x28(%rbp),%xmm2
  movq   %xmm2,%rdi
  mov    -0x4(%rbp),%r8d
  mov    0x38(%rbp),%ecx
  mov    0x30(%rbp),%edx
  mov    0x28(%rbp),%esi
  mov    -0x38(%rbp),%rax
  movq   %rdi,%xmm0
  mov    %rax,%rdi
  mov    $0x1,%eax
  call   <bio_3d_premult@plt>
  movl   $0x1,-0x4(%rbp)
  pxor   %xmm3,%xmm3
  cvtss2sd -0x24(%rbp),%xmm3
  movq   %xmm3,%rdi
  mov    -0x4(%rbp),%r8d
  mov    0x38(%rbp),%ecx
  mov    0x30(%rbp),%edx
  mov    0x28(%rbp),%esi
  mov    -0x38(%rbp),%rax
  movq   %rdi,%xmm0
  mov    %rax,%rdi
  mov    $0x1,%eax
  call   <bio_3d_premult@plt>
  movl   $0x0,-0x4(%rbp)
  pxor   %xmm4,%xmm4
  cvtss2sd -0x20(%rbp),%xmm4
  movq   %xmm4,%rdi
  mov    -0x4(%rbp),%r8d
  mov    0x38(%rbp),%ecx
  mov    0x30(%rbp),%edx
  mov    0x28(%rbp),%esi
  mov    -0x38(%rbp),%rax
  movq   %rdi,%xmm0
  mov    %rax,%rdi
  mov    $0x1,%eax
  call   <bio_3d_premult@plt>
  cmpl   $0x0,0x40(%rbp)
  je     L88
  pxor   %xmm0,%xmm0
  cvtss2sd -0x18(%rbp),%xmm0
  pxor   %xmm5,%xmm5
  cvtss2sd -0x1c(%rbp),%xmm5
  movq   %xmm5,%rdi
  mov    -0x60(%rbp),%r9
  mov    -0x58(%rbp),%r10
  mov    -0x50(%rbp),%rcx
  mov    -0x48(%rbp),%rdx
  mov    -0x40(%rbp),%rsi
  mov    -0x38(%rbp),%rax
  mov    0x38(%rbp),%r8d
  push   %r8
  mov    0x30(%rbp),%r8d
  push   %r8
  mov    0x28(%rbp),%r8d
  push   %r8
  push   0x20(%rbp)
  push   0x18(%rbp)
  push   0x10(%rbp)
  movapd %xmm0,%xmm1
  movq   %rdi,%xmm0
  mov    %r10,%r8
  mov    %rax,%rdi
  mov    $0x2,%eax
  call   <bioD1__3d@plt>
  add    $0x30,%rsp
  jmp    L94
L88:
  pxor   %xmm0,%xmm0
  cvtss2sd -0x18(%rbp),%xmm0
  pxor   %xmm6,%xmm6
  cvtss2sd -0x1c(%rbp),%xmm6
  movq   %xmm6,%rdi
  mov    0x38(%rbp),%r8d
  mov    0x30(%rbp),%ecx
  mov    0x28(%rbp),%edx
  mov    0x20(%rbp),%rsi
  mov    -0x38(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rdi,%xmm0
  mov    %rax,%rdi
  mov    $0x2,%eax
  call   <bioD1_3dskip@plt>
L94:
  nop
  leave
  ret
```

tool_calls: name: parse_data
arguments: label: D52
type_guessed: f32
name: parse_data
arguments: label: D43
type_guessed: byte[4]
name: parse_data
arguments: label: D67
type_guessed: f32
name: parse_data
arguments: label: D76
type_guessed: f32
name: parse_data
arguments: label: D18
type_guessed: f64

tool: D52: 0.2

tool: {"D43": [0x6e,0xdb,0xb6,0xbe]}

tool: D67: 0.21

tool: D76: 1

tool: D18: 0.98

assistant: ```c
void bioD7_3d(invector, HHH, HHL, HLH, HLL, LHH, LHL, LLH, LLL, xlength, ylength, zlength, ifnotAllskip) float *invector;
float *HLL, *HLH, *HHL, *HHH;
float *LLL, *LLH, *LHL, *LHH;
int xlength, ylength, zlength;
int ifnotAllskip;
{
  float x0 = 0.2;
  float x1 = -0.357142857136;
  float x2 = 0.21;
  float X0, X1, X2, X3;
  int pairity;
  float Norm;
  int dim;
  dim = (xlength > 1) + (ylength > 1) + (zlength > 1);
  if (0 || ifnotAllskip) {
    X0 = x0;
    X1 = x0 * x1;
    X2 = x1 * x2;
    X3 = 1.0 / x2;
  } else {
    X0 = x0;
    X1 = x0 * x1;
    X2 = 1;
    X3 = 1.0 / x1;
  }
  if (dim == 3)
    Norm = (x0 * x1);
  if (dim == 2)
    Norm = 1.0;
  if (dim == 1)
    Norm = 1.0 / (x0 * x1);
  if (xlength > 1)
    Norm /= (0.98);
  if (ylength > 1)
    Norm /= (0.98);
  if (zlength > 1)
    Norm /= (0.98);
  if (dim == 0) {
    Norm = 1.0;
    X0 = 1.0;
    X1 = 1.0;
    X2 = 1.0;
    X3 = 1.0;
  }
  pairity = 0;
  bio_3d_premult(invector, xlength, ylength, zlength, X0, pairity);
  pairity = 1;
  bio_3d_premult(invector, xlength, ylength, zlength, X1, pairity);
  pairity = 0;
  bio_3d_premult(invector, xlength, ylength, zlength, X2, pairity);
  if (ifnotAllskip)
    bioD1__3d(invector, HHH, HHL, HLH, HLL, LHH, LHL, LLH, LLL, xlength, ylength, zlength, X3, Norm);
  else
    bioD1_3dskip(invector, LLL, xlength, ylength, zlength, X3, Norm);
}
```