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

```asm
<Slater_1S_2S>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %rbx
  sub    $0x68,%rsp
  movsd  %xmm0,-0x28(%rbp)
  movsd  %xmm1,-0x30(%rbp)
  movsd  %xmm2,-0x38(%rbp)
  movsd  -0x38(%rbp),%xmm0
  ucomisd -0x30(%rbp),%xmm0
  jp     L24
  movsd  -0x38(%rbp),%xmm0
  ucomisd -0x30(%rbp),%xmm0
  jne    L24
  movsd  -0x28(%rbp),%xmm0
  addsd  %xmm0,%xmm0
  mulsd  -0x38(%rbp),%xmm0
  mov    D443(%rip),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D709(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D709(%rip),%xmm1
  subsd  %xmm1,%xmm0
  movsd  -0x28(%rbp),%xmm2
  movsd  D614(%rip),%xmm1
  mulsd  %xmm2,%xmm1
  mulsd  -0x38(%rbp),%xmm1
  subsd  %xmm1,%xmm0
  movsd  %xmm0,-0x40(%rbp)
  movsd  D529(%rip),%xmm0
  mov    -0x28(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D190(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movsd  %xmm1,-0x48(%rbp)
  movsd  D529(%rip),%xmm0
  mov    -0x38(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  -0x48(%rbp),%xmm0
  movsd  -0x40(%rbp),%xmm3
  subsd  %xmm0,%xmm3
  movsd  %xmm3,-0x40(%rbp)
  movsd  D57(%rip),%xmm0
  mov    -0x28(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D495(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movsd  %xmm1,-0x48(%rbp)
  movsd  D57(%rip),%xmm0
  mov    -0x38(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  -0x48(%rbp),%xmm0
  movsd  -0x40(%rbp),%xmm3
  subsd  %xmm0,%xmm3
  movsd  %xmm3,-0x40(%rbp)
  movsd  D669(%rip),%xmm0
  mov    -0x28(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D621(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movsd  %xmm1,-0x48(%rbp)
  movsd  D669(%rip),%xmm0
  mov    -0x38(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  -0x48(%rbp),%xmm0
  movsd  -0x40(%rbp),%xmm3
  subsd  %xmm0,%xmm3
  movsd  %xmm3,-0x40(%rbp)
  movsd  D738(%rip),%xmm0
  mov    -0x28(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D669(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movsd  %xmm1,-0x48(%rbp)
  movsd  D738(%rip),%xmm0
  mov    -0x38(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  -0x48(%rbp),%xmm0
  movsd  -0x40(%rbp),%xmm3
  subsd  %xmm0,%xmm3
  movsd  %xmm3,-0x40(%rbp)
  movsd  -0x28(%rbp),%xmm0
  addsd  %xmm0,%xmm0
  mulsd  -0x38(%rbp),%xmm0
  mov    D443(%rip),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D709(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x28(%rbp),%xmm1
  movsd  -0x40(%rbp),%xmm0
  divsd  %xmm1,%xmm0
  movsd  %xmm0,-0x18(%rbp)
  jmp    L25
L24:
  movsd  -0x28(%rbp),%xmm0
  movapd %xmm0,%xmm1
  addsd  %xmm0,%xmm1
  movsd  -0x38(%rbp),%xmm0
  addsd  -0x30(%rbp),%xmm0
  mulsd  %xmm1,%xmm0
  mov    D443(%rip),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D100(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movsd  %xmm1,-0x40(%rbp)
  movsd  D529(%rip),%xmm0
  mov    -0x38(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  mov    %eax,%ebx
  movsd  D529(%rip),%xmm0
  mov    -0x30(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  mov    %ebx,%edx
  sub    %eax,%edx
  pxor   %xmm4,%xmm4
  cvtsi2sd %edx,%xmm4
  movq   %xmm4,%rax
  movsd  D738(%rip),%xmm0
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  -0x40(%rbp),%xmm0
  movsd  %xmm0,-0x40(%rbp)
  movsd  -0x28(%rbp),%xmm0
  addsd  %xmm0,%xmm0
  mulsd  -0x30(%rbp),%xmm0
  mov    D443(%rip),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D100(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movsd  %xmm1,-0x48(%rbp)
  movsd  D100(%rip),%xmm0
  mov    -0x30(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  movapd %xmm0,%xmm4
  mulsd  -0x48(%rbp),%xmm4
  movsd  %xmm4,-0x48(%rbp)
  movsd  D669(%rip),%xmm0
  mov    -0x38(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D191(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movsd  %xmm1,-0x50(%rbp)
  movsd  D738(%rip),%xmm0
  mov    -0x38(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  -0x28(%rbp),%xmm0
  movsd  -0x50(%rbp),%xmm1
  subsd  %xmm0,%xmm1
  movsd  %xmm1,-0x50(%rbp)
  movsd  D529(%rip),%xmm0
  mov    -0x38(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D738(%rip),%xmm0
  movapd %xmm1,%xmm7
  mulsd  %xmm0,%xmm7
  movsd  %xmm7,-0x58(%rbp)
  movsd  D529(%rip),%xmm0
  mov    -0x30(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  -0x58(%rbp),%xmm0
  movsd  -0x50(%rbp),%xmm1
  subsd  %xmm0,%xmm1
  movsd  %xmm1,-0x50(%rbp)
  movsd  D669(%rip),%xmm0
  mov    -0x30(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  movapd %xmm0,%xmm6
  addsd  -0x50(%rbp),%xmm6
  movsd  %xmm6,-0x50(%rbp)
  movsd  -0x28(%rbp),%xmm0
  movapd %xmm0,%xmm5
  mulsd  -0x38(%rbp),%xmm5
  movsd  %xmm5,-0x58(%rbp)
  movsd  D669(%rip),%xmm0
  mov    -0x30(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  -0x58(%rbp),%xmm0
  addsd  -0x50(%rbp),%xmm0
  mulsd  -0x48(%rbp),%xmm0
  addsd  -0x40(%rbp),%xmm0
  movsd  %xmm0,-0x40(%rbp)
  movsd  -0x28(%rbp),%xmm0
  addsd  %xmm0,%xmm0
  mulsd  -0x38(%rbp),%xmm0
  mov    D443(%rip),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  mov    %eax,%ebx
  movsd  D669(%rip),%xmm0
  mov    -0x38(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  imul   %ebx,%eax
  pxor   %xmm5,%xmm5
  cvtsi2sd %eax,%xmm5
  movsd  %xmm5,-0x48(%rbp)
  movsd  D100(%rip),%xmm0
  mov    -0x38(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm6,%xmm6
  cvtsi2sd %eax,%xmm6
  movsd  %xmm6,-0x50(%rbp)
  movsd  -0x28(%rbp),%xmm1
  movsd  D21(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x30(%rbp),%xmm1
  movsd  D100(%rip),%xmm0
  addsd  %xmm0,%xmm1
  movsd  %xmm1,-0x58(%rbp)
  movsd  D529(%rip),%xmm0
  mov    -0x28(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D100(%rip),%xmm0
  movapd %xmm1,%xmm2
  mulsd  %xmm0,%xmm2
  movsd  %xmm2,-0x60(%rbp)
  movsd  D529(%rip),%xmm0
  mov    -0x30(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  -0x60(%rbp),%xmm0
  movapd %xmm0,%xmm7
  addsd  -0x58(%rbp),%xmm7
  movsd  %xmm7,-0x58(%rbp)
  movsd  D57(%rip),%xmm0
  mov    -0x28(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  movapd %xmm0,%xmm2
  addsd  %xmm0,%xmm2
  movsd  %xmm2,-0x60(%rbp)
  movsd  D57(%rip),%xmm0
  mov    -0x30(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  -0x60(%rbp),%xmm0
  addsd  -0x58(%rbp),%xmm0
  movapd %xmm0,%xmm5
  mulsd  -0x50(%rbp),%xmm5
  movsd  %xmm5,-0x50(%rbp)
  movsd  D669(%rip),%xmm0
  mov    -0x38(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D57(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movsd  %xmm1,-0x58(%rbp)
  movsd  D529(%rip),%xmm0
  mov    -0x30(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  movapd %xmm0,%xmm6
  mulsd  -0x58(%rbp),%xmm6
  movsd  %xmm6,-0x58(%rbp)
  movsd  -0x28(%rbp),%xmm1
  movsd  D153(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x30(%rbp),%xmm1
  movsd  D488(%rip),%xmm0
  addsd  %xmm0,%xmm1
  movsd  %xmm1,-0x60(%rbp)
  movsd  D529(%rip),%xmm0
  mov    -0x28(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D488(%rip),%xmm0
  movapd %xmm1,%xmm3
  mulsd  %xmm0,%xmm3
  movsd  %xmm3,-0x68(%rbp)
  movsd  D529(%rip),%xmm0
  mov    -0x30(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  -0x68(%rbp),%xmm0
  movapd %xmm0,%xmm7
  addsd  -0x60(%rbp),%xmm7
  movsd  %xmm7,-0x60(%rbp)
  movsd  D57(%rip),%xmm0
  mov    -0x28(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  movapd %xmm0,%xmm2
  addsd  %xmm0,%xmm2
  movsd  %xmm2,-0x68(%rbp)
  movsd  D57(%rip),%xmm0
  mov    -0x30(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  -0x68(%rbp),%xmm0
  addsd  -0x60(%rbp),%xmm0
  mulsd  -0x58(%rbp),%xmm0
  movsd  -0x50(%rbp),%xmm5
  subsd  %xmm0,%xmm5
  movsd  %xmm5,-0x50(%rbp)
  movsd  D529(%rip),%xmm0
  mov    -0x38(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D57(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movsd  %xmm1,-0x58(%rbp)
  movsd  D669(%rip),%xmm0
  mov    -0x30(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  movapd %xmm0,%xmm6
  mulsd  -0x58(%rbp),%xmm6
  movsd  %xmm6,-0x58(%rbp)
  movsd  -0x28(%rbp),%xmm1
  movsd  D247(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x30(%rbp),%xmm1
  movsd  D648(%rip),%xmm0
  addsd  %xmm0,%xmm1
  movsd  %xmm1,-0x60(%rbp)
  movsd  D529(%rip),%xmm0
  mov    -0x28(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D528(%rip),%xmm0
  movapd %xmm1,%xmm3
  mulsd  %xmm0,%xmm3
  movsd  %xmm3,-0x68(%rbp)
  movsd  D529(%rip),%xmm0
  mov    -0x30(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  -0x68(%rbp),%xmm0
  movapd %xmm0,%xmm7
  addsd  -0x60(%rbp),%xmm7
  movsd  %xmm7,-0x60(%rbp)
  movsd  D57(%rip),%xmm0
  mov    -0x28(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  movapd %xmm0,%xmm2
  addsd  %xmm0,%xmm2
  movsd  %xmm2,-0x68(%rbp)
  movsd  D57(%rip),%xmm0
  mov    -0x30(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  -0x68(%rbp),%xmm0
  addsd  -0x60(%rbp),%xmm0
  mulsd  -0x58(%rbp),%xmm0
  movapd %xmm0,%xmm6
  addsd  -0x50(%rbp),%xmm6
  movsd  %xmm6,-0x50(%rbp)
  movsd  D100(%rip),%xmm0
  mov    -0x30(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm5,%xmm5
  cvtsi2sd %eax,%xmm5
  movsd  %xmm5,-0x58(%rbp)
  movsd  -0x28(%rbp),%xmm1
  movsd  D368(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movapd %xmm0,%xmm3
  mulsd  -0x30(%rbp),%xmm3
  movapd %xmm3,%xmm1
  movsd  D274(%rip),%xmm0
  movapd %xmm1,%xmm7
  addsd  %xmm0,%xmm7
  movsd  %xmm7,-0x60(%rbp)
  movsd  D529(%rip),%xmm0
  mov    -0x28(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D486(%rip),%xmm0
  movapd %xmm1,%xmm2
  mulsd  %xmm0,%xmm2
  movsd  %xmm2,-0x68(%rbp)
  movsd  D529(%rip),%xmm0
  mov    -0x30(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  -0x68(%rbp),%xmm0
  movapd %xmm0,%xmm3
  addsd  -0x60(%rbp),%xmm3
  movsd  %xmm3,-0x60(%rbp)
  movsd  D57(%rip),%xmm0
  mov    -0x28(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  movapd %xmm0,%xmm7
  addsd  %xmm0,%xmm7
  movsd  %xmm7,-0x68(%rbp)
  movsd  D57(%rip),%xmm0
  mov    -0x30(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  -0x68(%rbp),%xmm0
  addsd  -0x60(%rbp),%xmm0
  movsd  -0x58(%rbp),%xmm1
  mulsd  %xmm0,%xmm1
  movsd  -0x50(%rbp),%xmm6
  subsd  %xmm1,%xmm6
  movapd %xmm6,%xmm0
  mulsd  -0x48(%rbp),%xmm0
  movsd  -0x40(%rbp),%xmm4
  subsd  %xmm0,%xmm4
  movsd  %xmm4,-0x40(%rbp)
  movsd  -0x28(%rbp),%xmm0
  movapd %xmm0,%xmm1
  addsd  %xmm0,%xmm1
  movsd  -0x38(%rbp),%xmm0
  addsd  -0x30(%rbp),%xmm0
  mulsd  %xmm1,%xmm0
  mov    D443(%rip),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D100(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movapd %xmm0,%xmm7
  mulsd  -0x28(%rbp),%xmm7
  movsd  %xmm7,-0x48(%rbp)
  movsd  D529(%rip),%xmm0
  mov    -0x38(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  mov    %eax,%ebx
  movsd  D529(%rip),%xmm0
  mov    -0x30(%rbp),%rax
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  sub    %eax,%ebx
  mov    %ebx,%edx
  pxor   %xmm5,%xmm5
  cvtsi2sd %edx,%xmm5
  movq   %xmm5,%rax
  movsd  D738(%rip),%xmm0
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  movsd  -0x48(%rbp),%xmm1
  mulsd  %xmm0,%xmm1
  movsd  -0x40(%rbp),%xmm0
  divsd  %xmm1,%xmm0
  movsd  %xmm0,-0x18(%rbp)
L25:
  movsd  -0x18(%rbp),%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  mov    -0x8(%rbp),%rbx
  leave
  ret
```

