user: 请将以下的汇编代码转换成C语言代码:

```asm
<nn_single_full>:
  endbr64
  push   %r15
  push   %r14
  mov    %esi,%r14d
  push   %r13
  mov    $0x400,%r13d
  push   %r12
  mov    %edx,%r12d
  push   %rbp
  mov    $0x400,%ebp
  push   %rbx
  mov    %r9,%rbx
  sub    $0xe8,%rsp
  cmp    %r13d,%esi
  mov    0x128(%rsp),%rax
  cmovle %esi,%r13d
  cmp    %ebp,%edx
  mov    %edi,0x50(%rsp)
  cmovle %edx,%ebp
  mov    0x120(%rsp),%r11
  mov    %ecx,0x54(%rsp)
  mov    %rax,0x90(%rsp)
  mov    0x130(%rsp),%rax
  mov    %r13d,%edi
  imul   %ebp,%edi
  mov    %r11,0x8(%rsp)
  mov    %rax,0x98(%rsp)
  mov    0x138(%rsp),%rax
  mov    %esi,0xd4(%rsp)
  mov    %rax,0x88(%rsp)
  mov    0x140(%rsp),%rax
  mov    %r8,0xd8(%rsp)
  mov    %rax,0xb0(%rsp)
  call   <fvec_new@plt>
  mov    0x8(%rsp),%r11
  mov    %rax,%r15
  movslq %r14d,%rax
  test   %rax,%rax
  mov    %rax,0xa0(%rsp)
  jle    L352
  movslq %r12d,%rax
  movslq %r13d,%rdi
  mov    %rbx,0x48(%rsp)
  movslq %ebp,%rbx
  mov    %rax,0x58(%rsp)
  mov    0xa0(%rsp),%rax
  mov    %r15,%r13
  mov    %rdi,0xb8(%rsp)
  mov    0x90(%rsp),%r12
  mov    %rax,0xa8(%rsp)
  lea    0x0(,%rdi,4),%rax
  mov    0x98(%rsp),%r14
  mov    %rax,0xc0(%rsp)
  movslq 0x54(%rsp),%rax
  mov    %rbx,0x40(%rsp)
  mov    %r14,%r15
  mov    %r12,%r14
  mov    %r11,%r12
  movq   $0x0,0x78(%rsp)
  imul   %rax,%rdi
  imul   %rbx,%rax
  lea    0x0(,%rdi,4),%rsi
  shl    $0x2,%rax
  mov    %rsi,0xc8(%rsp)
  mov    %rax,0x60(%rsp)
L218:
  mov    0xa8(%rsp),%rbx
  mov    0xb8(%rsp),%rax
  cmp    %rax,%rbx
  cmovle %rbx,%rax
  movslq %eax,%rbx
  mov    %eax,0xd0(%rsp)
  test   %rbx,%rbx
  jle    L343
  lea    0x4(%r14),%rdx
  mov    %r15,%rax
  sub    %rdx,%rax
  cmp    $0x8,%rax
  jbe    L309
  lea    -0x1(%rbx),%rax
  cmp    $0x3,%rax
  jbe    L309
  mov    %rbx,%rdx
  xor    %eax,%eax
  pcmpeqd %xmm0,%xmm0
  shr    $0x2,%rdx
  shl    $0x4,%rdx
L89:
  movaps D32(%rip),%xmm3
  movups %xmm0,(%r14,%rax,1)
  movups %xmm3,(%r15,%rax,1)
  add    $0x10,%rax
  cmp    %rdx,%rax
  jne    L89
  mov    %rbx,%rax
  and    $0xfffffffffffffffc,%rax
  test   $0x3,%bl
  je     L343
  mov    0x78(%rsp),%rdi
  mov    0x90(%rsp),%rsi
  movss  D32(%rip),%xmm0
  mov    0x98(%rsp),%rcx
  lea    (%rdi,%rax,1),%rdx
  movl   $0xffffffff,(%rsi,%rdx,4)
  movss  %xmm0,(%rcx,%rdx,4)
  lea    0x1(%rax),%rdx
  cmp    %rdx,%rbx
  jle    L343
  add    %rdi,%rdx
  add    $0x2,%rax
  movl   $0xffffffff,(%rsi,%rdx,4)
  movss  %xmm0,(%rcx,%rdx,4)
  cmp    %rbx,%rax
  jge    L343
  add    %rdi,%rax
  movl   $0xffffffff,(%rsi,%rax,4)
  movss  %xmm0,(%rcx,%rax,4)
L343:
  mov    0x58(%rsp),%rax
  mov    0xd8(%rsp),%rdi
  lea    0x4(%r12),%rsi
  xor    %ebp,%ebp
  mov    %rsi,0x80(%rsp)
  mov    %rax,0x30(%rsp)
  mov    %rdi,0x38(%rsp)
  test   %rax,%rax
  jle    L30
  nopw   0x0(%rax,%rax,1)
L317:
  mov    0x30(%rsp),%rax
  mov    0x40(%rsp),%r10
  cmp    %r10,%rax
  cmovle %rax,%r10
  cmpl   $0x2,0x50(%rsp)
  mov    %r10d,0x8(%rsp)
  mov    %r10,0x10(%rsp)
  je     L28
  sub    $0x8,%rsp
  push   %r13
  mov    0x58(%rsp),%r9
  mov    0x48(%rsp),%r8
  mov    0xe0(%rsp),%ecx
  mov    0x18(%rsp),%edx
  mov    0x64(%rsp),%esi
  mov    0x60(%rsp),%edi
  call   <compute_cross_distances_alt@plt>
  pop    %rax
  pop    %rdx
  mov    0x10(%rsp),%r10
L362:
  test   %r12,%r12
  jne    L155
  test   %rbx,%rbx
  jle    L297
  movslq %r10d,%rax
L66:
  lea    0x0(,%rax,4),%r8
  mov    %r13,%rcx
  xor    %esi,%esi
  nopl   0x0(%rax,%rax,1)
L329:
  mov    (%r14,%rsi,4),%edi
  movss  (%r15,%rsi,4),%xmm1
  test   %rax,%rax
  jle    L345
  xor    %edx,%edx
  nopl   0x0(%rax)
L200:
  movss  (%rcx,%rdx,4),%xmm0
  comiss %xmm0,%xmm1
  jbe    L192
  lea    (%rdx,%rbp,1),%edi
  movaps %xmm0,%xmm1
L192:
  add    $0x1,%rdx
  cmp    %rax,%rdx
  jne    L200
L345:
  mov    %edi,(%r14,%rsi,4)
  add    %r8,%rcx
  movss  %xmm1,(%r15,%rsi,4)
  add    $0x1,%rsi
  cmp    %rbx,%rsi
  jl     L329
L297:
  mov    0x40(%rsp),%rdi
  mov    0x60(%rsp),%rsi
  sub    %rdi,0x30(%rsp)
  add    %rsi,0x38(%rsp)
  add    %rdi,%rbp
  cmp    0x58(%rsp),%rbp
  jl     L317
L30:
  cmpq   $0x0,0x88(%rsp)
  je     L3
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  mov    0xb0(%rsp),%rdi
  mov    0x88(%rsp),%rax
  cvtsi2sdq 0x78(%rsp),%xmm0
  cvtsi2sdl 0xd4(%rsp),%xmm1
  divsd  %xmm1,%xmm0
  call   *%rax
L3:
  mov    0xb8(%rsp),%rbx
  add    %rbx,0x78(%rsp)
  sub    %rbx,0xa8(%rsp)
  mov    0xc0(%rsp),%rbx
  mov    0xc8(%rsp),%rdi
  mov    0x78(%rsp),%rax
  add    %rdi,0x48(%rsp)
  add    %rbx,%r14
  add    %rbx,%r15
  cmp    %rax,0xa0(%rsp)
  jg     L218
  mov    %r13,%r15
L352:
  mov    %r15,%rdi
  call   <free@plt>
  cmpq   $0x0,0x88(%rsp)
  je     L156
  movsd  D34(%rip),%xmm0
  mov    0xb0(%rsp),%rdi
  mov    0x88(%rsp),%rax
  add    $0xe8,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  jmp    *%rax
L155:
  test   %rbx,%rbx
  jle    L297
  movslq %r10d,%rax
  test   %rax,%rax
  jle    L66
  mov    %rax,%r10
  mov    %rax,%r9
  mov    %rax,%rdx
  mov    %r14,0x68(%rsp)
  and    $0x3,%r10d
  shr    $0x2,%r9
  and    $0xfffffffffffffffc,%rdx
  mov    %r13,%rcx
  lea    0x0(,%rax,4),%rsi
  lea    0x0(,%rbp,4),%rdi
  shl    $0x4,%r9
  xor    %r11d,%r11d
  mov    %rsi,0x18(%rsp)
  mov    0x80(%rsp),%rsi
  mov    %r10,0x28(%rsp)
  add    %rdi,%rsi
  mov    %r15,0x70(%rsp)
  add    %r12,%rdi
  mov    %rdx,%r15
  mov    %rsi,0x10(%rsp)
  lea    -0x1(%rax),%rsi
  mov    %rsi,0x20(%rsp)
  xor    %esi,%esi
  nopl   0x0(%rax,%rax,1)
L206:
  mov    %rcx,%rdx
  sub    0x10(%rsp),%rdx
  cmp    $0x8,%rdx
  jbe    L187
  cmpl   $0x1,0x8(%rsp)
  je     L187
  cmpq   $0x2,0x20(%rsp)
  jbe    L252
  xor    %edx,%edx
  nopl   0x0(%rax,%rax,1)
L65:
  movups (%rcx,%rdx,1),%xmm0
  movups (%rdi,%rdx,1),%xmm2
  mulps  %xmm2,%xmm0
  movups %xmm0,(%rcx,%rdx,1)
  add    $0x10,%rdx
  cmp    %r9,%rdx
  jne    L65
  cmp    %rax,%r15
  je     L42
  mov    0x28(%rsp),%rdx
  cmp    $0x1,%rdx
  mov    %rdx,%r14
  mov    %r15,%rdx
  je     L255
  mov    %r15,%r8
L148:
  lea    (%rsi,%r8,1),%r10
  add    %rbp,%r8
  lea    0x0(%r13,%r10,4),%r10
  movq   (%r12,%r8,4),%xmm0
  mov    %r14,%r8
  movq   (%r10),%xmm1
  and    $0xfffffffffffffffe,%r8
  add    %r8,%rdx
  mulps  %xmm1,%xmm0
  movlps %xmm0,(%r10)
  cmp    %r14,%r8
  je     L42
L255:
  lea    (%rsi,%rdx,1),%r8
  add    %rbp,%rdx
  lea    0x0(%r13,%r8,4),%r8
  movss  (%r8),%xmm0
  mulss  (%r12,%rdx,4),%xmm0
  movss  %xmm0,(%r8)
L42:
  add    $0x1,%r11
  add    0x18(%rsp),%rcx
  add    %rax,%rsi
  cmp    %rbx,%r11
  jne    L206
  mov    0x68(%rsp),%r14
  mov    0x70(%rsp),%r15
  jmp    L66
L187:
  xor    %edx,%edx
L260:
  movss  (%rcx,%rdx,4),%xmm0
  mulss  (%rdi,%rdx,4),%xmm0
  movss  %xmm0,(%rcx,%rdx,4)
  add    $0x1,%rdx
  cmp    %rdx,%rax
  jne    L260
  jmp    L42
L28:
  mov    0x48(%rsp),%r8
  mov    0x38(%rsp),%rcx
  mov    %r10d,%esi
  mov    %r13,%r9
  mov    0xd0(%rsp),%edx
  mov    0x54(%rsp),%edi
  call   <compute_cross_distances@plt>
  mov    0x10(%rsp),%r10
  jmp    L362
L252:
  mov    %rax,%r14
  xor    %edx,%edx
  xor    %r8d,%r8d
  jmp    L148
L309:
  mov    0x78(%rsp),%rdi
  movss  D32(%rip),%xmm0
  mov    0x90(%rsp),%rcx
  mov    0x98(%rsp),%rsi
  lea    (%rbx,%rdi,1),%rdx
  lea    0x0(,%rdi,4),%rax
  shl    $0x2,%rdx
L301:
  movl   $0xffffffff,(%rcx,%rax,1)
  movss  %xmm0,(%rsi,%rax,1)
  add    $0x4,%rax
  cmp    %rdx,%rax
  jne    L301
  jmp    L343
L156:
  add    $0xe8,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
```

