user: 请从给定的汇编指令推导出C源代码：

```asm
<neiE>:
  endbr64
  push   %r15
  push   %r14
  lea    -0x1(%r9),%r14d
  push   %r13
  mov    %rdi,%r13
  lea    0x0(,%r8,8),%edi
  push   %r12
  mov    %r8d,%r12d
  push   %rbp
  movslq %edx,%rbp
  push   %rbx
  sub    $0x48,%rsp
  movsd  %xmm1,0x18(%rsp)
  mov    0x88(%rsp),%rbx
  mov    %esi,0x8(%rsp)
  mov    %ecx,0x10(%rsp)
  mov    %r9d,0x28(%rsp)
  movsd  %xmm0,0x20(%rsp)
  call   <malloc@plt>
  test   %r12d,%r12d
  mov    0x28(%rsp),%r8d
  movsd  0x18(%rsp),%xmm1
  movsd  0x20(%rsp),%xmm6
  mov    %rax,%r15
  jle    L410
  movslq 0x8(%rsp),%rdx
  mov    %r12d,%eax
  mov    %r13,%rcx
  lea    (%r15,%rax,8),%rsi
  sub    %r15,%rcx
  mov    %r15,%rax
  shl    $0x3,%rdx
L444:
  mov    (%rcx,%rax,1),%rdi
  add    $0x8,%rax
  movsd  (%rdi,%rdx,1),%xmm0
  movsd  %xmm0,-0x8(%rax)
  cmp    %rax,%rsi
  jne    L444
L410:
  movsd  (%r15,%rbp,8),%xmm0
  movq   D18(%rip),%xmm3
  mov    %r13,%rdx
  xor    %ecx,%ecx
  movl   $0x0,0x28(%rsp)
  sub    %r15,%rdx
  divsd  %xmm6,%xmm0
  movapd %xmm3,%xmm4
  cvttsd2si %xmm0,%eax
  and    %r14d,%eax
  mov    %eax,0x30(%rsp)
  movslq 0x10(%rsp),%rax
  movsd  (%r15,%rax,8),%xmm0
  divsd  %xmm6,%xmm0
  cvttsd2si %xmm0,%eax
  and    %r14d,%eax
  mov    %eax,0x20(%rsp)
  mov    %r8d,%eax
  shr    $0x1f,%eax
  add    %r8d,%eax
  sar    %eax
  mov    %eax,0x38(%rsp)
  lea    -0x2(%r12),%eax
  lea    0x10(%r15,%rax,8),%rsi
L11:
  mov    0x28(%rsp),%eax
  pxor   %xmm0,%xmm0
  sub    $0x1,%eax
  cvtsi2sd %eax,%xmm0
  mulsd  %xmm6,%xmm0
  comisd %xmm0,%xmm1
  jbe    L420
  mov    0x30(%rsp),%edi
  mov    0x28(%rsp),%r9d
  mov    %edi,%eax
  sub    %r9d,%eax
  mov    %eax,0x18(%rsp)
  test   %r9d,%r9d
  je     L367
  lea    (%r9,%r9,1),%r8d
  add    %r9d,%edi
  mov    %r8d,0x10(%rsp)
  mov    %edi,0x34(%rsp)
  cmp    %edi,%eax
  jg     L293
L386:
  mov    0x20(%rsp),%eax
  mov    0x28(%rsp),%r8d
  mov    %eax,%edi
  sub    %r8d,%edi
  mov    %edi,0x3c(%rsp)
  mov    0x18(%rsp),%edi
  mov    %edi,0x2c(%rsp)
  lea    (%rax,%r8,1),%edi
L312:
  mov    0x2c(%rsp),%eax
  mov    0x3c(%rsp),%ebp
  and    %r14d,%eax
  cmp    %edi,%ebp
  jg     L362
  mov    0x80(%rsp),%r9
  cltq
  mov    (%r9,%rax,8),%r8
  mov    %r13,%r9
  nopl   0x0(%rax)
L295:
  mov    %r14d,%eax
  and    %ebp,%eax
  cltq
  movslq (%r8,%rax,4),%r11
  cmp    $0xffffffff,%r11d
  je     L414
  movsd  (%r15),%xmm5
  mov    (%r9),%r13
  nopl   0x0(%rax)
L411:
  movapd %xmm5,%xmm2
  subsd  0x0(%r13,%r11,8),%xmm2
  lea    0x0(,%r11,8),%r10
  andpd  %xmm3,%xmm2
  cmp    $0x1,%r12d
  jle    L438
  mov    %ecx,0x8(%rsp)
  lea    0x8(%r15),%rax
  nopl   (%rax)
L77:
  mov    (%rdx,%rax,1),%rcx
  movsd  (%rax),%xmm0
  subsd  (%rcx,%r10,1),%xmm0
  andpd  %xmm3,%xmm0
  comisd %xmm2,%xmm0
  jbe    L274
  comisd %xmm1,%xmm0
  ja     L437
  movapd %xmm0,%xmm2
L274:
  add    $0x8,%rax
  cmp    %rax,%rsi
  jne    L77
  mov    0x8(%rsp),%ecx
L438:
  comisd %xmm2,%xmm1
  movslq (%rbx,%r11,4),%r11
  sbb    $0xffffffff,%ecx
  cmp    $0xffffffff,%r11d
  jne    L411
L414:
  add    0x10(%rsp),%ebp
  cmp    %edi,%ebp
  jle    L295
  mov    %r9,%r13
L362:
  addl   $0x1,0x2c(%rsp)
  mov    0x2c(%rsp),%eax
  cmp    0x34(%rsp),%eax
  jle    L312
  mov    0x20(%rsp),%eax
  add    $0x1,%eax
  sub    0x28(%rsp),%eax
  mov    %eax,0x2c(%rsp)
L22:
  mov    0x18(%rsp),%eax
  mov    0x2c(%rsp),%ebp
  and    %r14d,%eax
  cmp    %edi,%ebp
  jge    L261
  mov    0x80(%rsp),%r9
  cltq
  mov    (%r9,%rax,8),%r8
  mov    %r13,%r9
  nopl   0x0(%rax)
L384:
  mov    %r14d,%eax
  and    %ebp,%eax
  cltq
  movslq (%r8,%rax,4),%r11
  cmp    $0xffffffff,%r11d
  je     L26
  movsd  (%r15),%xmm5
  mov    (%r9),%r13
  nopl   0x0(%rax)
L383:
  movapd %xmm5,%xmm2
  subsd  0x0(%r13,%r11,8),%xmm2
  lea    0x0(,%r11,8),%r10
  andpd  %xmm4,%xmm2
  cmp    $0x1,%r12d
  jle    L133
  mov    %ecx,0x8(%rsp)
  lea    0x8(%r15),%rax
  nopl   (%rax)
L350:
  mov    (%rdx,%rax,1),%rcx
  movsd  (%rax),%xmm0
  subsd  (%rcx,%r10,1),%xmm0
  andpd  %xmm4,%xmm0
  comisd %xmm2,%xmm0
  jbe    L227
  comisd %xmm1,%xmm0
  ja     L422
  movapd %xmm0,%xmm2
L227:
  add    $0x8,%rax
  cmp    %rax,%rsi
  jne    L350
  mov    0x8(%rsp),%ecx
L133:
  comisd %xmm2,%xmm1
  movslq (%rbx,%r11,4),%r11
  sbb    $0xffffffff,%ecx
  cmp    $0xffffffff,%r11d
  jne    L383
L26:
  add    $0x1,%ebp
  cmp    %edi,%ebp
  jne    L384
  mov    %r9,%r13
L261:
  mov    0x10(%rsp),%r9d
  add    %r9d,0x18(%rsp)
  mov    0x18(%rsp),%eax
  cmp    0x34(%rsp),%eax
  jle    L22
L293:
  addl   $0x1,0x28(%rsp)
  mov    0x28(%rsp),%eax
  cmp    %eax,0x38(%rsp)
  jne    L11
L255:
  mov    0x30(%rsp),%eax
  mov    0x28(%rsp),%edi
  mov    0x20(%rsp),%ebp
  mov    %eax,%r9d
  sub    %edi,%r9d
  sub    %edi,%ebp
  mov    %r9d,%r11d
  mov    %eax,%r9d
  add    %edi,%r9d
  cmp    %r11d,%r9d
  jle    L368
  mov    %r14d,%eax
  mov    %r13,%rdi
  mov    %r11d,%r10d
  mov    %r11d,%r8d
  and    %ebp,%eax
  movq   D18(%rip),%xmm3
  sub    %r15,%rdi
  cltq
  shl    $0x2,%rax
  mov    %rax,0x8(%rsp)
L356:
  mov    %r14d,%eax
  mov    0x80(%rsp),%rdx
  and    %r10d,%eax
  cltq
  mov    (%rdx,%rax,8),%rax
  mov    0x8(%rsp),%rdx
  mov    (%rax,%rdx,1),%edx
  cmp    $0xffffffff,%edx
  je     L75
  mov    0x0(%r13),%rax
  movsd  (%r15),%xmm4
  mov    %r9d,0x18(%rsp)
  mov    %rax,0x10(%rsp)
L48:
  mov    0x10(%rsp),%rax
  movslq %edx,%r9
  movapd %xmm4,%xmm2
  lea    0x0(,%r9,8),%r11
  subsd  (%rax,%r9,8),%xmm2
  andpd  %xmm3,%xmm2
  cmp    $0x1,%r12d
  jle    L51
  lea    0x8(%r15),%rax
L21:
  mov    (%rdi,%rax,1),%rdx
  movsd  (%rax),%xmm0
  subsd  (%rdx,%r11,1),%xmm0
  andpd  %xmm3,%xmm0
  comisd %xmm2,%xmm0
  jbe    L54
  comisd %xmm1,%xmm0
  movapd %xmm0,%xmm2
  ja     L51
L54:
  add    $0x8,%rax
  cmp    %rax,%rsi
  jne    L21
L51:
  comisd %xmm2,%xmm1
  mov    (%rbx,%r9,4),%edx
  sbb    $0xffffffff,%ecx
  cmp    $0xffffffff,%edx
  jne    L48
  mov    0x18(%rsp),%r9d
L75:
  add    $0x1,%r10d
  cmp    %r10d,%r9d
  jne    L356
  mov    %r8d,%r11d
L368:
  mov    0x28(%rsp),%r10d
  mov    %r11d,%eax
  lea    0x1(%rbp),%edi
  add    0x20(%rsp),%r10d
  and    %r14d,%eax
  cmp    %edi,%r10d
  jle    L137
  mov    0x80(%rsp),%rdx
  cltq
  mov    %r13,%r8
  movq   D18(%rip),%xmm3
  sub    %r15,%r8
  mov    (%rdx,%rax,8),%rax
  mov    %rax,0x8(%rsp)
L413:
  mov    %r14d,%eax
  mov    0x8(%rsp),%rdx
  and    %edi,%eax
  cltq
  movslq (%rdx,%rax,4),%rdx
  cmp    $0xffffffff,%edx
  je     L40
  movsd  (%r15),%xmm4
  mov    0x0(%r13),%r11
L56:
  movapd %xmm4,%xmm2
  subsd  (%r11,%rdx,8),%xmm2
  lea    0x0(,%rdx,8),%r9
  andpd  %xmm3,%xmm2
  cmp    $0x1,%r12d
  jle    L290
  lea    0x8(%r15),%rax
L387:
  mov    (%r8,%rax,1),%rbp
  movsd  (%rax),%xmm0
  subsd  0x0(%rbp,%r9,1),%xmm0
  andpd  %xmm3,%xmm0
  comisd %xmm2,%xmm0
  jbe    L315
  comisd %xmm1,%xmm0
  movapd %xmm0,%xmm2
  ja     L290
L315:
  add    $0x8,%rax
  cmp    %rax,%rsi
  jne    L387
L290:
  comisd %xmm2,%xmm1
  movslq (%rbx,%rdx,4),%rdx
  sbb    $0xffffffff,%ecx
  cmp    $0xffffffff,%edx
  jne    L56
L40:
  add    $0x1,%edi
  cmp    %edi,%r10d
  jne    L413
  jmp    L137
  nopl   0x0(%rax,%rax,1)
L437:
  mov    0x8(%rsp),%ecx
  movapd %xmm0,%xmm2
  jmp    L438
  nopl   (%rax)
L422:
  mov    0x8(%rsp),%ecx
  movapd %xmm0,%xmm2
  jmp    L133
L367:
  mov    0x30(%rsp),%eax
  movl   $0x1,0x10(%rsp)
  mov    %eax,0x34(%rsp)
  jmp    L386
L420:
  mov    0x28(%rsp),%edi
  cmp    %edi,0x38(%rsp)
  je     L255
L137:
  mov    %r15,%rdi
  mov    %ecx,0x8(%rsp)
  call   <free@plt>
  mov    0x8(%rsp),%ecx
  add    $0x48,%rsp
  pop    %rbx
  pop    %rbp
  lea    -0x1(%rcx),%eax
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
```

