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

```asm
<DSlater_1S_2S>:
  endbr64
  push   %r13
  movapd %xmm2,%xmm6
  movapd %xmm0,%xmm3
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x58,%rsp
  ucomisd %xmm1,%xmm6
  movsd  %xmm2,0x8(%rsp)
  movapd %xmm0,%xmm2
  addsd  %xmm0,%xmm2
  movsd  %xmm1,(%rsp)
  jp     L16
  jne    L16
  movapd %xmm2,%xmm4
  movsd  D584(%rip),%xmm5
  movsd  %xmm0,(%rsp)
  mulsd  %xmm6,%xmm4
  movapd %xmm5,%xmm0
  movapd %xmm4,%xmm1
  movsd  %xmm4,0x18(%rsp)
  call   <pow@plt>
  movsd  (%rsp),%xmm3
  movsd  D94(%rip),%xmm0
  pxor   %xmm2,%xmm2
  cvtsi2sd %eax,%xmm2
  mulsd  D956(%rip),%xmm2
  movsd  D499(%rip),%xmm6
  mulsd  %xmm3,%xmm0
  subsd  D956(%rip),%xmm2
  movsd  %xmm3,0x10(%rsp)
  mulsd  0x8(%rsp),%xmm0
  movapd %xmm6,%xmm1
  subsd  %xmm0,%xmm2
  movapd %xmm3,%xmm0
  movsd  %xmm2,(%rsp)
  call   <pow@plt>
  movsd  0x8(%rsp),%xmm0
  mov    %eax,%ebx
  mov    D499(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  (%rsp),%xmm2
  cvtsi2sd %ebx,%xmm0
  mulsd  D94(%rip),%xmm0
  movsd  0x10(%rsp),%xmm3
  cvtsi2sd %eax,%xmm1
  mulsd  %xmm1,%xmm0
  movsd  D497(%rip),%xmm1
  subsd  %xmm0,%xmm2
  movapd %xmm3,%xmm0
  movsd  %xmm2,(%rsp)
  call   <pow@plt>
  movsd  0x8(%rsp),%xmm0
  mov    %eax,%ebx
  mov    D497(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  (%rsp),%xmm2
  cvtsi2sd %ebx,%xmm0
  mulsd  D852(%rip),%xmm0
  movsd  0x10(%rsp),%xmm3
  cvtsi2sd %eax,%xmm1
  mov    D249(%rip),%rax
  mulsd  %xmm1,%xmm0
  movq   %rax,%xmm1
  subsd  %xmm0,%xmm2
  movapd %xmm3,%xmm0
  movsd  %xmm2,(%rsp)
  call   <pow@plt>
  movsd  0x8(%rsp),%xmm0
  mov    %eax,%ebx
  mov    D249(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  (%rsp),%xmm2
  cvtsi2sd %ebx,%xmm0
  mulsd  D912(%rip),%xmm0
  movsd  0x10(%rsp),%xmm3
  cvtsi2sd %eax,%xmm1
  mulsd  %xmm1,%xmm0
  movsd  D332(%rip),%xmm1
  subsd  %xmm0,%xmm2
  movapd %xmm3,%xmm0
  movsd  %xmm2,(%rsp)
  call   <pow@plt>
  movsd  0x8(%rsp),%xmm0
  mov    %eax,%ebx
  mov    D332(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  (%rsp),%xmm2
  cvtsi2sd %ebx,%xmm0
  mulsd  D824(%rip),%xmm0
  movsd  0x10(%rsp),%xmm3
  cvtsi2sd %eax,%xmm1
  mulsd  %xmm1,%xmm0
  movsd  D377(%rip),%xmm1
  subsd  %xmm0,%xmm2
  movapd %xmm3,%xmm0
  movsd  %xmm2,(%rsp)
  call   <pow@plt>
  movsd  0x8(%rsp),%xmm0
  mov    %eax,%ebx
  mov    D377(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  (%rsp),%xmm2
  cvtsi2sd %ebx,%xmm0
  mulsd  D249(%rip),%xmm0
  movsd  0x18(%rsp),%xmm4
  cvtsi2sd %eax,%xmm1
  mov    D584(%rip),%rax
  mulsd  %xmm1,%xmm0
  movapd %xmm4,%xmm1
  subsd  %xmm0,%xmm2
  movq   %rax,%xmm0
  movsd  %xmm2,(%rsp)
  call   <pow@plt>
  movsd  0x10(%rsp),%xmm3
  mov    %eax,%ebx
  mov    D499(%rip),%rax
  movapd %xmm3,%xmm0
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  pxor   %xmm0,%xmm0
  movsd  (%rsp),%xmm2
  cvtsi2sd %ebx,%xmm1
  mulsd  D956(%rip),%xmm1
  add    $0x58,%rsp
  cvtsi2sd %eax,%xmm0
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  mulsd  %xmm0,%xmm1
  divsd  %xmm1,%xmm2
  movapd %xmm2,%xmm0
  ret
  nop
L16:
  movsd  0x8(%rsp),%xmm5
  addsd  (%rsp),%xmm5
  movsd  %xmm3,0x18(%rsp)
  mov    D584(%rip),%rax
  movsd  %xmm2,0x10(%rsp)
  mulsd  %xmm2,%xmm5
  movq   %rax,%xmm0
  movapd %xmm5,%xmm1
  movsd  %xmm5,0x48(%rsp)
  call   <pow@plt>
  movsd  0x8(%rsp),%xmm0
  mov    %eax,%ebp
  mov    D499(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%ebx
  mov    D499(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  sub    %eax,%ebx
  mov    D332(%rip),%rax
  cvtsi2sd %ebx,%xmm0
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  0x10(%rsp),%xmm2
  cvtsi2sd %ebp,%xmm0
  mulsd  D497(%rip),%xmm0
  cvtsi2sd %eax,%xmm1
  mov    D584(%rip),%rax
  movsd  %xmm2,0x40(%rsp)
  movapd %xmm0,%xmm7
  movq   %rax,%xmm0
  mulsd  %xmm1,%xmm7
  movsd  (%rsp),%xmm1
  mulsd  %xmm2,%xmm1
  movsd  %xmm7,0x20(%rsp)
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%ebx
  mov    D377(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  cvtsi2sd %ebx,%xmm0
  mulsd  D497(%rip),%xmm0
  cvtsi2sd %eax,%xmm1
  mov    D249(%rip),%rax
  movapd %xmm0,%xmm4
  movsd  0x8(%rsp),%xmm0
  mulsd  %xmm1,%xmm4
  movq   %rax,%xmm1
  movsd  %xmm4,0x28(%rsp)
  call   <pow@plt>
  movsd  0x8(%rsp),%xmm0
  mov    %eax,%ebx
  mov    D332(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  0x18(%rsp),%xmm3
  pxor   %xmm1,%xmm1
  movsd  D802(%rip),%xmm2
  cvtsi2sd %eax,%xmm1
  pxor   %xmm4,%xmm4
  mov    D499(%rip),%rax
  mulsd  %xmm3,%xmm2
  cvtsi2sd %ebx,%xmm4
  movsd  %xmm3,0x10(%rsp)
  mulsd  D22(%rip),%xmm4
  movapd %xmm2,%xmm0
  mulsd  %xmm1,%xmm0
  movq   %rax,%xmm1
  subsd  %xmm0,%xmm4
  movapd %xmm3,%xmm0
  movsd  %xmm4,0x18(%rsp)
  call   <pow@plt>
  movsd  0x8(%rsp),%xmm0
  mov    %eax,%ebx
  mov    D377(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  0x10(%rsp),%xmm3
  cvtsi2sd %ebx,%xmm0
  movsd  D314(%rip),%xmm5
  movsd  0x18(%rsp),%xmm4
  cvtsi2sd %eax,%xmm1
  mov    D497(%rip),%rax
  movsd  %xmm3,0x38(%rsp)
  mulsd  %xmm3,%xmm5
  addsd  %xmm0,%xmm0
  mulsd  %xmm1,%xmm0
  movq   %rax,%xmm1
  movsd  %xmm5,0x10(%rsp)
  subsd  %xmm0,%xmm4
  movsd  0x8(%rsp),%xmm0
  movsd  %xmm4,0x30(%rsp)
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  movsd  0x10(%rsp),%xmm2
  cvtsi2sd %eax,%xmm0
  mov    D499(%rip),%rax
  movq   %rax,%xmm1
  mulsd  %xmm0,%xmm2
  movsd  (%rsp),%xmm0
  movsd  %xmm2,0x18(%rsp)
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  movsd  0x30(%rsp),%xmm4
  cvtsi2sd %eax,%xmm0
  mulsd  0x18(%rsp),%xmm0
  mov    D249(%rip),%rax
  movapd %xmm4,%xmm3
  movq   %rax,%xmm1
  subsd  %xmm0,%xmm3
  movsd  (%rsp),%xmm0
  movsd  %xmm3,0x18(%rsp)
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  movsd  0x18(%rsp),%xmm2
  cvtsi2sd %eax,%xmm0
  mov    D249(%rip),%rax
  movq   %rax,%xmm1
  addsd  %xmm0,%xmm2
  movsd  (%rsp),%xmm0
  movsd  %xmm2,0x30(%rsp)
  movsd  0x40(%rsp),%xmm2
  mulsd  0x8(%rsp),%xmm2
  movsd  %xmm2,0x18(%rsp)
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  0x18(%rsp),%xmm0
  mov    D499(%rip),%rax
  addsd  0x30(%rsp),%xmm0
  movq   %rax,%xmm1
  movsd  %xmm0,0x30(%rsp)
  movsd  0x8(%rsp),%xmm0
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%ebx
  mov    D499(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  0x38(%rsp),%xmm3
  mov    %eax,%ebp
  mov    D499(%rip),%rax
  movapd %xmm3,%xmm0
  imul   %ebp,%ebx
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%r12d
  mov    D499(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  0x20(%rsp),%xmm4
  cvtsi2sd %r12d,%xmm0
  cvtsi2sd %eax,%xmm1
  mov    D584(%rip),%rax
  addsd  %xmm0,%xmm0
  mulsd  %xmm1,%xmm0
  pxor   %xmm1,%xmm1
  cvtsi2sd %ebx,%xmm1
  subsd  D332(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  0x18(%rsp),%xmm1
  addsd  0x30(%rsp),%xmm0
  mulsd  0x28(%rsp),%xmm0
  addsd  %xmm0,%xmm4
  movq   %rax,%xmm0
  movsd  %xmm4,0x20(%rsp)
  call   <pow@plt>
  movsd  0x8(%rsp),%xmm0
  mov    %eax,%ebx
  mov    D249(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  0x8(%rsp),%xmm0
  mov    %eax,%ebp
  mov    D499(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%r12d
  mov    D249(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  0x10(%rsp),%xmm5
  cvtsi2sd %r12d,%xmm0
  mulsd  D860(%rip),%xmm0
  movsd  0x38(%rsp),%xmm3
  cvtsi2sd %eax,%xmm1
  mulsd  (%rsp),%xmm5
  mov    D499(%rip),%rax
  addsd  D332(%rip),%xmm5
  movsd  %xmm3,0x30(%rsp)
  movapd %xmm0,%xmm6
  movapd %xmm3,%xmm0
  movsd  %xmm5,0x10(%rsp)
  mulsd  %xmm1,%xmm6
  movq   %rax,%xmm1
  movsd  %xmm6,0x18(%rsp)
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%r12d
  mov    D499(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  0x30(%rsp),%xmm3
  cvtsi2sd %r12d,%xmm0
  mulsd  D401(%rip),%xmm0
  cvtsi2sd %eax,%xmm1
  mov    D497(%rip),%rax
  mulsd  %xmm1,%xmm0
  movsd  0x10(%rsp),%xmm1
  addsd  %xmm0,%xmm1
  movapd %xmm3,%xmm0
  movsd  %xmm1,0x28(%rsp)
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%r12d
  mov    D497(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  0x28(%rsp),%xmm8
  cvtsi2sd %r12d,%xmm0
  mulsd  D377(%rip),%xmm0
  movsd  0x30(%rsp),%xmm3
  cvtsi2sd %eax,%xmm1
  mov    D249(%rip),%rax
  mulsd  %xmm1,%xmm0
  movq   %rax,%xmm1
  addsd  %xmm0,%xmm8
  movapd %xmm3,%xmm0
  movsd  %xmm8,0x28(%rsp)
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%r12d
  mov    D249(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  movsd  0x18(%rsp),%xmm6
  imul   %eax,%r12d
  mov    D377(%rip),%rax
  movq   %rax,%xmm1
  cvtsi2sd %r12d,%xmm0
  addsd  0x28(%rsp),%xmm0
  mulsd  %xmm0,%xmm6
  movsd  (%rsp),%xmm0
  movsd  %xmm6,0x18(%rsp)
  call   <pow@plt>
  movsd  0x30(%rsp),%xmm3
  mov    %eax,%r13d
  mov    D499(%rip),%rax
  movapd %xmm3,%xmm0
  movsd  %xmm3,0x28(%rsp)
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  imul   %ebp,%ebx
  mov    %eax,%r12d
  mov    D499(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  movsd  0x28(%rsp),%xmm3
  movsd  D982(%rip),%xmm9
  cvtsi2sd %r12d,%xmm1
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  D240(%rip),%xmm1
  mov    D497(%rip),%rax
  movsd  %xmm3,0x30(%rsp)
  mulsd  %xmm3,%xmm9
  mulsd  %xmm0,%xmm1
  movsd  (%rsp),%xmm0
  mulsd  %xmm9,%xmm0
  addsd  D461(%rip),%xmm0
  addsd  %xmm0,%xmm1
  movapd %xmm3,%xmm0
  movsd  %xmm1,0x28(%rsp)
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%r12d
  mov    D497(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  0x28(%rsp),%xmm3
  cvtsi2sd %r12d,%xmm0
  mulsd  D802(%rip),%xmm0
  cvtsi2sd %eax,%xmm1
  mov    D249(%rip),%rax
  mulsd  %xmm1,%xmm0
  movq   %rax,%xmm1
  addsd  %xmm0,%xmm3
  movsd  %xmm3,0x28(%rsp)
  movsd  0x30(%rsp),%xmm3
  movapd %xmm3,%xmm0
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%r12d
  mov    D249(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  pxor   %xmm0,%xmm0
  movsd  0x18(%rsp),%xmm6
  cvtsi2sd %r13d,%xmm1
  imul   %eax,%r12d
  mov    D377(%rip),%rax
  cvtsi2sd %r12d,%xmm0
  addsd  %xmm1,%xmm1
  addsd  0x28(%rsp),%xmm0
  mulsd  %xmm1,%xmm0
  movq   %rax,%xmm1
  addsd  %xmm0,%xmm6
  movsd  0x8(%rsp),%xmm0
  movsd  %xmm6,0x38(%rsp)
  call   <pow@plt>
  movsd  0x30(%rsp),%xmm3
  mov    %eax,%r12d
  mov    D499(%rip),%rax
  movapd %xmm3,%xmm0
  movsd  %xmm3,0x18(%rsp)
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%r13d
  mov    D499(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  movsd  0x18(%rsp),%xmm3
  movsd  D377(%rip),%xmm6
  cvtsi2sd %r13d,%xmm1
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  %xmm3,%xmm6
  mov    D497(%rip),%rax
  movsd  %xmm3,0x28(%rsp)
  mulsd  D377(%rip),%xmm1
  mulsd  %xmm0,%xmm1
  movsd  (%rsp),%xmm0
  mulsd  %xmm6,%xmm0
  addsd  D497(%rip),%xmm0
  addsd  %xmm0,%xmm1
  movapd %xmm3,%xmm0
  movsd  %xmm1,0x18(%rsp)
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%r13d
  mov    D497(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  0x18(%rsp),%xmm6
  cvtsi2sd %r13d,%xmm0
  mulsd  D249(%rip),%xmm0
  movsd  0x28(%rsp),%xmm3
  cvtsi2sd %eax,%xmm1
  mov    D249(%rip),%rax
  movsd  %xmm3,0x30(%rsp)
  mulsd  %xmm1,%xmm0
  movq   %rax,%xmm1
  addsd  %xmm0,%xmm6
  movapd %xmm3,%xmm0
  movsd  %xmm6,0x18(%rsp)
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%r13d
  mov    D249(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  0x38(%rsp),%xmm2
  cvtsi2sd %r13d,%xmm0
  cvtsi2sd %eax,%xmm1
  movapd %xmm2,%xmm6
  mov    D249(%rip),%rax
  addsd  %xmm0,%xmm0
  mulsd  %xmm1,%xmm0
  pxor   %xmm1,%xmm1
  cvtsi2sd %r12d,%xmm1
  addsd  0x18(%rsp),%xmm0
  mulsd  %xmm1,%xmm0
  movq   %rax,%xmm1
  subsd  %xmm0,%xmm6
  movsd  0x8(%rsp),%xmm0
  movsd  %xmm6,0x18(%rsp)
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%r12d
  mov    D499(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  cvtsi2sd %r12d,%xmm0
  mulsd  D497(%rip),%xmm0
  cvtsi2sd %eax,%xmm1
  mov    D499(%rip),%rax
  movapd %xmm0,%xmm3
  mulsd  %xmm1,%xmm3
  movq   %rax,%xmm1
  movsd  %xmm3,0x28(%rsp)
  movsd  0x30(%rsp),%xmm3
  movapd %xmm3,%xmm0
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%r12d
  mov    D499(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  0x30(%rsp),%xmm3
  cvtsi2sd %r12d,%xmm0
  mulsd  D314(%rip),%xmm0
  cvtsi2sd %eax,%xmm1
  mov    D497(%rip),%rax
  mulsd  %xmm1,%xmm0
  movsd  0x10(%rsp),%xmm1
  addsd  %xmm0,%xmm1
  movapd %xmm3,%xmm0
  movsd  %xmm1,0x10(%rsp)
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%r12d
  mov    D497(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  0x10(%rsp),%xmm5
  cvtsi2sd %r12d,%xmm0
  mulsd  D802(%rip),%xmm0
  movsd  0x30(%rsp),%xmm3
  cvtsi2sd %eax,%xmm1
  mov    D249(%rip),%rax
  mulsd  %xmm1,%xmm0
  movq   %rax,%xmm1
  addsd  %xmm0,%xmm5
  movapd %xmm3,%xmm0
  movsd  %xmm5,0x10(%rsp)
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%r12d
  mov    D249(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  0x20(%rsp),%xmm2
  cvtsi2sd %r12d,%xmm0
  movsd  0x48(%rsp),%xmm5
  cvtsi2sd %eax,%xmm1
  mov    D584(%rip),%rax
  addsd  %xmm0,%xmm0
  mulsd  %xmm1,%xmm0
  pxor   %xmm1,%xmm1
  cvtsi2sd %ebx,%xmm1
  addsd  0x10(%rsp),%xmm0
  mulsd  0x28(%rsp),%xmm0
  addsd  0x18(%rsp),%xmm0
  mulsd  %xmm1,%xmm0
  movapd %xmm5,%xmm1
  addsd  %xmm0,%xmm2
  movq   %rax,%xmm0
  movsd  %xmm2,0x18(%rsp)
  call   <pow@plt>
  movsd  0x30(%rsp),%xmm3
  mov    %eax,%ebx
  mov    D499(%rip),%rax
  movapd %xmm3,%xmm0
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  cvtsi2sd %ebx,%xmm0
  mulsd  D497(%rip),%xmm0
  cvtsi2sd %eax,%xmm1
  mov    D499(%rip),%rax
  movapd %xmm0,%xmm4
  movsd  0x8(%rsp),%xmm0
  mulsd  %xmm1,%xmm4
  movq   %rax,%xmm1
  movsd  %xmm4,0x10(%rsp)
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%ebx
  mov    D499(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  sub    %eax,%ebx
  mov    D332(%rip),%rax
  cvtsi2sd %ebx,%xmm0
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  movsd  0x18(%rsp),%xmm2
  cvtsi2sd %eax,%xmm1
  mulsd  0x10(%rsp),%xmm1
  add    $0x58,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  divsd  %xmm1,%xmm2
  movapd %xmm2,%xmm0
  ret
```

