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

```asm
<fndsep>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x28,%rsp
  mov    %edi,%ebx
  mov    %rsi,%r14
  mov    %rdx,%r15
  mov    %rcx,%r12
  mov    %r8,%r13
  mov    %r9,0x8(%rsp)
  mov    0x60(%rsp),%rbp
  mov    %fs:0x28,%rax
  mov    %rax,0x18(%rsp)
  xor    %eax,%eax
  mov    %rbp,%rsi
  mov    0x68(%rsp),%edi
  call   <zeroi@plt>
  lea    0x14(%rsp),%rcx
  mov    0x8(%rsp),%r9
  mov    %r13,%r8
  mov    %r15,%rdx
  mov    %r14,%rsi
  mov    %ebx,%edi
  call   <fnroot@plt>
  mov    0x14(%rsp),%r9d
  cmp    $0x5,%r9d
  jle    L196
  movslq %r9d,%rax
  mov    0x0(%r13,%rax,4),%eax
  mov    %eax,%r8d
  shr    $0x1f,%r8d
  add    %eax,%r8d
  sar    %r8d
  cmp    $0x1,%eax
  jle    L138
  mov    $0x1,%eax
  mov    $0x0,%edx
L188:
  add    0x0(%r13,%rax,4),%edx
  sub    -0x4(%r13,%rax,4),%edx
  mov    %eax,%edi
  cmp    %edx,%r8d
  setg   %sil
  cmp    %eax,%r9d
  setg   %cl
  add    $0x1,%rax
  test   %cl,%sil
  jne    L188
L8:
  lea    -0x1(%rdi),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    0x0(%r13,%rax,4),%esi
  mov    0x4(%r13,%rdx,1),%r8d
  mov    0x8(%r13,%rdx,1),%r9d
  cmp    %r9d,%r8d
  jge    L98
  movslq %r8d,%rcx
  mov    0x8(%rsp),%rdi
  lea    (%rdi,%rcx,4),%rax
  mov    %r9d,%edx
  sub    %r8d,%edx
  lea    -0x1(%rdx),%edx
  add    %rcx,%rdx
  lea    0x4(%rdi,%rdx,4),%rcx
L135:
  movslq (%rax),%rdx
  movl   $0xffffffff,0x0(%rbp,%rdx,4)
  add    $0x4,%rax
  cmp    %rcx,%rax
  jne    L135
L98:
  cmp    %r8d,%esi
  jge    L130
  movslq %esi,%rdx
  mov    0x8(%rsp),%rbx
  lea    (%rbx,%rdx,4),%r10
  lea    -0x1(%r8),%eax
  sub    %esi,%eax
  add    %rdx,%rax
  lea    0x4(%rbx,%rax,4),%r11
  mov    $0x0,%ebx
  jmp    L95
L196:
  movslq %r9d,%r9
  mov    0x4(%r13,%r9,4),%ebx
  sub    $0x8,%rsp
  push   %rbp
  mov    %r13,%r9
  mov    %r15,%r8
  mov    %r12,%rcx
  mov    %r14,%rdx
  mov    0x18(%rsp),%rax
  mov    (%rax),%esi
  mov    %ebx,%edi
  call   <subrcm@plt>
  add    $0x10,%rsp
  test   %ebx,%ebx
  jle    L177
  mov    %ebx,%ecx
  mov    $0x0,%eax
L58:
  mov    0x8(%rsp),%rdi
  mov    (%rdi,%rax,4),%edx
  mov    %edx,(%r12,%rax,4)
  movslq %edx,%rdx
  movl   $0xffffffff,(%r15,%rdx,4)
  add    $0x1,%rax
  cmp    %rcx,%rax
  jne    L58
  jmp    L177
L138:
  mov    $0x0,%edi
  jmp    L8
L59:
  add    $0x4,%rax
  cmp    %rax,(%rcx)
  jbe    L100
L199:
  movslq (%rax),%rdx
  cmpl   $0x0,0x0(%rbp,%rdx,4)
  jns    L59
  movslq %ebx,%rax
  mov    %esi,(%r12,%rax,4)
  add    $0x1,%ebx
  movl   $0xffffffff,(%rdi)
  mov    (%rcx),%rax
  jmp    L59
L100:
  add    $0x4,%r10
  cmp    %r11,%r10
  je     L114
L95:
  mov    (%r10),%esi
  movslq %esi,%rdx
  mov    (%r14,%rdx,8),%rax
  lea    0x8(%r14,%rdx,8),%rcx
  cmp    (%rcx),%rax
  jae    L100
  lea    (%r15,%rdx,4),%rdi
  jmp    L199
L130:
  mov    $0x0,%ebx
L114:
  cmp    %r9d,%r8d
  jge    L177
  movslq %r8d,%rcx
  lea    0x0(%rbp,%rcx,4),%rax
  sub    %r8d,%r9d
  lea    -0x1(%r9),%edx
  add    %rcx,%rdx
  lea    0x4(%rbp,%rdx,4),%rdx
L124:
  movl   $0x0,(%rax)
  add    $0x4,%rax
  cmp    %rax,%rdx
  jne    L124
L177:
  mov    0x18(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L71
  mov    %ebx,%eax
  add    $0x28,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L71:
  call   <__stack_chk_fail@plt>
```

assistant: ```c
int fndsep(int root, int **padj, int *mask, int *sep, int *xls, int *ls, int *work, int neqns) {
  int nlvl, nsep, i, node, midlvl, midbeg, mp1beg, mp1end;
  int *ptr;
  int minone = -1;
  zeroi(neqns, work);
  root = fnroot(root, padj, mask, &nlvl, xls, ls);
  if (nlvl < 6) {
    nsep = xls[nlvl + 1];
    node = ls[0];
    subrcm(nsep, node, padj, sep, mask, xls, work);
    for (i = 0; i < nsep; i++) {
      node = ls[i];
      sep[i] = node;
      mask[node] |= minone;
    }
    return (nsep);
  }
  midlvl = (nlvl + 2) / 2;
  {
    int j, k, l;
    ;
    k = xls[nlvl];
    j = k / 2;
    l = 0;
    for (k = 0; k < nlvl && l < j; k++) {
      if (l < j) {
        l += (xls[k + 1] - xls[k]);
      }
    }
    k--;
    midlvl = k;
    midbeg = xls[midlvl];
    mp1beg = xls[midlvl + 1];
    mp1end = xls[midlvl + 2];
  }
  for (i = mp1beg; i < mp1end; i++) {
    node = ls[i];
    work[node] |= minone;
  }
  nsep = 0;
  for (i = midbeg; i < mp1beg; i++) {
    node = ls[i];
    for (ptr = padj[node]; ptr < padj[node + 1]; ptr++) {
      if (work[*ptr] < 0) {
        sep[nsep] = node;
        nsep++;
        mask[node] |= minone;
        ptr = padj[node + 1];
      }
    }
  }
  for (i = mp1beg; i < mp1end; i++) {
    node = ls[i];
    work[i] &= 0;
  }
  return (nsep);
}
```