tool_calls: name: unpack_data
arguments: label: D32
type_guessed: f32[4]
name: unpack_data
arguments: label: D34
type_guessed: byte[8]

tool: {"D32": [1.0000000150474662e30,1.0000000150474662e30,1.0000000150474662e30,1.0000000150474662e30]}

tool: {"D34": [0x00,0x00,0x00,0x00,0x00,0x00,0xf0,0x3f]}

assistant: ```c
void nn_single_full(int distance_type, int n1, int n2, int d, const float *mat2, const float *mat1, const float *vw_weights, int *vw, float *vwdis, void (*peek_fun)(void *arg, double frac), void *peek_arg) {
  int step1 = ((n1) < (1024) ? (n1) : (1024)), step2 = ((n2) < (1024) ? (n2) : (1024)), m1, m2, imin;
  long i1, i2, j1, j2;
  float dmin;
  float *dists = fvec_new(step1 * step2), *dline;
  for (i1 = 0; i1 < n1; i1 += step1) {
    m1 = ((step1) < (n1 - i1) ? (step1) : (n1 - i1));
    for (j1 = 0; j1 < m1; j1++) {
      vw[j1 + i1] = -1;
      vwdis[j1 + i1] = 1e30;
    }
    for (i2 = 0; i2 < n2; i2 += step2) {
      m2 = ((step2) < (n2 - i2) ? (step2) : (n2 - i2));
      if (distance_type == 2) {
        compute_cross_distances(d, m2, m1, mat2 + i2 * d, mat1 + i1 * d, dists);
      } else {
        compute_cross_distances_alt(distance_type, d, m2, m1, mat2 + i2 * d, mat1 + i1 * d, dists);
      }
      if (vw_weights) {
        for (j1 = 0; j1 < m1; j1++) {
          for (j2 = 0; j2 < m2; j2++) {
            dists[j1 * m2 + j2] *= vw_weights[j2 + i2];
          }
        }
      }
      for (j1 = 0; j1 < m1; j1++) {
        dline = dists + j1 * m2;
        imin = vw[i1 + j1];
        dmin = vwdis[i1 + j1];
        for (j2 = 0; j2 < m2; j2++) {
          if (dline[j2] < dmin) {
            imin = j2 + i2;
            dmin = dline[j2];
          }
        }
        vw[i1 + j1] = imin;
        vwdis[i1 + j1] = dmin;
      }
    }
    if (peek_fun) {
      (*peek_fun)(peek_arg, i1 / (double)n1);
    }
  }
  free(dists);
  if (peek_fun) {
    (*peek_fun)(peek_arg, 1);
  }
}
```