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

```asm
<expansion_sum_zeroelim1>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  mov    %edi,-0x34(%rbp)
  mov    %rsi,-0x40(%rbp)
  mov    %edx,-0x38(%rbp)
  mov    %rcx,-0x48(%rbp)
  mov    %r8,-0x50(%rbp)
  mov    -0x48(%rbp),%rax
  movss  (%rax),%xmm0
  movss  %xmm0,-0x2c(%rbp)
  movl   $0x0,-0x20(%rbp)
  jmp    L56
L75:
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x40(%rbp),%rax
  add    %rdx,%rax
  movss  (%rax),%xmm0
  movss  %xmm0,-0x18(%rbp)
  movss  -0x2c(%rbp),%xmm0
  addss  -0x18(%rbp),%xmm0
  movss  %xmm0,-0x14(%rbp)
  movss  -0x14(%rbp),%xmm0
  subss  -0x2c(%rbp),%xmm0
  movss  %xmm0,-0x10(%rbp)
  movss  -0x14(%rbp),%xmm0
  subss  -0x10(%rbp),%xmm0
  movss  %xmm0,-0xc(%rbp)
  movss  -0x18(%rbp),%xmm0
  subss  -0x10(%rbp),%xmm0
  movss  %xmm0,-0x8(%rbp)
  movss  -0x2c(%rbp),%xmm0
  subss  -0xc(%rbp),%xmm0
  movss  %xmm0,-0x4(%rbp)
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x50(%rbp),%rax
  add    %rdx,%rax
  movss  -0x4(%rbp),%xmm0
  addss  -0x8(%rbp),%xmm0
  movss  %xmm0,(%rax)
  movss  -0x14(%rbp),%xmm0
  movss  %xmm0,-0x2c(%rbp)
  addl   $0x1,-0x20(%rbp)
L56:
  mov    -0x20(%rbp),%eax
  cmp    -0x34(%rbp),%eax
  jl     L75
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x50(%rbp),%rax
  add    %rdx,%rax
  movss  -0x2c(%rbp),%xmm0
  movss  %xmm0,(%rax)
  mov    -0x20(%rbp),%eax
  mov    %eax,-0x1c(%rbp)
  movl   $0x1,-0x24(%rbp)
  jmp    L37
L61:
  mov    -0x24(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x48(%rbp),%rax
  add    %rdx,%rax
  movss  (%rax),%xmm0
  movss  %xmm0,-0x2c(%rbp)
  mov    -0x24(%rbp),%eax
  mov    %eax,-0x20(%rbp)
  jmp    L80
L42:
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x50(%rbp),%rax
  add    %rdx,%rax
  movss  (%rax),%xmm0
  movss  %xmm0,-0x18(%rbp)
  movss  -0x2c(%rbp),%xmm0
  addss  -0x18(%rbp),%xmm0
  movss  %xmm0,-0x14(%rbp)
  movss  -0x14(%rbp),%xmm0
  subss  -0x2c(%rbp),%xmm0
  movss  %xmm0,-0x10(%rbp)
  movss  -0x14(%rbp),%xmm0
  subss  -0x10(%rbp),%xmm0
  movss  %xmm0,-0xc(%rbp)
  movss  -0x18(%rbp),%xmm0
  subss  -0x10(%rbp),%xmm0
  movss  %xmm0,-0x8(%rbp)
  movss  -0x2c(%rbp),%xmm0
  subss  -0xc(%rbp),%xmm0
  movss  %xmm0,-0x4(%rbp)
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x50(%rbp),%rax
  add    %rdx,%rax
  movss  -0x4(%rbp),%xmm0
  addss  -0x8(%rbp),%xmm0
  movss  %xmm0,(%rax)
  movss  -0x14(%rbp),%xmm0
  movss  %xmm0,-0x2c(%rbp)
  addl   $0x1,-0x20(%rbp)
L80:
  mov    -0x20(%rbp),%eax
  cmp    -0x1c(%rbp),%eax
  jle    L42
  addl   $0x1,-0x1c(%rbp)
  mov    -0x1c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x50(%rbp),%rax
  add    %rdx,%rax
  movss  -0x2c(%rbp),%xmm0
  movss  %xmm0,(%rax)
  addl   $0x1,-0x24(%rbp)
L37:
  mov    -0x24(%rbp),%eax
  cmp    -0x38(%rbp),%eax
  jl     L61
  movl   $0xffffffff,-0x20(%rbp)
  movl   $0x0,-0x28(%rbp)
  jmp    L45
L103:
  mov    -0x28(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x50(%rbp),%rax
  add    %rdx,%rax
  movss  (%rax),%xmm0
  movss  %xmm0,-0x18(%rbp)
  pxor   %xmm0,%xmm0
  ucomiss -0x18(%rbp),%xmm0
  jp     L33
  pxor   %xmm0,%xmm0
  ucomiss -0x18(%rbp),%xmm0
  je     L117
L33:
  addl   $0x1,-0x20(%rbp)
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x50(%rbp),%rax
  add    %rdx,%rax
  movss  -0x18(%rbp),%xmm0
  movss  %xmm0,(%rax)
L117:
  addl   $0x1,-0x28(%rbp)
L45:
  mov    -0x28(%rbp),%eax
  cmp    -0x1c(%rbp),%eax
  jle    L103
  cmpl   $0xffffffff,-0x20(%rbp)
  jne    L74
  mov    $0x1,%eax
  jmp    L27
L74:
  mov    -0x20(%rbp),%eax
  add    $0x1,%eax
L27:
  pop    %rbp
  ret
```

assistant: ```c
int expansion_sum_zeroelim1(elen, e, flen, f, h)
int elen;
float *e;
int flen;
float *f;
float *h;
{
  float Q;
  float Qnew;
  int index, findex, hindex, hlast;
  float hnow;
  float bvirt;
  float avirt, bround, around;
  Q = f[0];
  for (hindex = 0; hindex < elen; hindex++) {
    hnow = e[hindex];
    Qnew = (float)(Q + hnow);
    bvirt = (float)(Qnew - Q);
    avirt = Qnew - bvirt;
    bround = hnow - bvirt;
    around = Q - avirt;
    h[hindex] = around + bround;
    Q = Qnew;
  }
  h[hindex] = Q;
  hlast = hindex;
  for (findex = 1; findex < flen; findex++) {
    Q = f[findex];
    for (hindex = findex; hindex <= hlast; hindex++) {
      hnow = h[hindex];
      Qnew = (float)(Q + hnow);
      bvirt = (float)(Qnew - Q);
      avirt = Qnew - bvirt;
      bround = hnow - bvirt;
      around = Q - avirt;
      h[hindex] = around + bround;
      Q = Qnew;
    }
    h[++hlast] = Q;
  }
  hindex = -1;
  for (index = 0; index <= hlast; index++) {
    hnow = h[index];
    if (hnow != 0.0) {
      h[++hindex] = hnow;
    }
  }
  if (hindex == -1) {
    return 1;
  } else {
    return hindex + 1;
  }
}
```