tool_calls: name: extract_symbolic_data
arguments: data_label: D18
datatype: qword

tool: D18: 9223372036854775807

assistant: ```c
int neiE(double **x, int i, int comp1, int comp2, int dim, int bs, double epsgrid, double eps, int **box, int *lis) {
  int ix, iy, ix1, iy1, ix2, jj, step, d;
  int el, nx, ib = bs - 1;
  double dd, dy;
  double *xx;
  xx = (double *)malloc(dim * sizeof(double));
  for (d = 0; d < dim; d++)
    xx[d] = x[d][i];
  ix = (int)(xx[comp1] / epsgrid) & ib;
  iy = (int)(xx[comp2] / epsgrid) & ib;
  jj = 0;
  nx = 0;
  while (eps > epsgrid * (jj - 1)) {
    step = (jj) ? 2 * jj : 1;
    for (ix1 = ix - jj; ix1 <= ix + jj; ix1++) {
      ix2 = ix1 & ib;
      for (iy1 = iy - jj; iy1 <= iy + jj; iy1 += step) {
        el = box[ix2][iy1 & ib];
        while (el != -1) {
          dd = fabs(xx[0] - x[0][el]);
          for (d = 1; d < dim; d++)
            if ((dy = fabs(xx[d] - x[d][el])) > dd)
              if ((dd = dy) > eps)
                break;
          if (dd <= eps)
            nx++;
          el = lis[el];
        }
      }
    }
    for (ix1 = ix - jj; ix1 <= ix + jj; ix1 += step) {
      ix2 = ix1 & ib;
      for (iy1 = iy - jj + 1; iy1 <= iy + jj - 1; iy1++) {
        el = box[ix2][iy1 & ib];
        while (el != -1) {
          dd = fabs(xx[0] - x[0][el]);
          for (d = 1; d < dim; d++)
            if ((dy = fabs(xx[d] - x[d][el])) > dd)
              if ((dd = dy) > eps)
                break;
          if (dd <= eps)
            nx++;
          el = lis[el];
        }
      }
    }
    jj++;
    if (jj == (bs / 2))
      break;
  }
  if (jj == (bs / 2)) {
    for (ix1 = ix - jj; ix1 < ix + jj; ix1++) {
      ix2 = ix1 & ib;
      iy1 = iy - jj;
      el = box[ix2][iy1 & ib];
      while (el != -1) {
        dd = fabs(xx[0] - x[0][el]);
        for (d = 1; d < dim; d++)
          if ((dy = fabs(xx[d] - x[d][el])) > dd)
            if ((dd = dy) > eps)
              break;
        if (dd <= eps)
          nx++;
        el = lis[el];
      }
    }
    ix1 = ix - jj;
    ix2 = ix1 & ib;
    for (iy1 = iy - jj + 1; iy1 <= iy + jj - 1; iy1++) {
      el = box[ix2][iy1 & ib];
      while (el != -1) {
        dd = fabs(xx[0] - x[0][el]);
        for (d = 1; d < dim; d++)
          if ((dy = fabs(xx[d] - x[d][el])) > dd)
            if ((dd = dy) > eps)
              break;
        if (dd <= eps)
          nx++;
        el = lis[el];
      }
    }
  }
  free(xx);
  return nx - 1;
}
```