tool_calls: name: unpack_data
arguments: label: D443
datatype: f64
name: unpack_data
arguments: label: D709
datatype: f64
name: unpack_data
arguments: label: D614
datatype: f64
name: unpack_data
arguments: label: D529
datatype: f64
name: unpack_data
arguments: label: D190
datatype: f64
name: unpack_data
arguments: label: D57
datatype: f64
name: unpack_data
arguments: label: D495
datatype: f64
name: unpack_data
arguments: label: D669
datatype: f64
name: unpack_data
arguments: label: D621
datatype: f64
name: unpack_data
arguments: label: D738
datatype: f64
name: unpack_data
arguments: label: D100
datatype: f64
name: unpack_data
arguments: label: D191
datatype: byte[8]
name: unpack_data
arguments: label: D21
datatype: f64
name: unpack_data
arguments: label: D153
datatype: f64
name: unpack_data
arguments: label: D488
datatype: f64
name: unpack_data
arguments: label: D247
datatype: f64
name: unpack_data
arguments: label: D648
datatype: f64
name: unpack_data
arguments: label: D528
datatype: f64
name: unpack_data
arguments: label: D368
datatype: f64
name: unpack_data
arguments: label: D274
datatype: f64
name: unpack_data
arguments: label: D486
datatype: f64