tool_calls: name: parse_data
arguments: label: D584
type: f64
name: parse_data
arguments: label: D94
type: f64
name: parse_data
arguments: label: D956
type: f64
name: parse_data
arguments: label: D499
type: f64
name: parse_data
arguments: label: D497
type: f64
name: parse_data
arguments: label: D852
type: f64
name: parse_data
arguments: label: D249
type: f64
name: parse_data
arguments: label: D912
type: f64
name: parse_data
arguments: label: D332
type: f64
name: parse_data
arguments: label: D824
type: f64
name: parse_data
arguments: label: D377
type: f64
name: parse_data
arguments: label: D802
type: f64
name: parse_data
arguments: label: D22
type: byte[8]
name: parse_data
arguments: label: D314
type: f64
name: parse_data
arguments: label: D860
type: byte[8]
name: parse_data
arguments: label: D401
type: f64
name: parse_data
arguments: label: D982
type: f64
name: parse_data
arguments: label: D240
type: f64
name: parse_data
arguments: label: D461
type: f64

tool: D584: 2.718281828459045

tool: D94: 240

tool: D956: 120

tool: D499: 2

tool: D497: 3

tool: D852: 155

tool: D249: 4

tool: D912: 70

tool: D332: 5

tool: D824: 22

tool: D377: 6

