user: 请显示与下面列出的汇编代码相匹配的C语言实现：

```asm
<Nuclear_4S>:
  endbr64
  push   %rbx
  sub    $0x20,%rsp
  movsd  %xmm1,(%rsp)
  movsd  D107(%rip),%xmm1
  movsd  %xmm0,0x8(%rsp)
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%ebx
  mov    D107(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  movsd  0x8(%rsp),%xmm2
  movsd  D7(%rip),%xmm7
  cvtsi2sd %ebx,%xmm1
  mulsd  D59(%rip),%xmm1
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mulsd  %xmm2,%xmm7
  movsd  %xmm2,0x10(%rsp)
  mulsd  %xmm0,%xmm1
  movsd  (%rsp),%xmm0
  mulsd  %xmm7,%xmm0
  addsd  D190(%rip),%xmm0
  addsd  %xmm0,%xmm1
  movapd %xmm2,%xmm0
  movsd  %xmm1,0x8(%rsp)
  movsd  D155(%rip),%xmm1
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%ebx
  mov    D155(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  0x8(%rsp),%xmm5
  cvtsi2sd %ebx,%xmm0
  mulsd  D133(%rip),%xmm0
  movsd  0x10(%rsp),%xmm2
  cvtsi2sd %eax,%xmm1
  mov    D136(%rip),%rax
  mulsd  %xmm1,%xmm0
  movq   %rax,%xmm1
  addsd  %xmm0,%xmm5
  movapd %xmm2,%xmm0
  movsd  %xmm5,0x8(%rsp)
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%ebx
  mov    D136(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  0x8(%rsp),%xmm6
  cvtsi2sd %ebx,%xmm0
  mulsd  D105(%rip),%xmm0
  movsd  0x10(%rsp),%xmm2
  cvtsi2sd %eax,%xmm1
  mulsd  %xmm1,%xmm0
  movsd  D160(%rip),%xmm1
  addsd  %xmm0,%xmm6
  movapd %xmm2,%xmm0
  movsd  %xmm6,0x8(%rsp)
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%ebx
  mov    D160(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  0x8(%rsp),%xmm4
  cvtsi2sd %ebx,%xmm0
  mulsd  D77(%rip),%xmm0
  movsd  0x10(%rsp),%xmm2
  cvtsi2sd %eax,%xmm1
  mulsd  %xmm1,%xmm0
  movsd  D95(%rip),%xmm1
  addsd  %xmm0,%xmm4
  movapd %xmm2,%xmm0
  movsd  %xmm4,0x8(%rsp)
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%ebx
  mov    D95(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  movsd  0x8(%rsp),%xmm6
  cvtsi2sd %ebx,%xmm0
  mulsd  D112(%rip),%xmm0
  movsd  0x10(%rsp),%xmm2
  cvtsi2sd %eax,%xmm1
  movsd  %xmm2,0x18(%rsp)
  mulsd  %xmm1,%xmm0
  movsd  D130(%rip),%xmm1
  addsd  %xmm0,%xmm6
  movapd %xmm2,%xmm0
  movsd  %xmm6,0x8(%rsp)
  call   <pow@plt>
  movsd  (%rsp),%xmm0
  mov    %eax,%ebx
  mov    D130(%rip),%rax
  movq   %rax,%xmm1
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  pxor   %xmm0,%xmm0
  movsd  0x18(%rsp),%xmm2
  cvtsi2sd %ebx,%xmm1
  mulsd  D136(%rip),%xmm1
  movsd  0x8(%rsp),%xmm3
  cvtsi2sd %eax,%xmm0
  movsd  %xmm2,0x8(%rsp)
  mulsd  %xmm0,%xmm1
  movsd  D132(%rip),%xmm0
  addsd  %xmm1,%xmm3
  movapd %xmm2,%xmm1
  addsd  %xmm2,%xmm1
  mulsd  (%rsp),%xmm1
  movsd  %xmm3,0x10(%rsp)
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  movsd  0x8(%rsp),%xmm2
  movsd  D24(%rip),%xmm0
  cvtsi2sd %eax,%xmm1
  mulsd  D190(%rip),%xmm1
  movsd  0x10(%rsp),%xmm3
  add    $0x20,%rsp
  divsd  %xmm2,%xmm0
  pop    %rbx
  mulsd  %xmm1,%xmm2
  divsd  %xmm2,%xmm3
  subsd  %xmm3,%xmm0
  ret
```

tool_calls: name: extract_symbolic_data
arguments: data_tag: D107
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D7
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D59
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D190
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D155
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D133
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D136
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D105
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D160
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D77
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D95
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D112
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D130
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D132
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D24
datatype: f64

tool: D107: 2

tool: D7: 2205

tool: D59: 1890

tool: D190: 1260

tool: D155: 3

tool: D133: 1050

tool: D136: 4

tool: D105: 420

tool: D160: 5

tool: D77: 126

tool: D95: 6

tool: D112: 28

tool: D130: 7

tool: D132: 2.718281828459045

tool: D24: 1

assistant: ```c
double Nuclear_4S(double rij, double xii) {
  double S;
  S = 1.0 / rij - (1260.0 + 2205.0 * rij * xii + 1890.0 * (pow((double)(rij), (double)(2.0))) * (pow((double)(xii), (double)(2.0))) + 1050.0 * (pow((double)(rij), (double)(3.0))) * (pow((double)(xii), (double)(3.0))) + 420.0 * (pow((double)(rij), (double)(4.0))) * (pow((double)(xii), (double)(4.0))) + 126.0 * (pow((double)(rij), (double)(5.0))) * (pow((double)(xii), (double)(5.0))) + 28.0 * (pow((double)(rij), (double)(6.0))) * (pow((double)(xii), (double)(6.0))) + 4.0 * (pow((double)(rij), (double)(7.0))) * (pow((double)(xii), (double)(7.0)))) / (1260. * (pow((double)(2.71828182845904523536029), (double)(2.0 * rij * xii))) * rij);
  return S;
}
```