tool: D443: 2.718281828459045

tool: D709: 240

tool: D614: 375

tool: D529: 2

tool: D190: 270

tool: D57: 3

tool: D495: 115

tool: D669: 4

tool: D621: 30

tool: D738: 5

tool: D100: 6

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

tool: D21: 9

tool: D153: 15

tool: D488: 10

tool: D247: 33

tool: D648: 20

tool: D528: 14

tool: D368: 63

tool: D274: 84

tool: D486: 18

assistant: ```c
double Slater_1S_2S(double rij, double xij, double xii) {
  double S;
  if (xii == xij) {
    S = (-240.0 + 240.0 * (pow((double)(2.71828182845904523536029), (double)(2.0 * rij * xii))) - 375.0 * rij * xii - 270.0 * (pow((double)(rij), (double)(2.0))) * (pow((double)(xii), (double)(2.0))) - 115.0 * (pow((double)(rij), (double)(3.0))) * (pow((double)(xii), (double)(3.0))) - 30.0 * (pow((double)(rij), (double)(4.0))) * (pow((double)(xii), (double)(4.0))) - 4.0 * (pow((double)(rij), (double)(5.0))) * (pow((double)(xii), (double)(5.0)))) / (240. * (pow((double)(2.71828182845904523536029), (double)(2.0 * rij * xii))) * rij);
  } else {
    S = (6.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))) + 6.0 * (pow((double)(2.71828182845904523536029), (double)(2.0 * rij * xij))) * (pow((double)(xij), (double)(6.0))) * (-4.0 * (pow((double)(xii), (double)(4.0))) - rij * (pow((double)(xii), (double)(5.0))) - 5.0 * (pow((double)(xii), (double)(2.0))) * (pow((double)(xij), (double)(2.0))) + (pow((double)(xij), (double)(4.0))) + rij * xii * (pow((double)(xij), (double)(4.0)))) - (pow((double)(2.71828182845904523536029), (double)(2.0 * rij * xii))) * (pow((double)(xii), (double)(4.0))) * ((pow((double)(xii), (double)(6.0))) * (6.0 + 9.0 * rij * xij + 6.0 * (pow((double)(rij), (double)(2.0))) * (pow((double)(xij), (double)(2.0))) + 2.0 * (pow((double)(rij), (double)(3.0))) * (pow((double)(xij), (double)(3.0)))) - 3.0 * (pow((double)(xii), (double)(4.0))) * (pow((double)(xij), (double)(2.0))) * (10.0 + 15.0 * rij * xij + 10.0 * (pow((double)(rij), (double)(2.0))) * (pow((double)(xij), (double)(2.0))) + 2.0 * (pow((double)(rij), (double)(3.0))) * (pow((double)(xij), (double)(3.0)))) + 3.0 * (pow((double)(xii), (double)(2.0))) * (pow((double)(xij), (double)(4.0))) * (20.0 + 33.0 * rij * xij + 14.0 * (pow((double)(rij), (double)(2.0))) * (pow((double)(xij), (double)(2.0))) + 2.0 * (pow((double)(rij), (double)(3.0))) * (pow((double)(xij), (double)(3.0)))) - (pow((double)(xij), (double)(6.0))) * (84.0 + 63.0 * rij * xij + 18.0 * (pow((double)(rij), (double)(2.0))) * (pow((double)(xij), (double)(2.0))) + 2.0 * (pow((double)(rij), (double)(3.0))) * (pow((double)(xij), (double)(3.0)))))) / (6. * (pow((double)(2.71828182845904523536029), (double)(2.0 * rij * (xii + xij)))) * rij * (pow((double)((pow((double)(xii), (double)(2.0))) - (pow((double)(xij), (double)(2.0)))), (double)(5.0))));
  }
  return S;
}
```