tool: D802: 8

tool: {"D22": [0x00,0x00,0x00,0x00,0x00,0x00,0x10,0xc0]}

tool: D314: 10

tool: {"D860": [0x00,0x00,0x00,0x00,0x00,0x00,0x18,0xc0]}

tool: D401: 13

tool: D982: 42

tool: D240: 27

tool: D461: 21

assistant: ```c
double DSlater_1S_2S(double rij, double xij, double xii) {
  double S;
  if (xii == xij) {
    S = (-120.0 + 120.0 * (pow((double)(2.71828182845904523536029), (double)(2.0 * rij * xii))) - 240.0 * rij * xii - 240.0 * (pow((double)(rij), (double)(2.0))) * (pow((double)(xii), (double)(2.0))) - 155.0 * (pow((double)(rij), (double)(3.0))) * (pow((double)(xii), (double)(3.0))) - 70.0 * (pow((double)(rij), (double)(4.0))) * (pow((double)(xii), (double)(4.0))) - 22.0 * (pow((double)(rij), (double)(5.0))) * (pow((double)(xii), (double)(5.0))) - 4.0 * (pow((double)(rij), (double)(6.0))) * (pow((double)(xii), (double)(6.0)))) / (120. * (pow((double)(2.71828182845904523536029), (double)(2.0 * rij * xii))) * (pow((double)(rij), (double)(2.0))));
  } else {
    S = (3.0 * (pow((double)(2.71828182845904523536029), (double)(2.0 * rij * (xii + xij)))) * (pow((double)((pow((double)(xii), (double)(2.0))) - (pow((double)(xij), (double)(2.0)))), (double)(5.0))) + 3.0 * (pow((double)(2.71828182845904523536029), (double)(2.0 * rij * xij))) * (pow((double)(xij), (double)(6.0))) * (-4.0 * (pow((double)(xii), (double)(4.0))) - 8.0 * rij * (pow((double)(xii), (double)(5.0))) - 2.0 * (pow((double)(rij), (double)(2.0))) * (pow((double)(xii), (double)(6.0))) - 10.0 * rij * (pow((double)(xii), (double)(3.0))) * (pow((double)(xij), (double)(2.0))) + (pow((double)(xij), (double)(4.0))) + 2.0 * rij * xii * (pow((double)(xij), (double)(4.0))) + (pow((double)(xii), (double)(2.0))) * (pow((double)(xij), (double)(2.0))) * (-5.0 + 2.0 * (pow((double)(rij), (double)(2.0))) * (pow((double)(xij), (double)(2.0))))) + (pow((double)(2.71828182845904523536029), (double)(2.0 * rij * xii))) * (pow((double)(xii), (double)(4.0))) * (-6.0 * (pow((double)(xii), (double)(2.0))) * (pow((double)(xij), (double)(4.0))) * (5.0 + 10.0 * rij * xij + 13.0 * (pow((double)(rij), (double)(2.0))) * (pow((double)(xij), (double)(2.0))) + 6.0 * (pow((double)(rij), (double)(3.0))) * (pow((double)(xij), (double)(3.0))) + (pow((double)(rij), (double)(4.0))) * (pow((double)(xij), (double)(4.0)))) + 2.0 * (pow((double)(xij), (double)(6.0))) * (21.0 + 42.0 * rij * xij + 27.0 * (pow((double)(rij), (double)(2.0))) * (pow((double)(xij), (double)(2.0))) + 8.0 * (pow((double)(rij), (double)(3.0))) * (pow((double)(xij), (double)(3.0))) + (pow((double)(rij), (double)(4.0))) * (pow((double)(xij), (double)(4.0)))) - (pow((double)(xii), (double)(6.0))) * (3.0 + 6.0 * rij * xij + 6.0 * (pow((double)(rij), (double)(2.0))) * (pow((double)(xij), (double)(2.0))) + 4.0 * (pow((double)(rij), (double)(3.0))) * (pow((double)(xij), (double)(3.0))) + 2.0 * (pow((double)(rij), (double)(4.0))) * (pow((double)(xij), (double)(4.0)))) + 3.0 * (pow((double)(xii), (double)(4.0))) * (pow((double)(xij), (double)(2.0))) * (5.0 + 10.0 * rij * xij + 10.0 * (pow((double)(rij), (double)(2.0))) * (pow((double)(xij), (double)(2.0))) + 8.0 * (pow((double)(rij), (double)(3.0))) * (pow((double)(xij), (double)(3.0))) + 2.0 * (pow((double)(rij), (double)(4.0))) * (pow((double)(xij), (double)(4.0)))))) / (3. * (pow((double)(2.71828182845904523536029), (double)(2.0 * rij * (xii + xij)))) * (pow((double)(rij), (double)(2.0))) * (pow((double)((pow((double)(xii), (double)(2.0))) - (pow((double)(xij), (double)(2.0)))), (double)(5.0))));
  }
  return S;
}
```